Witam, próbuje zainstalowac do delphi7 komponent comport, niestety w trakcie kompilacji wyskakuje mi następujący błąd: [Fatal Error] CPortLib7.dpk(43): Could not create output file 'C:\Program Files\Borland\Delphi7\Source\Com port\CPortLib7.dcu' czy ktoś może mi pomóc? z góry dzięki
Cześć Komunikację realizujesz gotowym komponentem ComPort Library czy sam napisałeś procedurę ? Pozdrawiam
powinno być 6 komponentów w palecie CPortLib: ComPort - podstawa ComDataPacket ComComboBox ComRadioGroup ComLed ComTerminal u mnie w Delphi7 czy Delphi5 instaluje się zawsze bez najmniejszych problemów i zająknięcia... może jednak coś tam źle robisz przy instalacji... poćwicz to jeszcze pozdrówka
Chodzi o to że czasami odczytujesz nie cały wiersz lecz jego fragment. [syntax=delphi]var P:Integer; begin ComPort.ReadStr(Str, Count); Memo.Text:= Memo.Text+Str; P:=Pos(#13,Str); if P>0 then begin Str:=Memo.Lines[Memo.Lines.Count-2+Ord(P... T1:= Copy(Str,1,4); T2:= Copy(Str,6,4); Label3.Caption:= 'Temperatura IGBT [T1] = '+T1; Label2.Caption:=...
Mam jeszcze taki oto problem. Oczytujac dane z RS232 i wyswietlajac je w Memo chcialbym w odpowiednim miejscu stawiac znak nowej lini czyli enter. Mam taka procedure ktora powinna odbierac dane z portu com i wyswietlac go na memo z uwzlednieniem znaku entera w odpowiednich miejscach http://obrazki.elektroda.pl/8649544300_1... jak pozbys...
Krzychoocpp: No tak, faktycznie źle użyłem funkcji. Szukałem teraz jakichś info o wątkach (jest to temat dla mnie nieznany - nie wiem jak uzywac itd), niestety nie znalazłem żadnego wyjaśnienia. Jeśli temat nie jest zbyt obszerny, mógłbym prosić o info jak (na moje potrzeby)wystartować nowy wątek? Szelus: tak, baud 115200. Używam komponentu o nazwie...
Zrobilem cos takiego aby sprawdzic ComPort.ReadStr(Str, Count); Label11.Caption:=IntToStr(Length... Label10.Caption:=Str; I w rezultacie: Label11 wyswietla: 12 Label10 wyswietla: ,M,,M,,*78 co daje tylko 10 znakow :/ małe pytanko jaka komęda otwiera plik do aktualizacji chodzi mi o to ze otwiera plik i zapisuje w...
bartek_kawa -> ok zamieszczam tu swój kod w Delphi7, musisz jednak mieć komponenty ComPort oraz SerialPortNG - można je zassać z netu. Ale uprzedzam, że to tylko kod roboczy. Nie dość, że pisany troche bez składu i ładu - byle tylko coś zadziałało na początku to jest praktycznie bez żadnych komentarzy. Co najgorsze nie pamiętam już jak podłączałem...
Witam Staram się pomóc osobie nie pełnosprawnej w obsłudze kilka okien aplikacji. Osoba nie posługuje się myszka. Jaki problem? Bez problemu mogę uruchomić 3 programy np: Notatnik, Explorer,E-mail Problem polega poruszanie się miedzy oknami aplikacji. Jeżeli mam uruchomiony maksymalny rozmiar okna np: Notatnika to osoba ma problem z przeskoczeniem do...
[17:25:23:468] - Open COM1 port (Z:\Aps..exe) [17:25:23:906] - Written data 5b 03 05 ab c9 [..«É [17:25:23:984] - Read data 03 06 35 95 ..5• a tu nic nie odbiera [17:28:28:328] - Open COM1 port (D:\Program Files\Borland\Delphi7\Projects\dsc\Proje...
Witam! A może tak coś złapiesz?? procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer); var Bajt:Byte; i:Integer; begin for i:=1 to Count do begin ComPort1.Read(Bajt,1); Memo1.Lines.Add(IntToStr(Bajt... end; end;
Witam, oczywiście ty też nie zrozum mnie źle, nie czepiam się tylko wypytuję (fakt nie zauważyłem że to nie twoje posty w tych linkach ale....) rozumię, że na twojej formie położyłeś poprostu buttona , ListBoxa oraz OpenDialog'a ??? (czyli nic dynamicznie po drodze nie tworzysz?) i to wszystko? tak? - efekt jest powtarzalny z tym accesviolation za każdym...
ComComboBox za nic nie chce zmieniać parametrów ComPort'u. Źle ustawiłeś właściwości tej kontrolki. Najważniejsze są dwie właściwości; ComPort i AutoApply. Ustaw tak jak tutaj i będzie OK; http://obrazki.elektroda.pl/8772837700_1...
Namieszałeś z instalacją. Nie wyczyściłeś dokładnie dclusr70. Zobacz tutaj : [url=http://www.elektroda.pl/rtvforum/to... Jest tam dokładnie opisane jak ten problem naprawić. I jak zainstalować poprawnie ComPort.
Witam! Tak nie będzie działać. Wczytujesz Count(nie zawsze musi być 1) bajtów do zmiennej która jest pojedyńczym bajtem. [syntax=delphi] for i:=1 to Count do begin ComPort1.Read(z,1); Memo1.Lines.Add('0x'+IntToHex(z,2); end;[/syntax]
No to masz odpowiedz. Ustaw na false
A nacisnąć F1 i zerknąć do pomocy to nie łaska? procedure Delete(var S: String; Index: Integer; Count: Integer); Description Removes a substring from a string. In Delphi code, Delete removes a substring of Count characters from string S starting with S
Dodaj na górze w type pod procedurami przycisków to: procedure ComPortRxChar(Sender : TObject; Count: Integer);
ten błąd o jakim piszesz jest tak myślę gdzieś w twoim kodzie a nie w komponencie. Ten komunikat mówi o tym, ze prawsopodobnie w jakiejś stringliście lub tego typu próbujesz się odwołać do stringu o indeksie, który nie istnieje. To typowy błąd dla tego typu operacji a nie błąd ComPortu - bo w nim samym wątpię i prawie jestem pewien, że przy żadnej okazji...
comport.readstr nie odczytuje calego bufora ,tylko tyle danych ile podasz mu w drugim parametrze, chyba ze podasz mu count z procedury czyli caly bufor. comport tworzy bufor (sam masz wplyw na jego wielkosc) i opiera sie na winapi, wiec wie ile danych zabuforowal. jezeli chodzi o onrxchar ,to nie wie czy cala ramka zostala przeslana poprostu informuje...
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...
Wpisuję: Int := 1 + #13#10; ComPort1.Write(Int); Wpisz : var int : array[0..2] of byte; begin int[0]:=1; int[1]:=13; int[2]:=10; ComPort1.write(int,3); end;
Taką prędkość ma protokół w Gilbarco. Bardzo dziękuje za pomoc. Temat zamykam.
Nie pomaga. Aby program działał prawidłowo, musi być enter(#13#10). Dodano po 1 Obecnie używam przejściówki z USB na RS232. Może w tym tkwi problem. Spróbuję układ podłączyć bezpośrednio do RS.
Witam, Mam program, który pobiera mi z procka jakieś dane. Za pomocą funkcji ComPort1.ReadStr(RevS,5); pobieram 5 bitów jakiejś informacji. Jednak mam wrażenie, że kolejne bity są doklejane do pozostałych już odczytanych. A ja chcę, żeby przed każdym wywołaniem funkcji bufor był czyszczony. Nie wiem czy moje rozumowanie działania RS232 jest prawidłowe....
Może tak: [syntax=delphi] procedure TfSterowanie.ComPortRxChar(Sender: TObject; Count: Integer); begin if count>=20 then Repeat ComPort.ReadStr(bufor, 20); fKonsola.Memo.Text:=fkonsola.memo.text+'... '+bufor+' '+inttostr(count)+#13#10; if fkonsola.Memo.lines.Count>19 then fkonsola.Memo.Lines.Delete(0); przetwarzanie; Until count <20;...
Z tego co wyczytałem to ComPort sam ma wykrywać jakie porty są widoczne i tak też robi... przy czym zamiast podać ich numery to tak jak widać na zdjęciach powyżej wyświetla tylko przedrostki COM. Co do ilości portów to się zgadza.
Witam Korzystam z komponentu ComPort do przesyłania danych na port com. Przed przesłaniem danych korzystam z comport1.open, po przesłaniu daję comport1.close. Dane przesyłane są prawidłowo, ale jeśli po przesłaniu danych ponownie użyję przycisku, który wysyła dane, aplikacja się zawiesza i dane nie są wysłane. Dopiero jak wyciągnę wtyczkę z portu program...
Wskazana linja wyraźnie mówi, że plik którego używasz jest przystosowany do Delphi 6 i nowszych. Jeżeli chcesz skompilować bibliotekę z Delphi 5, to powinieneś ten plik pobrać z odpowiedniego katalogu i nadpisać ten obecny.
Poradziłem juz sobie :) Wystarczyło w ustawieniach ComPort ustawić opcje: ControlDTR: dtrEnable ControlRTS: rtsEnable Pozdrawiam i zamykam temat.
Witam, Musze napisac kawalek programu robiacy: Inicjalizacja transkisji, wysylanie 260 bajtow kodu aplikacji a nastepnie po jakis 3 sekundach odbior 256 bajtow danych. Zrobilem to tak: comport1.connected:=true; comport1.clearbuffer(true,true); command:=$0B; // bootloader comport1.Write(command,1); comport1.Write(rdata_loader,260); // zaladuj kod do...
Witam! Jak w ComPort w Delphi odebrać z bufora np. 300 odczytanych znaków? Jak zmusić ComPort aby przeczytał i załadował do bufora określoną liczbę danych? Pozdrawiam.
Witam, do wysyłania poleceń z pod delphi używam dokładnie tej funkcji, którą przytoczyłeś w poprzednim poście (com2.SendStr(command + #13#10);) a do odbierania (Bascom) funkcji Input zmienna; Myślę, że umieszczenie całego kodu tylko utrudniłoby rozwiązanie problemu, gdyż jest dosyć długi i pokręcony (min. brak komentarzy (jest to część programu sterującego...
Witam Poszukuje rozwiązania jak sprawnie zorganizować komunikację na RS bardzo mi się podoba pomysł zapożyczony z magistrali Bus Na przykład wysyłam ramke 0x50 0x04 0x68 0x28 0x2F 0x3B. - 1. Pierwszy bajt jest Identyfikator/adress źródła, w tym 0x50 w przypadku który jest Klawiatura, - 2 Bajt 0x04 oznacza ile jest bajtów samej wiadomości. - 3 Bajt,...
Sleep to sztuczne opóźnienie w programie (zawiesza działanie). np Sleep(100) daje 100ms opóźnienia. Przydaje się to często przy transmisji z różnymi urządzeniami. Ja ostatnio używałem tego, aby nie zapchać sterownika- urządzenia czyli jak wyślę mu naraz masę poleceń to potrafi się zagubić, bo nie nadąży analizować nadchodzących danych. Wystarczyło 50ms...
Dzieki za odpowiedz. Sprobuje skorzystac z twojej porady i napisze co udalo mi sie osiagnac. Wlasciwie blokowanie odbioru podczas wysylania faktycvznie bede mogl zrealizowac programowo. Problem polegal ze mam modem ktory daje mi echo, ktorego nie moge wylaczyc. Napisze co udalo mi sie zrealizowac.
Ja nie zrozumałem. Image1->Canvas->Pixels Dodano po 16 Podaj jakis przykład wtedy nawet ja w innym stanie (nie jestem kobietą) zrozumiem.
Witam. Próbuję odczytać poprzez ComPort ramkę tzn. ze stringami nie ma problemu, ale ramka wysyłana jest w postaci: byte 01 03 00 00 00 02 C4 0B. ComPort.Read(dane, Count); ale jak dane przepisać np. do: Buffer_I : ARRAY [0..20] of byte;
Witam Mam taki problem z komponentem Comport(program w delphi) pracującym na laptopie z winXP: a mianowicie program nie wysyła danych przez RS-a, odbiór jest możliwy. Czy ktoś wie czemu sie tak dzieje? Zaznaczam ze ten sam program na zwykłym PC działa (wysyła dane) zarówno na win 98 jak i Xp. pozdrawiam i z góry dzięki.
Witam Bardzo dużo informacji na ten temat znajdiesz na www.elektroda.pl wystarczy poszukać :) W razie problemów pomogę. Pozdrawiam.
Kurka, pomoże ktoś? Zbudowałem ten układ. Na Waszych programikach oraz tych z chipa działa bardzo dobrze. Próbuję wysłać Delphi'm komendy i nie rusza. Wysyłam tak: comport1.WriteStr('255 0 0 0 0 0 0 0'); Port otwarty, dioda nie reaguje :(
Witam, mam delikatny problem z zainstalowniem komponentu COMPORT3(1). do delphi5, błędy dotyczą pliku gnugettext.pas, prosze o pomoc Bardzo proszę o logiczne i zgodne z regulaminem tytułowanie tematu. Nadużywasz słowa 'pomoc' - nie jesteś ważniejszym od innych użytkownikiem forum, każdy, kto tu zakłada nowy temat, ma z czymś istotny problem... A "pomoc",...
Zamieszczam źródło programu sterowania urządzeniem podłączonym do RS232 i sterowanym poprzez plik *.txt na serwerze www. Może to nie na temat ale program zawiera w sobie: - pracę z wątkiem (TThread) - obsługę RS232 - obsługę pliku *.txt - obsługę połączenia z serwerem www czyli wszystkie (nawet więcej) potrzebne w Twoim projekcie informacje. Weź z niego...
Problem w tym, że ja nie otwieram tych samych portów ...
Witam! Udalo sie komus zainstalowac komponent cport http://sourceforge.net/projects/comport w delphi 6?? mam z tym spory problem.. ciiagle wyrzuca jakies bledy np: [Fatal Error] DsgnCPort6.dpk(32): Bad file format: 'c:\program files\borland\delphi6\Lib\designide.dcp' poradzil ktos sobie z tym?? ps. screeny innych bledow jakie wyrzucalo prz probie kompilacji/instalacji...:...
Witam Mam program w którym wykorzystuje komponent ComPort. Po skompilowaniu (oczywiscie odznaczone mam Use Dynamic RTL i Build with runtime packages) program uruchamia sie na innych komputerach ale mam problem z obsluga portu. Dane co prawda sa wysylane ale odpowiedzi najprawdopodobniej nie wywoluja zdarzenia OnRxChar. Na komputerze gdznie mam zainstalowanego...
Witam. Pomimo wielu prób nie moge zainstalować komponentu comport do delphi2007. Oczywiście otworzyłem plik readme i starałem się podążać zgodnie z instrukcją, a więc rozpakowałem cport wziełem sources wypakowałem w folderze lib w delphi (co prawda w instrukcji było aby stworzyć swćj folder i następnie dopisać ścieżke wyszukiwania w delphi ale widziałem,...
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;...
comport string instalacja comport comport write
fujitsu czujnik wchodzić obrót renault scenic instalacja fiata
yamaha kanał ciszej pilot zgemma
Peugeot Expert Tepee VIN VF3XCAHZ4EZ012784 – lokalizacja bezpiecznika spryskiwacza szyb Electrolux Intuition 63020X Dishwasher ESF/ESI Models: Specs, Faults, Manuals, Parts
