delphi timer

Jak stworzyć skaczącą etykietę w Delphi z użyciem timera?

w zdarzeniu OnTimer Etykieta.top:=random(Form.ClientHeight-E... Etykieta.left:=random(Form.ClientWidth-E...

[DELPHI] Jak przerwać odliczanie Timer1 przyciskiem zewnętrznym?

Najprościej w zewnętrznym warunku daj Timer1.Enabled:=FALSE;. Spowoduje to zatrzymanie timera.

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

[DELPHI] Delphi – jak uzyskać timer z interwałem poniżej 1 ms do sterowania silnikiem krokowym?

Temat nie raz wałkowany, a rozwiązanie leży w WinAPI i QueryPerformanceCounter tak więc zupełnie niezależne od języka programowania.

Jak liczyć sekundy i minuty od zera w Delphi7 za pomocą Timera?

[syntax=delphi]Label1.Tag:=0; Label1.Caption:='00:00:00'; Timer.Interval:=1000; // można w inspektorze Timer.enabled:=true;[/syntax] OnTimer: [syntax=delphi]Label1.Tag:=Label1.Tag+1; Label1.Caption:=FormatTime('hh:nn:ss',La...

[Delphi] Jak stworzyć symulację sygnalizacji świetlnej w Delphi z użyciem timerów?

Timer, to dobry pomysł. Trzy zmienne boolean do zapisu widoku świateł, zliczanie "impulsów" Timera, i zmiana zmiennych co ileś-tam impulsów. Po odliczeniu do zadanej wartości (cały cykl), kasujesz licznik i od nowa.

[delphi] Jak stworzyć komponent wskazówki zegara analogowego w Delphi 5?

Najprościej chyba będzie dziedziczyć po TPaintBox, oprogramować zdarzenie OnPaint i dodatkowo zaaplikować Timera, który będzie odświeżał.

[delphi] [Delphi] Czy timer obsłuży generowanie obrazu przez LPT dla TV?

Wypuszczenie sygnału TV ze złącza LPT jest niemożliwe. Jest to związane z ograniczoną prędkością transmisji dla tego złącza ([url=http://pl.wikipedia.org/wiki/IEEE_... 2Mb/s ). Natomiast szerokość pasma sygnał TV wynosi ok. 6,5MHz. Timery w PC możesz ustawić najwyżej na 1.193.180 Hz. Innym problemem uniemożliwiającym tą transmisję jest konieczność...

[DELPHI] uruchamianie funkcji typu: od (godzina) do (godzina)

Hello my friend! Jak to zrobić? Po prostu sprawdzisz, godzinę np w zdarzeniu Timera... [syntax=Delphi] if (Time>=CzasOd[i]) and (Time<=CzasDo[i]) then begin if not Kanal[i].Aktywne then Aktywuj(Kanal[i]); end else begin if Kanal[i].Aktywne then Dezaktywuj(Kanal[i]); end;[/syntax]Keine Philosophie :)

PanelRGB wąż z LEDami RGB sterowany przez port LPT

Program był pisany w Delphi. Timer mi w zupełności wystarczył, ponieważ nie było regulacji pwm, tylko sterowanie ośmioma segmentami.

Jak napisać program do generowania pliku txt z datą co 30 sekund?

W delphi- timer z intervalem co ile chcesz robic zapis i w ontimer pobierasz data systemowa i robisz zapis do pliku...

Delphi - Alternatywy dla timera do monitorowania zmian w pliku tekstowym

Ten 3 link na nic zda mi się w delphi, gdyż i tak jest tam napisane tylko do c++,c# i czegoś jeszcze. Żadnej wzmianki o delphi. Od kiedy to //* This component will let you know when selected events //* occur in the Windows shell, such as files and folders //* being renamed, added, or deleted. (Moving an item yields //* the same results as renaming...

Gdzie znaleźć dokładny komponent timer dla Delphi?

Witam Czy ktoś wię gdzie mogę znaleźć komponent (najlepiej freeware) timer ze zwiększoną dokładnością bo ta z podstawowego komponentu mi niestety nie wystarcza..

[Delphi] Jak uzyskać timer poniżej 1ms dla analizatora stanów logicznych?

Witam!! Potrzebny mi szybki timer tzn. mniej niz 1ms.Chce zbudowac analizator stanow logicznych na porcie LPT pod XP,ale timer pod delphi jest za wolny.. Zamykam. - arnoldziq

Delphi 7 - Jak uzyskać TTimer o rozdzielczości 1 mikrosekundy?

Przecież Google znajduje: http://delphi.about.com/od/windowsshella... http://stackoverflow.com/questions/14834... P.S. Do czego ci aż taki szybki timer? (Może sprawę da się załatwić w inny sposób?)

Delphi CreateThread – jak sprawdzić i zakończyć działający wątek?

Sposobów jest tyle ile programistów:) Najprostszy: Zaraz po CreateThread zapamiętaj gdzieś hThread - w globalnej zmiennej, w klasie, albo w property okienka (SetProp)... i uruchom timer 10000ms. W OnTimer już wiesz co zrobić: 1. if thread_dziala() then terminate() 2. wyłącz timer i wyzeruj hThread W przypadku gdyby thread zakończył przed czasem - możnaby...

Delphi: pętla repeat i czekanie na przerwanie obiektu Timer

Program się wiesza bo jest zbyt zajęty pętlą repeat-until. Jeżeli by to miało być tylko opóźnienie 100ms, to wystarczy sleep(100). Jeżeli konieczna jest pętla repeat-until, to w jej wnętrzu proponuję dodanie jeszcze np sleep(10) - aby system mógł wykonać inne operacje np. procedurę od Timera.

[Delphi] Jak zasymulować kliknięcie przycisku w programie?

Oj widzę, że musisz troszkę pocztać o programowaniu... Jeśli tylko chcesz wywołać zdarzenie kliknięcia, to nic dodatkowo nie deklarujesz. Kod: Button1.Click(); umieszczasz w procedurze/zdarzeniu obsługi tego czegoś, czym chcesz wywołać "samokliknięcie" przycisku. (ale napisałem :-)). Może być to obsługa kliknięcia innego przycisku, timer, procedura,......

Delphi - czy TTimer da się przyspieszyć poniżej 1ms?

Jeśli jego Algorytm wykonuje się szybciej niż 1ms to tak. Ale jeśli jest wolniejszy to nie ma sensu się bawić w wątki. [syntax=delphi] TTurbo = class(TThread) public procedure Execute; override; end; var Form1: TForm1; Stop: boolean = True; TurboTimer : TTurbo; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); // On/Off Timera...

[Delphi] Jak schować program od razu po uruchomieniu?

Witam Na formatke wrzuć komponent Timer i ustaw mu czas na 1 Oprogramuj go tak: form1.hide; timer1.enabled:=False;

Jak odczytywać wszystkie impulsy z enkodera 500 imp/obr przez port LPT?

Witam, czy ktoś z Was zajmował się odczytem impulsów z enkodera inkrementalnego poprzez port równoległy w komputerze PC? Z moich testów (moje oprogramowanie w Delphi) wynika, że nie jestem w stanie odczytywać wszystkich sygnałów wysyłanych przez enkoder. Dane w moim doświadczeniu: - enkoder inkrementalny 500 imp/obr - program w Delphi: timer na formatce,...

[Delphi] Pętla for nie aktualizuje Label5 na bieżąco, jak to naprawić?

Aby ustawić wartość odliczanego czasu należy przypisać wartość w polu interval timera. Dla jednej sekundy będzie to wartość 1000. Po zliczeniu tego czasu wywoła się zdarzenie OnTimer i to w nim ustaw wyłączenie timera i sprawdzenie interesujących Cię warunków. Tak wogóle to Google wpisz "timer delphi" i wszystko będzie jasne Pozdrawiam

Delphi ds150e nie czyta parametrów w czasie rzeczywistym w Kangoo 1.5 dci

Spróbuj w menadżerze urządzeń na porcie com gdzie masz zainstalowany interfejs ustawić latency timer na 1.

Sterowanie komponentami w Delphi za pomocą dynamicznych bibliotek DLL

Musisz za pomocą argumentu przekazywać do funkcji obiekt na którym chcesz wykonać jakieś działanie. Procedure StTimer(timer : TTimer); stdcall; begin timer.Enabled:=false; end; A następnie w głównym programie wywoływać ją tak: StTimer(Form1.Timer1); Dawno w delphi nie pisałem ale z tego co pamiętam coś takiego powinno działać...

[Delphi] Delphi – jak narysować wykres liniowy: oś X czas, oś Y wartość z Edit (0-255)

Hmm, to chyba za daleko wyszedłem z domysłami. Możesz położyć Timer i w zdarzeniu OnTimer wrzucić taki kod, który będzie będzie pobierał to co jest wpisane w Edit1 i dokładał do wykresu: [syntax=delphi]procedure TForm1.Timer1Timer(Sender: TObject); begin Chart1.Series[0].Add(StrToFloat(Edit1.Te... end;[/syntax]

Delphi 7 – jak obsłużyć przerwania RS-232 zamiast Timera przy odbiorze danych?

Witam. Od kilku dni siedzę nad książką "RS-232 praktyczne programowanie" i usiłuję napisać program który będzie wyświetlał wartość temperatury wysłaną do portu COM. Wzorując się na książce napisałem program, który działa od Timera w Delphi i odczytuje zawartość bufora. Wszystko działałoby fajnie gdyby nie to że timer trafia czasami na odbiór danych...

Jak dodać migający kursor na płótnie w Delphi 5?

Żadnych sleepów! Timer ma swój interwał i on powinien tylko na przemian zapalać i gasić kursor. Możesz spokojnie zrobić (w kontekście Timera): if Tag=0 then Canvas.Pixels[]:=clBlack else Canvas.Pixels[]:=clWhite; Tag:=Tag xor 1;

Zegar w Delphi. Zmiana czasu zadziałania operacji.

Tam w Delphi jest taki obiekt Timer, ma ustawiony Interval na 200. Tylko chodzi o to zeby to jakos zapisac a nie zmienic na 3000. Np jak 15 razy zliczy to wtedy ma uruchomic to co chce, takie opoznienie przez zliczanie cykli.

[Delphi] Jak zwiększyć częstotliwość próbkowania portu LPT w Delphi?

1. Znaleźć lepszy timer (np. na delphi.icm.edu.pl) 2. Lepszym, ale trudniejszym rozwiązaniem będzie wykorzystanie przerwań systemowych. Przyjrzyj się np. temu, ale nie gwarantuję, że pójdzie na nowszych delphi http://delphi.icm.edu.pl/ftp/d10free/rti...

[delphi] [Delphi] Jak dodać zmienny czas do wykresu temperatury z COM?

Pozbądź się tego timera. Timer nie ma gwarancji uruchomienia procedury obsługi zdarzenia idealnie co zadany czas. W efekcie możesz z czasem doprowadzić do przepełnienia bufora. Jeśli chodzi Ci o deltę czasu, to po prostu odejmij od bieżącego pierwszy czas i wsio. [syntax=delphi] CzasStart:=Now; Sleep(2000); Application.MessageBox(Pchar('Program uruchomiony...

Delphi. Wczytywanie obrazków od razu przy włączeniu programu

przy pierwszym wywołaniu procedury timera, wyłącz go :) Timer1->Enabled:=false;)

[Delphi] Jak zmienić długość wskazówek w stoperze analogowym?

Nie zauważyłem ;p Punkt na obwodzie liczony jest poprawnie. Ale umiejscowienie środka (MoveTo) już nie ;) wyliczasz położenie względem punktu (r,r). Jeśli teraz chcesz przesunąć - przesuń otrzymane współrzędne oraz środek o dany, ten sam wektor. A przy okazji - won mi ze zmiennymi globalnymi, które nie są potrzebne! Jedyne uzasadnienie ma zmienna s,...

Delphi - Jak odczytać pozycję kursora, gdy aplikacja jest zminimalizowana?

Dzięki, już mi działa. Wystarczyło dać procedurę pod Timer, a nie pod OnMouseMove. pozdro

Delphi 7 - Jak przerwać pętlę while przyciskiem stop?

Zamiast pętli while skorzystaj z komponentu timer . Timer załączaj i wyłączaj przyciskami.

Komendy delphi do sterownia silnika krokowego przez lpt

Najprosciej zapisac za pomoca IniFile.2) Wykrzystac Timer albo zrobic nowy wątek(Thread).

Cykliczne i automatyczne pobieranie obrazów z serwera http

Bardzo prosty przykład: Np. w delphi wklej sobie tą ikonkę timera do formularza, ustaw te 15 min. we właściwościach i podepnij procedurkę do ściągania pliku. PS. Jak to ma na jakąś stronę wklejać to weź po prostu odświeżanie ustaw odpowiednie.

[Delphi] Canvas - płynne rysowanie "w czasie rzeczywistym"

Może nie całkiem na temat ale w jakim komponencie da się rysować dynamicznie w delphi bo gdyby zrobić krzywą smoka toby to nawet ładne było i jeszcze wrzucić jakiś timer żeby widać było na bieżąco jak się krzywa maluje :D

Jak wizualizować dane z uC po RS232 w Delphi? Temperatury i przyciski

Nie wiem jak dlugi jest ten ciag Na razię też nie wiem wszystko wyjdzie w trakcie budowy, przykłąd który dałeś działa świetnie, ale dla wartości 0-99 przy 100 nie działa a w praktyce będą przesyłane tam też wartości od 0-255. Da rade jakoś temu zaradzić? Dobra już sobie trochę radze z dodawaniem np nowych progresów itd. Mógłbyś mi tylko pokazać jeszcze...

[delphi] Jak napisać warunek w Delphi do obsługi przycisku BitBtn1 i Timer1?

Będzie ciężko to zrobić :( Najprostsza możliwość, to włączanie i wyłączanie timer-a, przyciśnięciem tego samego Buttona. [syntax=delphi]procedure TForm1.BitBtn1Click(Sender: TObject); begin Timer1.enabled := not Timer1.enabled end;[/syntax] No można to zrobić, robiąc szybką pętlę, która sprawdza stan tego przycisku, ale raczej należałoby zrobić to w...

Jak zainstalować komponent portu COM w Delphi 7 dla AVR i RS232?

No to tylko timer do takich zastosowań... w przerwaniu od timera wykonujesz pomiar i jedziesz dalej ;)

M-ster, czyli zegarek z budzikiem+sterownik muzyki

Dokładnie chodzi mi o program który siedzi w Tray i czeka na sygnał. działa to tak: po naciśnięciu odpowiedniego przycisku bascom wysyła jakiś znak ASCII - praktycznie dowolny. Natomiast po stronie delphi "siedzi" działający timer, który co 100 ms wywołuje procedurę. Sprawdza ona otrzymany z portu COM znak - jeśli jest on równy z góry założonemu -...

Delphi 7: Wysuwanie tacki CD-ROM i uruchamianie gry z płyty CD

FocusControl(...) Zamiast wstawiać Timer, dużo lepiej byłoby podpiąć się pod zdarzenie poleedycji.OnChange.

Tworzenie dynamicznego TTimer i TButton w Delphi bez formy - jak to zrobić?

Witam Mam pytanie jak zrobic sobie timer i klikniecie guzika w delphi "dynamicznie" bez kladzenia na forme, bo czasem zalozmy ze nie mamy mozliwosci przewidzenia ile ich bedzie oraz jak obsluzyc klikniecie na guzik: var Timer: TTImer; Button: TButton; begin Timer := TTimer.Create(Self); Button := TButton.Create(Self);...

Free Pascal – jak ustawić czas wyświetlania kolorów w sygnalizatorze świetlnym?

Najprościej będzie jak wstawisz sobie 3 shape-y okrągłe i jeden kwadratowy jako sygnalizator dasz domyślnie kółka białe i będziesz zmieniał kolor shape-ów potem użyjesz timera i będą się same zmieniały światła http://forum.4programmers.net/Delphi_Pas... http://komputery.katalogi.pl/%5BDelphi%5... to powinno starczyć...

Obsługa przerwań zegara systemowego w Delphi/C++ - książki i źródła

A jeżeli chodzi ci tylko o timing (wywolanie czegos co okreslony interwał czasowy) nie lepszy (i prostszy będzie Timer? Albo wrecz PreciseTimer?

[Delphi] Odbiór paczek 2-bajtowych z RS232 przy 600 b/s - jak to zrobić?

Rozumiem ale sęk w tym, że właśnie żadna dana nie może być pominięta, nawet ta pierwsza Dana[2] :-(. Może rozwiązaniem byłby odczyt asynchroniczny ale nie wiem jak podejść do tematu lub wprowadzić jakiś bufor FIFO i w innej procedurze Timera go czyścić i aktualizować...robiw

Delphi - Jak płynnie wyliczać prędkość koła roweru bez zacinania?

Moim zdaniem dobrze by było rozwiązać ten problem w taki sposób: W momencie pojawienia się impulsu zaczytuję sobie aktualny czas RTC (zegar czasu rzeczywistego) zapamiętuje jako T0 z maksymalną dokładnością. Potem gdy przyjdzie następny impuls to odejmuje od T1 od T0 i mam dokładny czas. Czas oczywiście przeliczam przez obwód koła i prędkość. T1 przepisuje...

[DELPHI] RS232 - Zacinanie okna przy komunikacji z PLC FATEK co 500ms

Witam, Posiadam następującą komunikacje obustronną PC(delphi)<-->RS232<-->stero... PLC FATEK. W programie mam timer, ktory co 500ms odpytuje sterownik. Porblem polega na tym ze 2x na sekunde okno mi zamarza gdy chce np je przesunac. Ponoc jest jakas fukcja, ktora odciaza bufor...ktos mial podobny problem??

[Delphi]ComPort - wysyłanie bajtowe, a nie string?

Jak wysyłam mu: var int : array[0..3] of byte; str: string; begin int[0]:=1; int[1]:=127; int[2]:=250; int[3]:=50; ComPort1.write(int,4); comport1.ReadStr(str,60); edit5.Text:=str; to procek zapisuje do zmiennych: Nrled:127 Ledr:250 Ledg:50 Ledb:1 BASCOM: Sprawd = Ischarwaiting()...

Tworzenie timera w VB do sterowania portem LPT (8 linii) - jak to zrobić?

Poszukaj sobie WinIo bibloteki DLL (jest już na elektrodzie). Jeżeli jesteś początkującym programistą to proponuje delphi lub cbuildera. Wg VB to jedno wielkie g. chociaż dużo ludzi w tym pisze

Delphi- Problem z odczytem danych odbieranych przez RS232

Mam pewien problem z odczytem danych w delphi nadawanych przez RS232. Do nadawania danych wykorzystałem mikrokontroler który nadaje mi siedmio-znakowy string z częstotliwością co 500ms. Do odczytu w delphi wykorzystałem funkcje WIN API od obsługi Rs232, sam odczyt realizowany jest na timerze ustawionym również na 500ms problem polega na tym, że np wartość...

[SQL/Delphi] Jak w SQL/Delphi raportować brak zdarzenia na podstawie określonego czasu?

Tak, robiłem już takie rzeczy... Wczytujesz z bazy plany, do ustawienia harmonogramu. Harmonogram będzie po prostu listą (ściślej: kolejką) z wyznaczonym czasem. Teraz w ramach tego harmonogramu sprawdzasz, czy aktualny czas jest większy lub równy czasowi z kolejki. To może być realizowane albo przez wątek z sekundowym sleepem), albo przez timer. Jeśli...

[Delphi] - Jak przyspieszyć obrót Image w czasie rzeczywistym?

W jaki sposób miałoby to wyglądać? Sam napisałem coś takiego, ale rozwiązanie z Timer'em nie bardzo mi się podoba... [syntax=delphi]procedure TForm2.Panel1MouseLeave(Sender: TObject); begin if GetKeyState(VK_LBUTTON) < 0 then with TTimer.Create(Self) do begin Interval := 10; OnTimer := Timer; end; end; procedure TForm2.Panel1MouseMove(Sender: TObject;...

[Delphi] Jak utrzymać klawisz wciśnięty do zmiany koloru pixela?

Rozumiem ,że ten kod masz w timerze ? a spróbuj wywalic te try i ten kod daj na koniec procedury: kolor1:=GetPixel(DC,634,550)... inna1 := inttostr(getrvalue(kolor1)&#... + inttostr(getgvalue(kolor1)&#... + inttostr(getbvalue(kolor1)&#... I zmienne daj globalnie Tak, w timerze wzbudzającym się co 1ms....

Sterowanie silnikiem krokowym przez LPT w Delphi z układami TTL i licznikami

Oczywiście że można wykonać taki układ i napisać do niego program. Ale program nie może być uruchomiony z windy (może z DOSa). Jest to związane z potrzebą wykorzystania timera (dla precyzji działania), który jest niedostępny z windowsa.

[Delphi] Odbiór danych RS232 - gubi część ramki

Dziekuje za nakierowanie na rozwiązanie, chociaż okazało się, że to nie do końca to. Problem pojawiał się gdy odbierane były długie ramki - przerwanie z od RxChar pojawiało się po odebraniu np 5 z 10 bajtów ramki, następne po odebraniu pięciu pozostałych. Ustawienie ReadTotalConstant i ReadTotalMultipier na odpowienie wartości nic nie zmieniło - odniosłem...

Szukam prostego programu do zliczania czasu pracy przy komputerze

Ale szanownemu Czmielowi nie chodzi o uptime(czas pracy systemu) tylko o cos co mierzy czas aktywnosci uzytkownika. Czyli jak wlaczysz komputer i pojdziesz na 3 godziny gdzie indziej to uptime zwieksza sie o 3 godziny, a user time o np. 10 min (bo potem np. wlaczyl sie wygaszacz - czyli nikt nic nie robi). Moze prosciutki sofcik w delphi do autostartu...

Delphi 7 - Brak odbioru danych w OnRxChar przy użyciu FT232R i AVR

Wszystko w porządku, ale sterowniki VCP nie zawsze pozwalają na wywołanie wszystkich zdarzeń w kontrolkach przeznaczonych dla "rzeczywistego" portu COM. Zamiast polegać na zdarzeniach, tymczasowo, ustaw timer, sprawdzaj co jakiś czas bufor portu i zobacz czy dostajesz jakiekolwiek informacje.

Grafika w Image1 z Delphi uzależnione od ruchu myszki

rozwiazania są 2...Pierwszy na formie dajesz takie samo zdarzenie onmousemove... Drugie to obsługa myszy po winapi i kontrolowanie położenia bezwzględnego wraz z monitorowaniem położenia tej bitmapy...Tylko potrzebny wtedy timer albo wątek obsługi myszy... Jeszcze inny sposób to ONMOUSE LEAVE

Kiedy strona jest w pełni załadowana przez kompontent TChromium DCEF3 (Delphi)?

Póki co - ponieważ wszystko typu [syntax=delphi] repeat Application.ProcessMessages; until Form1.IsChromiumBusy = False; [/syntax] w pewnym sensie zawiesza działanie przeglądarki (nie zawsze wczytuje się poprawnie treść), użyłem następującego rozwiązania. Dodałem jeszcze jeden Timer z interwałem 2 sekund. Przeglądarka odpala OnLoadEnd i zazwyczaj potrzebuje...

Tworzenie dynamicznego obiektu TImage w Delphi - jak ustawić właściwości?

dzięki chłopaki po raz kolejny :) jak Wam tak dobrze idzie to mam jeszcze jedno pytanko: czy można przesuwać obrazek w obrębie formy za pomocą myszy jakoś łatwiej... ja robiłem tak, że po kliknięciu myszą uruchamiałem timer w którym przesuwałem obrazek o przesunięcie kursora myszy a po puszczeniu klawisza wyłączałem timer. Lepiej by było Drag-Drop ale...

Problemy z komunikacją RS między ATmega8535 a Delphi - niepełne dane

Witam ! Proszę o pomoc w rozwiązaniu takiego problemu. Mam układ obliczający długość przewodu za pomocą Enkodera Kubler (1000 imp.) wykonany na mikrokontrolerze ATmega8535. Procesorek ładnie zlicza impulsy z wyjścia INT0, rozpoznaje kierunki oraz wyświetla wszystko na LCD. Problem polega na tym że muszę mieć odczyt długości na aplikacji PC. Wszystko...

Delphi: Jak działa fragment kodu z rekordem `butyrek`?

Dodano po 50 Poniższe linijki przypisują wartości do pola, ale po kolei opiszę co i jak: [syntax=delphi] nazwa.Text:=tabButow[StrToInt(naszeButy.... //przypisanie wartości do pola nazwa z tablicy, po wybranym indeksie z pola wyboru naszeButy z tablicy rekordów rozmiar.Text:=tabButow[StrToInt(naszeBut...

Delphi - jak poprawnie odczytać i wyświetlić dane z COM na wykresie?

Witam. Tworząc program zawiesiłem się na odczycie z com. Mikroprocesor odczytuje dane z akcelerometru i wysyła je do PC. I tu zaczyna się problem. Używam komponentu comport. Dana jest odbierana tylko raz, jakby zamroziło odczytywanie. [syntax=delphi]ComPort1.Readstr(Str,coun... memo1.Text:=memo1.Text+str; for x:=0 to memo1.lines.count-1 do chart1.Series[0].Add(StrToFloat(memo1.li...

[Delphi] Jak stworzyć przycisk awaryjny do przerywania długich pętli?

Chciałem odpisać, ale "Access to server denied"... Dokładnie jest tak jak pisze kolega "dj_west". Chciałem pętle dać do Timera i przyciski działały ... ale pętla w timerze dla interval 1 wolno działała. Teraz wpadłem na pomysł, aby odwrócić ... pętla normalnie, a w timerze dać obsługę wyjątku. Tylko jak w OnTimer sprawdzać klawiaturę lub myszkę?(to...

Jak stworzyć pętlę w Delphi 6, która odejmuje 2 od x, aż x osiągnie 1?

(zakładając że x to integer zdefiniowany w "var",a ten kod jest w timerze) x := x - 2; if x := 1 then {tutaj wpisz co ma sie zdarzyc gdy x bedzie mial wartosc 1}

Jak napisać program w Pascalu do generowania impulsów 4,166 Hz na LPT1?

A propo tego licznika ;) Kiedyś czytałem gdzieś jak to w czasach "dawnych" robiono licznik kilometrów do roweru włąsnie z kalkulatorem :) w roli wyswietlacza sumującego dystans. A co do dokładnego odliczania czasu to procesor powinien posiadać sprzetowy timer, nie kazdy go posiada przynajmniej kiedyś jaki pisałem coś w Delphi to mój PII w laptopie nie...

Sterowanie inteligentną sygnalizacją świetlną Delphi

Witam, panowie chciałbym napisać dość rozbudowaną aplikację w Delphi miałaby ona symulować pewne skrzyżowanie oraz podawać dane o ruchu na tym skrzyżowaniu i odmierzać czas wygenerowany chciałbym zastosować komponent shape uważam że najlepiej się nadaje do tego i tutaj się robi pewien problem. Chciałbym komponent shape i komponent Timer zgrać ze sobą...

Jak w Delphi generować stabilny przebieg 1kHz na LPT w Windows?

Mam pytanie odnośnie programowania portu LPT. Jak napisać program w Delphi, aby na pinie portu LPT generowany był stabilny przebieg 1kHz niezależnie od innych uruchomionych procesów, aby przebieg był stabilny gdy surfuję po necie, gdy kopiuję z partycji na partycję albo w innych przypadkach gdy procesor jest zajęty w 100%. Standardowy komponent Timer...

[Delphi] Zapisywanie wygenerowanych już liczb pseudolosowych

To, że zrobiłem program do wysyłania spamu, nie znaczy że go wysyłam. (Dla testów wysyłam "siema, jesteś?") Bawiłem się w robienie programów korzystających z GG. Poprawiłem trochę kod, wywaliłem całkiem zmienną a i sprawdzanie czy Timer pracuje. edit: jednak mam wrazenie ze po wywaleniu zmiennej "a" wiadomosci do nikogo nie dochodza, bo nikt nie odpisuje...

Delphi 3: Jak napisać procedurę 'Collision' dla zderzenia komponentów?

Mam prośbę ... Nie bardzo mogę sobie poradzić z napisaniem procedury 'Collision" Chodzi o zderzenie komponentów z tym, że tylko jeden z nich 'opada' a inne wznoszą się. Opadający np shape (Timer1) shapeX.top := shapeX.top +1; Pozostałe w liczbie przykładowo 5 unoszą się na prostej zasadzie shapeY.top := shapeY.top -1; Jeśli dojdzie do kolizji obu komponentów...

[delphi] Jak obsłużyć błąd Socket error #10060 w Delphi przy użyciu idHTTP?

Witam Nie wiem czy dobrze zatytułowałem post ale chodzi mi o to, że za pomocą idhttp wczytuję sobie stronę do memo. strona.Text:=IdHTTP1.Get('http&#... Zdarza się, że serwer nie odpowiada i przez chwilę zwiesza program po czym wyskakuje okienko "Socet error #10060 conection timer out" czy jest możliwość aby to okienko...

[Delphi] Sprawdzanie istnienia pliku przed pobraniem i automatyczna nazwa pliku

Witam, zrobiłem procedurę: pobiera plik download.rar dzięki 'download.rar' ,fmcreate); ? Dziękuję

[DELPHI] Odbieranie stringów o zmiennej długości w IdTcpClient (INDY 10)

Nie rozpoznaje mi "TIdTextEncoding" co mam dodać do USES aby to działało ? Dodano po 14 Takie coś zastosowałem bo to indy 10: RxBuf := IdTCPClient1.IOHandler.ReadLn(IdGlob... Niestety program się wiesza jakby na coś czekał. Nie wiem czy mam dobrze to osadzone bo te instrukcje znajdują się w Timerze nie wiem czy to tak...

Jak zapisywać dane z Siemens LOGO! do MySQL i wyświetlać je w PHP?

Witam, Może przyda się informacja, że Siemens udostępnił możliwość "wymiany danych" (komunikacja w obu kierunkach) ze swoimi sterownikami po sieci MPI... za pomocą ProdaveMPI. Nie wiem jak z eksportem do MySQL, ale można napisać mały programik w Delphi, C lub VB który "ściągnie" We/Wy, bloki DB, Timery itp. Uniwersalne interfejsy... Już chyba coś takiego...

[delphi] [Delphi] Jak zapętlić odtwarzanie w TMediaPlayer bez zacięć?

Heh, a miałem sugerować użycie timera. :) No właśnie nie zamula. Mimo wszystko przemyśl tą wartość. 1s / 25klatek (zapewne wyświetlany film nie ma więcej) = 0.04s, więc wydaje mi się, że nie ma sensu sprawdzać częściej.

[Delphi] Jak przenieść aplikacje z Windows XP na Vista/7 z użyciem Delphi?

dobra - problemy zbiegły się aż dwa, jeden głupi - zbieg okoliczności od wydajności sprzętu na nowym czystym koncie - jeśli timer się odpalił przed zakończeniem FormShow to jeszcze nie maiał z czego skorzystać :). Problem dostępu jednak jest nadal w innym miejscu. program nie ma prawa utworzyć pliku w swoim katalogu umieszczonym w standardowym folderze...

Jak w Delphi 7 zrobić przycisk do sterowania silnikiem krokowym przez LPT?

Dobra to po wklejałem a teraz muszę zrobić żeby odczytywało obraz z kamerki usb, znalazłem komponent dspack ale nie wiem jak go użyć? Dodano po 1 Nie działa a to jak wklieć? MouseDown i MouseUp + dodatkowo potrzebujesz timera Timer t = new Timer { Interval = 250 }; t.Tick += t_Tick; ... void t_Tick (object sender, EventArgs e) { // zwieksz glosnosc...

Jak przyspieszyć datę systemową w emulowanym Windows XP Pro?

Proponuję prosty program w Delphi, z odpowiednio dobranym timerem, który co 1s zwiększa datę o 1 dzień. Jeśli dobrze zrozumiałem temat :)

Delphi - ruch po okręgu. Jak uwzględnić zmianę kąta w jednostce czasu?

Witam jak najlepiej rozwiązać taki problem. Chce zrobić program w którym kulka poruszała by się ruchem jednostajnym po okręgu. Rozumiem oczywiście ze ruch współrzędne opisać w układzie biegunowym jako y= RsinL , x = RcosL. Zastanawiam się jak rozwiązać problem wizualizacji , tzn jaką Kulke czy to mógłby być np shape? i połozenie określane za pomocą...

Delphi 4: Jak wykonać procedurę co 1s i zrealizować opóźnienie?

w jaki sposob w Delphi 4 zrobic procedure ktora co np 1 s wykonywała by coś, dokładnie chodzi mi o sprawdzenie czy z podłączonego do PC mikrokontrolera przyszły jakies dane, czy robi sie to na Timerze jeśli tak to jak, i jeszce jedno pytanko, jak zrealizować opóźnienie jaka funkcją, w tej chwilo zrobiłem to pętla for ale to na każdym kompie działa inaczej...

Jak przejąć akcję przycisku w innym programie używając Delphi lub C++?

Masz chybanajprostszy sposob przechwycenia uchwytu: procedure TForm1.Timer1Timer(Sender: TObject); var pos:tpoint; uchwyt:hwnd; begin GetCursorPos(pos); uchwyt:=windowfrompoint(pos)... form1.Caption:='Wspolrzedne:' +inttostr(pos.X)+' oraz '+inttostr(pos.Y)+' uchwyt: ' +inttostr(uchwyt);...

Jak napisać procedurę komunikacji DS1820 przez RS232C lub LPT w Delphi/Pascal?

Witam No właśnie gdzie można znaleść przykład? jak napisać szybkiego Timer'a w delphi ten systemowy jest niestabilny i posiada rozdzielczość 1ms. Myślałem żeby napisać to na niskim poziomie ale nie mam doświdczenia w assemblerze. pozdrawiam.

[Delphi + Tcomport] Jak poprawnie odbierać paczki danych 5 bajtów z RS232?

Myślę, że problemem był zbyt długi czas obsługi zdarzenia. W tym wypadku akurat dopisane było więcej poleceń dla pewnych konkretnych danych i tylko po ich 'przyjściu' i tylko przy ich 'odczycie' OnRxChar dzielił pakiet na 2 części. Zastosowałem warunek [syntax=pascal]if count>=5[/syntax] i wyrzuciłem całe przetwarzanie odebranych danych do obsługi timera....

Jak zmierzyć czas z dokładnością 1us w Delphi?

Poszukaj info o "High Performance Timer" (nawet na tym forum było wałkowane kilka razy). Trocze trudniej sie obsługuje, ale powinien zapewnić pomiar z taką dokładnością (niektórzy twierdzą że nawet z wyższą).

Jak dodać regulację głośności i przewijanie utworu w Delphi?

[syntax=pascal] ScrollBar1.Max := graj.Length; ScrollBar1.Position := graj.Position; [/syntax] Z tego co widzę powyższe instrukcje odczytują pozycje suwaka i służą do przewijania utworu. Żeby ustawić własna wartość musisz dać odwrotne przypisanie [syntax=pascal] procedure TForm1.ScrollBar1Change(Sender: TObject); begin graj.Position:= ScrollBar1.Position;...

Chodzi o długość jednej lini komponentu MEMO (Delphi)

Ale widzisz, ten timer bedzie dzialal raz na jakis czas... A zdarzenie OnChange bedzie dzialalo akurat, gdy zajdzie potrzeba. Wiec dlatego takie rozwiazanie jest lepsze. :D

Delphi 7 - aktualizacja danych co 10 sekund, użycie PC Speaker, pobieranie czasu

Odpowiedź do pierwszego pytania: Jest taki komponent jak Timer. Znajduje się on na zakładce System. Posiada on funkcje OnTimer która jest wykonywana co pewien czas. Ten czas ustawiasz nadając zmiennej Interval wartość (w milisekundach). A co do trzeciego to jest funkcja Gettimer. Poczytaj w pomocy Delphi o tej funkcji dokładnie. Mam nadzieje że ci pomogłem.

[delphi] - Chwytanie za "belkę" formy wstrzymuje działanie programu

No tak, może mój mały błąd - zajęcie aplikacji nie pozwoli z kolei odpowiedzieć na próbę przeciągnięcia okna ;) A zasadniczo, że samo z siebie kliknięcie nie wstrzymuje, można sprawdzić poniższym kodem: [syntax=Delphi] procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin Memo1.Lines.Add(IntToStr(Msg.message)); if...

Jak zwiększyć częstotliwość taktowania silnika krokowego w CNC do 7000 kroków/s?

Witam No to po urlopie to pewno masz więcej energii na działanie, a myślałem że już zrezygnowałeś z tego wyzwania :wink: Mam pewien problem z uruchomienie pliku .exe (próbowałem wklejać bibliotekę do katalogu Windows i system32, oczywiście na początku uruchamiałem wszystko w jednym katalogu no ale sam widzisz) :?: Wiesz może co to za błąd? (na moje...

Jak odmierzać czas w programie niezależnie od prędkości CPU?

Z czego możemy skorzystać pisząc program pracujący niezależnie od szybkości wykonywania instrukcji w procesorze? wg mnie nie ma czegos takiego - program to jest wlasnie ciag instrukcji do wykonania dla procesora, jezeli ma wykonac cos szybciej niz trwa wykonanie instrukcji procesora to poprostu tego nie zrobi lub zrobi blednie. obrazowo - masz mikroprocesor...

Jak zbudować rejestrator wejść binarnych na Atmedze z wysyłką do Delphi?

Wystarczy zwykły attiny2313 (chyba że musi być to atmega), przecież ma wbudowany układ UART. Odczytujesz w pętli (albo w przerwaniu timera) stan PinB, dalej, wysyłasz to poprzez UART do komputera.. Do napisania w pół godziny w assemblerze dla kogoś kto dopiero się uczy :) (Mogę Ci pomóc z tym kodem, daj tylko znać na priv...)

Jak załadować i wstrzyknąć DLL z FTP do programu w Delphi?

Masz co najmniej kilka wyjść... 1. Wraper - twój program sam uruchamia grę, co za tym idzie łatwo sprawdzić, czy gra się zakończyła i znikła z pamięci. 2. Timer - sprawdzanie co jakiś, określony czas, czy gra znajduje się w pamięci. 3. Hook na klawiaturę - "ręczne" wywoływanie jakichś zachowań twjego programu, za pomocą skrótu klawiszowego.

[Delphi] Jak poprawić procedurę wyszukiwania w Lazarusie z Firebird?

1. Myślę, że optymalnym jest ustawienie tutaj wyzwalacza/timera - jeśli przez pół sekundy nie naciśniesz klawisza- wówczas przeprowadzone zostanie wyszukiwanie. Nie do końca rozumiem "ale szuka tylko tym zapytaniem " 2. O generatorach słyszałeś? I po to są ID, aby nie przenumerowywać! 3. Strasznie nieczytelny kod. Zamiast kodu apostrofa zdaje się Lazarus...

Delphi: Jak skopiować plik po zakończeniu pracy aplikacji DOS?

Załatwiłem sprawe badając co 4 sekundy (Timer) aktywne procesy, i czy jest NTVDM (WinXP) albo WINOA386 (Win98). Macie jakieś pomysły z przejęciem kontroli nad programem DOS? Ma to wyglądać tak: - program jest uruchamiany - wbijana jest jak z kalwiatury odpowiednia kombinacja znaków w odpowiedniej kolejności, coś w stylu "N, enter, y, enter, 1, enter"....

Dźwięk w Delphi. Odtwarzanie w czasie rzeczywistym?

W Timerze ustawionym na 100ms jest wstawiona procedura wytwarzająca 4410 próbek dzwięku stereo (44100 próbek na sekundę). Próbki są typu Word (0..65535 z wartością średnią 32768). Jak je teraz w czasie rzeczywistym odtworzyć w systemie? Nie chodzi mi o odtwarzanie wav-ów z dysku ani o coś innego podobnego tylko o bieżace odtwarzanie danych generowanych...

Comport w Delphi na laptopie z WinXP - brak wysyłania danych przez RS232

Witam, problem rozwiązany :)a co go spowodowało? A więc: oprogramowanie na PC-ta wysyłało różne tam "dane" co jakiś czas -kilkaset ms -korzystało przy tym z komponentu Timer, jak sie okazało czas odmierzany przez ten komponent na jednym kompie jest różny od czasu odmierzanego przez niego na innym- przy tych samych nastawach oczywiście-dziwi mnie to...

Błąd Undeclared Identifier 'Wpis1' w procedurze Delphi - jak naprawić?

Dzięki pomogło :) Jeszcze jedno mianowicie mam Timer i ustawilem zeby ta procedura wywoływała sie co 2 sekundy. I tak jest ale gdy procedura wylosuje pole które już wcześniej zostało wyloswane i w polu jest już tekst to wtedy dopiero za 4 sekundy procedura sie powtarza a nie za 2. Chodzi mi dokładnie oto że mam kilka pól i chce żeby komputer losowo...

[Delphi] Przesyłanie informacji z programu na stronę

Witam, chciałbym zrobić upload informacji tekstowej na stronę internetową. Znam php/mysql więc chciałem to wykorzystać. Stworzyć 3 formularze: 1. Treść przesyłana 2. Data, godzina 3. Hasło, by wykluczyć spamboty lub/oraz przesyłanie informacji przez niepowołane osoby Całe info leci sobie do bazy mysql. Myślę, że najlepiej by było używać Timera, który...

[Delphi] Wyswietlenie JPG na TImage z użyciem THandle coś w tym stylu

Na formie Form1/ Unit1.pas mam komponent Image1, w module Unit2.pas nie chcę wstawiać Uses Unit1; bo tworzę "pokręconą"/uniwersalną klasę która chcialbym wywoływać z dowolnego modułu; W jednej z procedur np. UmageDraw(const FileName: String); chcę wczytać plik JPG o nazwie FileName i zamieścić go na TIMage albo poprzez uchwyt albo w ostateczności jakoś...

Jak zbudować system zliczania okrążeń dla modeli RC?

Witam Temat odświeżam. Program do lap-timera ( lub do zliczania przedmiotów ( już troszkę napisałem wprawdzie w delphi i sprzęt obsługiwany jest bezpośrednio z lpt , lecz działa. Zrobiłem bramkę laserową i podłączyłem do lpt, testy przeszły i działa. Przeglądnąłem internet i zaczerpnąłem troszkę wiedzy na temat możliwości zbudowania takiego urządzenia,...