tcomport string

Delphi 5: Konwersja stringa z TComPort na integer - błąd usuwania #13#10

Dzieki za odpowiedz, str to zmienna typu string do której ładuje sie liczba wysylana z atmegi w przedziale 1-1024, zakonczona #13#10 Logicznie rozumując, na początku jest pusta.

[Builder C++] BCB6 problem z TComPort i odbiorem danych

Witam! Używam Comport z sukcesem już dosyć długo, ale nigdy nie korzystałem z ReadStr, no i uzywam go w Delphi, ale mam nadzieję że się dogadamy :D: Stan portu masz sprawdzany tylko na początku programu w zdarzeniu FomCreate, a otwierasz go pózniej. Wrzuć na fomę komponent ComLED, w inspektorze obiektów ustaw jego właściwośc Comport na Comport1, LedSignal...

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Jak wysłać dane przez RS232 w Delphi 7 do ATmegi8?

type TForm1 = class(TForm) ComPort: TComPort; [...] ComPort.Open; Str := 'Test' + #13#10; ComPort.WriteStr(Str); //wysyła string if ComPort.Connected then ComPort.Close [...] lub : Var b : byte; [...] b:=25; ComPort.Write(b,1) //wysyla pojedynczy bajt lub ich ciąg [...]

ObjectPascal/Delphi/Lazarus - Utrata danych przy transmisji przy użyciu TComPort

Dokładnie jak kolega wspomniał powyżej. Poza tym, dodam tylko od siebie, że trochę kolega autor tematu namieszał z różnymi typami danych. W zdarzeniu nadejścia znaku ASCII ( OnRxChar ) czyta kolega dane do bufora zbudowanego z tablicy byte? To "niewielka" niekonsekwencja :) Sugeruję zdecydować się na konkretny typ danych (znaki albo bufor danych) i...

Komunikacja USB/RS-232 między Delphi 7 a Arduino - jak to zrobić?

[syntax=delphi]unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ComPort; type TForm1 = class(TForm) CheckBox: TCheckBox; ProgressBar: TProgressBar; RShow: TEdit; Memo: TMemo; ComPort: TComPort; procedure ComPortRxChar(Sender:TObject;Count:Integ... private procedure SetProgressBar(Value:Integer);...

Program obsługujący bazę Access oraz port RS232 COM

Witam, ostatnimi czasy mam syndrom ciągłego braku czasu i nie odwiedzałem forum... wracając do kodu który podałeś wygląda na poprawny... chociaż nie powinienneś stosować Twoj_ComPort.Connected:=True; zaraz po utworzeniu obiektu to po primo a po primo 2 to staraj się korzystać z metod klasy czyli Twoj_ComPort.Open; a nie po przez ustawienie jej właściwości....

[Delphi] TComPort - jak ukryć wysyłane dane w Memo1?

Czy to jest urządzenie twojej konstrukcji ? Jeżeli nie to może tak jest pomyślany protokół w twoim urządzeniu tzn. że zwraca zapytanie a po nim odpowiedź. Przykład: var Source : string; begin Source := '12345678'; Delete(Source, 3, 4); // Delete the 3rd, 4th, 5th and 6th characters end; Wynik: Source '1278'

Jak odczytać dane z AVR przez RS232 w Delphi z użyciem TComPort?

Witam! Mam problem zodczytem danych z RS - wykorzystuje komponent Tcomport, procedury odczytu znalazłem na elektrodzie, jednak mimo wszytko nic mi nie działa. AVR wysyła temperaturę w formacie np. 23.4 (string), jeśli korzytam z emulatora BASCOM lub Hyperterminala wszystko jest OK, dane są poprawnie odczytywane, zaś przez załączony poniżej programik...

[Delphi] Jak poprawnie wyświetlić dane z RS w Memo?

spróbuj to: [syntax=pascal] unit ODCZYTRS; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, CPort; type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; ComPort1: TComPort; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure ComPort1RxChar(Sender:...

Jak wyciągnąć wiele liczb ze stringa w Delphi przy użyciu TComport?

Dzięki, działa świetnie, przy wyświetleniu pierwszej linii w Memo, kolejne linie, które się pojawiają w memo nie są aktualizowane w Lebel*.text, pewnie to banalne ale ja dopiero zaczynam w delphi, poniżej fragment kodu. begin ComPort1.ReadStr(Str, Count); Memo1.Text := Memo1.Text+Str; st:=TStringList.Create; try st.Delimiter:='|';...

ATMEGA32 i DELPHI7 - Pomiar temperatury w DELPHI - 2 czujniki DS18B20.

Witam, Piszę program w DELPHI obsługujący pomiar dwóch czujników DS18B20. Mikro kontroler to ATMEGA32, program w BASCOM. Wszystko ogólnie już działa: wysyłam po UART ciąg znaków jako string i odbieram wybrane przeze mnie znaki o danej ilości funkcją Copy w DELPHI. Korzystam z biblioteki TComPort. Jedyny problem to z Label'i zrobił mi się generator:...

[DELPHI] Uruchamianie programu z usługi systemowej w Windows 7 bez interakcji

Ma ktoś jakiś przykładowy kod z" CreateProcesAsUser" dla delphi bo nie mogę go znalesc:/ Dodano po 2 Próbowałem przenieść kod z procesu na usługę systemową, niestety wystąpiło parę błędów o to kod: unit Unit1; interface uses Windows, Messages, SysUtils,Variants, Classes, Graphics, Controls, SvcMgr, Dialogs, ExtCtrls, Shellapi, IdBaseComponent, IdComponent,...

ATMEGA32 i DELPHI 7 - Błąd EConvertError przy konwersji String na Float

Dziękuj kolego Dżyszla, że w ogóle pomagasz takiemu laikowi jak ja ;) Co do Entera może to być inny znak, który wykryję podczas odbierania paczki ale może być. Przerobiłem program - teraz jeszcze lepszy, ciekawszy błąd który dla laika mówi - wyrzuć komputer za okno... ;D Program się kompiluje ale wywala błąd po uruchomieniu COM. [syntax=delphi] unit...

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

Witam, piszę właśnie obsługę Modbusa (master) w Delphi. Do komunikacji przez RS używam komponentu TComPort. Problem w tym, że około 10% odebranych ramek ma ucięty początek. Procedura odbioru(bez dalszego przetwarzania) wygląda następująco: procedure TFkomunikacja.ComPort1RxChar(Sender&... TObject; Count: Integer); var odebrane:Ansistring;...

Delphi7, CPort3.0 - brak odbioru danych z RS232, uC działa w terminalu

Witam. Mam problem z odbiorem tego co wysyła mi uC za pomocą RS232. W terminalu obieram informacje a w delphi jakos nie odbiera nic. Moze mi powiedzieć ktoś w czym tkwi problem? Kod do delphi: unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, CPort; type TForm1 = class(TForm)...

Delphi - Odbiór danych z ComPort i rysowanie na TImage za pomocą Canvas

Nie działa :( [syntax=delphi] unit Oscyloskop_comport; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, CPort, StdCtrls, ExtCtrls; type TForm1 = class(TForm) BtnOtworz: TButton; Settings: TButton; Wyslij: TButton; EdtMsg: TEdit; ComMemo: TMemo; CBNewLine: TCheckBox; ComPort: TComPort; Image1: TImage;...

Zacinanie transmisji szeregowej w Delphi7 z ADuC812 przez USB i LAN

Pisze w Delphi7 oprogramowanie do komunikacji z procesorem ADuC812 po USB i LAN z wykorzystaniem konwerterów (RS-USB i LAN-USB). Korzystam z komponentu TComPort (wersja chyba 1.6, ale tu nie ma znaczenia). Wszystko jest fajnie, do momentu gdy odbieram wieksza ilosc danych. Po odebraniu okolo 23% danych transmisja sie urywa. Gdy próbuje cos wyslac do...

Jak napisać program w Delphi lub C do odczytu danych z RS 232?

:) Delphi to chyba tylko Borland:) co innego jak bym napisał Turbo Pascal oto mój kod: unit UART; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, CPort, StdCtrls; type TForm1 = class(TForm) BtnOtworz: TButton; BtnSettings: TButton; BtnWyslij: TButton; EdtMsg: TEdit; ComMemo: TMemo; CBNewLine: TCheckBox;...

Obsługa RS miernika Motech MT 4090 w Delphi - dziwne zachowanie w trybie Remote

Witam, Robię obsługę po RS-ie miernika Motech MT 4090. Miernik Ustawiony na Tryb Remote. I teraz kilka dziwnych rzeczy. Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq

[Delphi 7] Podczas odczytu danych z RS232 widać tylko 1 bajt

Witam, próbuję czytać dane z pewnego urządzenia podłączonego do portu COM. Posługuję się wielokrotnie już tu opisywanym komponentem TComPort. Również kod obsługujący poszczególne akcje wiele razy się przewinął. Jest tylko taki problem, że w większości przypadków programy w końcu zadziałały tak, jak chciał autor, a u mnie się zacina. Ale do rzeczy: Po...

[Delphi 7] Jak naprawić błąd kompilacji przy użyciu komponentu Comport?

Witam szanownych kolegów Na wstępie powiem, że jestem początkującym programistą Delphi (tyle co w szkole nauczyli podstaw), a z Rsem w ogóle nie miałem do czynienia. Chce napisać program który będzie zbierał sygnał od miernika (sygnał napięciowy 0-2V). Na początek poszukałem jakiś przykładowych programów do obsługi RSa, żeby w ogóle zapoznać się z tematem,...

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

[syntax=basic4gl]$regfile = "M16DEF.DAT" $crystal = 16000000 $baud = 57600 Config 1wire = Portd.7 Dim Odczyt As Integer Dim T As Single Dim Z As Byte Dim Zn As String * 1 Wait 1 1wreset 1wwrite &HCC 1wwrite &H44 Wait 1 1wreset 1wwrite &HCC 1wwrite &HBE Odczyt = 1wread(2) T = Odczyt - 16 T = T * 10 T = T \ 16 T = T \ 10 Print T Do Z = Ischarwaiting()...

Błąd przy obsłudze portów COM w Delphi z użyciem CPort - jak naprawić?

witam Po napisaniu programu w oparciu o artykół : http://4programmers.net/Delphi/Artykuły/... napotkałem na błąd, który wyskakuje za każda próbą naciśnięcia przycisków otwórz, i wyslij,a także przy próbie zatwierdzenia settingu cportu. ten błąd to http://obrazki.elektroda.net/23_12358278... różni...

[Delphi 7] - Przesyłanie wsadu przez port COM do bootloadera - konwersja stringu

Witam, piszę program do przesyłania wsadu przez port COM do Pierwszy problem: Udało mi się przerobić format IntelHex na bajty danych. Niestety te bajty danych są zapisane w postaci tekstu, a ja muszę je wysłać do mikrokontrolera w czystej postaci bajtów danych (nie wiem jak to inaczej napisać?) i nie wiem jak to zrealizować . Zwykle komendy wysyłam...

[Delphi 7] Problem z odczytem danych z miernika na RS232

Witam wszystkich Na początku chce zaznaczyć, że dopiero zaczynam zabawę z RSem i programowaniem. Chce napisać program który odczytywałby sygnał napięciowy (powiedzmy 0-2 VAC) i pokazywał go w formie wykresu. Póki co do wykresu nie doszedłem wiec to zostawmy. Troszkę zmodyfikowałem gotowy program znaleziony na necie, dzięki pomocy z innego tematu odpaliłem...

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

A to przez USB jest? To sprawdź, czy masz sterownik poprawny. W końcu już się wkurzyłem i zrobiłem kilka eksperymentów Najpierw zacząłem wysyłać dane przez terminal i także było źle potem dopisałem do wysyłanych danych #13#10 do wysyłanych i zapętliłem program sprzętowo , i także źle W końcu "zapętliłem" dwa wynikowe programy na dwu różnych komputerach...

[Builder] Jak zapisać i przywrócić wybór portu COM w TComPort?

Rozwiązałem problem przez pliki ini. Robię tak: Mam plik ini: TIniFile *Ini = new TIniFile(ExtractFilePath(Applica... + "ustawienia.ini"); W zdarzeniu OnExit komponentu ComComboBox1 zapisuje wybrany przez urzytkownika port: Ini->WriteString("ComPort1&q... "Port", ComComboBox1->Items->Strings[C...

[DELPHI] Jak wysłać obrazek do przeglądarki za pomocą HTTPServer?

Wiadomo skąd w końcu nie pierwszy raz jestem na elektrodzie pozatym ten kod działa z tym że dokument html drogą prób i błędów udało mi się zrobić bez zapisu na hdd natomiast obrazki nadal są zapisywane na hdd Dodano po 2 A bo ten kod co napisałeś jest "za remowany". wywale komenty wszystkie i kleje jeszcze raz. Program to jest beta wiec kilka rozwiązań...

[BASCOM]Atmega8 + UART - Różne działanie AtMegi w zależności od Terminala

Witam, Próbuje zrobić układ dzięki któremu przy pomocy komputera z portem szeregowym RS232 będe mógł sterować urządzeniami podłączonymi do zewnętrznego układu z mikroprocesorem AtMega8. Układ ma za zadanie odbierać komendy z PC w formacie #X.Y gdzie X - numer kanału, Y (1 - włącz, 0 - wyłącz) np #3.1 - Włącz kanał 3. Układ został już zmontowany. Póki...

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

Właśnie ;\ To na początku nie jest takie proste. Może dla niektórych nie zabrzmi to szaleńczo, ale udało mi się zapalać diody (raz jedną, raz drugą, w zależności od przycisku), a także je gasić. Kombinowałem w drugą stronę, ale nie wychodziło za bardzo. Chciałem z procka przesłać póki co dowolną wartość, aby mi się w labelu wyświetliła. Niestety - brak...

Jak dynamicznie utworzyć i skonfigurować ComPort RS232 w Delphi?

Witam. Mam problem z dynamicznym utworzeniem komponentu ComPort. Mój kod wygląda następująco: procedure TForm1.FormCreate(Sender: TObject); begin Twoj_ComPort:=TComPort.Create(ni... Twoj_ComPort.Connected:=True; Twoj_ComPort.Port := 'COM1'; Twoj_ComPort.Events := [evRxChar]; Twoj_ComPort.BaudRate := br9600;...

Jak sprawdzić działanie programu sterującego suwnicą przez port LPT?

Witam, mialem za zadanie napisac program ktory bedzie pobieral dane z podanego wczesniej URL (10 razy na sekunde) i wysylal te pobrane dane na port LPT. Z kolega tworzymy taka mala suwnice... Program napisalem, wydaje sie ze dziala ... z url sie laczy 10 razy na sekunde ale nie wiem czy wysyla te dane na LPT bo w kompie nie mam tego portu, w zwiazku...