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
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...
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
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. 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)...
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...
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:=...
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...
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]
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...
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...
No to masz odpowiedz. Ustaw na false
Zrób tak jak pisze autor w pliku readme. Ja używam tego komponentu w bcb6 i instaluje sie bez problemu. Co do zasady działania to polecam przejrzeć example. W skrócie: wysyłanie : ComPort1->WriteStr("bebebe"); odbieranie alebo w samym comporcie w zdarzeniu OnRxChar albo w kompnencie równolegle instalowanym o nazwie ComPortPacket w zdarzeniu OnPacket.
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.
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...
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);
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...
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...
Witam. Ściągnij sobie komponent comport. Na forme wstaw 2 x memo, 1 x edit, 3 x buton i comport. 'button1 do łączenia i rozłączenia 'button2 do wysyłania 'button3 do ustawienia portu 'edit1 do wpisania tekstu jaki chcesz wysłać 'memo1 do odebrania tekstu 'memo2 do "pomocy" ustawione jako niewidoczne 'zdarzenie do ustawienia portu procedure TForm1.Button3Click(Sender:...
Witam, najprościej chyba będzie wrzucić dodatkowe trzy kontrolki ComPort, będziesz miał wtedy ComPort1,ComPort2,ComPort3,ComPort4, i teraz albo masz jedna procedurę (zdarzenie) podpiętą pod wszystkie kontrolki albo dla każdej osobne zdarzenia, lub też bardziej zamotać i zrobić tablice obiektów TComPort i kombinować w tym kierunku. Trudno mi tak z fusów...
W tej paczuszce jest wszystko czego Ci potrzeba: pliki do chyba wszystkich wersji Delphi, instrukcja instalacji, przykłady. Poczytaj a jak cos nie będzie jasne to wołaj. http://www.elektroda.pl/rtvforum/viewtop... http://www.elektroda.pl/rtvforum/viewtop... A w ogóle to wpisz w elektrodzie ComPort i dowiesz się wszystkiego...
Ok poprawiłem kody. Powinno dać się skompilować. Jakby coś nie tak, to spróbuj wywalić pliki CFG i DOF. Jak to nie pomoże to stwórz aplikację od nowa. 1 przycisk i kontrolka ComPort. Zawartość metody Button1Click możesz sobie spokojnie skopiować z załączonych kodów.
Tak sobie obejrzałem instrukcję obsługi do ComPort i widzę, że kolega chyba go źle używa. Po wykonaniu ComPort.Open; on sam będzie wywoływał (jak mniemam obejrzawszy dołączone do komponentu przykłady) ComPortRxChar za każdym razem, gdy pojawią się nowe dane. Parametr Count tej procedury to liczba bajtów, które są gotowe do odczytania. Tak więc ComPort.Open...
Właściwie to wszystko poprzednio już napisałem. Po zrobieniu tego wszystkiego o czym poprzednio pisałem w obsłudze zdarzenia OnPacket piszesz np. [syntax=delphi] procedure TForm1.ComDataPacket1Packet(Sender: TObject; const Str: String); begin chart1.Series[0].Add(StrToFloat(Str); end; [/syntax] lub robisz co chcesz ze stałą Str w której masz tylko tą...
Nie mogę zlokalizować gdzie jeszcze i w jakim plik muszę zmodyfikować Nie trzeba nic grzebać w komponencie. Niestandardową prędkość ustawia się w programie taką sekwencją: [syntax=delphi] ComPort1.BaudRate:=brCustom; ComPort1.CustomBaudRate:=5787;[/syntax] Ale drugą istotniejszą sprawą, jak już sygnalizował kolega wyżej, jest to czy dany interfejs...
Przyklad: ramka ma 50 bajtow, w buforze masz 60 bajtow, poprzez ComPort1.ReadStr(odebrane,Count); odbierasz 60 bajtow ,czyli 50 ramka +10 nastepnej ramki, dlatego pytalem co robisz z odebrane , bo jezeli przetwarzasz pod wzgledem tylko jednej ramki (50 bajtow) , to te 10 idze do smietnika. przy nastepnym odczycie bufora masz wlasnie ramke z ucietymi...
Wczytujesz hex do komponentu memo1 (musi mieć zaznaczoną opcję WordWrap=False żeby nie zawijał tekstu) wysłanie przez komponent Cport for i := 0 to Memo1.Lines.Count - 1 do begin st := Memo1.Lines.Strings[i]; If length(st) > 0 then begin st := st + #13; ComPort1.WriteStr(st); delay(400); // moja procedura...
w Delphi na początku robiąc coś z RS232 warto się pobawić z jakimś gotowym komponentem do tego a jeśli już się troszkę więcej umie to warto napisać swój własny komponent. odnośnie takiego komponentu do RS232, który byłby dobry a na dodatek free - to z czystym sercem polecam ComPort. Znajdziesz go na www.sourceforge.net - działa wyśmienicie a na dodatek...
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;
A komponent nie ma procedur obsługi zdarzeń?? Lepiej wrzuć comport1.read w taką procedurę. Nie wiem co to za komponent, ale może ma coś jak obsługa zapełnionego bufora odbioru? Ustawiasz bufor na 260 i robisz odczyt w zdarzeniu.
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.
[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);...
Sprawdziłem przed sekundą - zawiesza się na open. Kod jest prosty - jest to przesłanie sygnału do drukarki fiskalnej poprzez comport1.writestr(...). Przed wysłaniem jest open a po wysłaniu close. Dla powyższej próby rozpisałem to na trzy buttony - 1.open, 2.writestr, 3.close - program stanął po kliknięciu open.
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.
Numeru portu gdzieś nie podajesz. Chyba nie myślisz, że ktoś będzie ściągał całe archiwum i jeszcze punkty za to oddawał.
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....
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...
Szukaj pod hasłem ComPort http://4programmers.net/Delphi/Artyku%C5... http://sourceforge.net/projects/comport/
Komponent to ComPort na Sourceforge, drukarka Posnet, nie znam modelu ale chyba wszystkie kompatybilne z emulatorem DFEmul. Nie mam dostepu do drukarki a jedynie wysylam do portu i sprawdzam na emulatorze.
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.
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.
Poradziłem juz sobie :) Wystarczyło w ustawieniach ComPort ustawić opcje: ControlDTR: dtrEnable ControlRTS: rtsEnable Pozdrawiam i zamykam temat.
Witam, do odczytu z ComPort-a proponuje wykorzystać event OnRxChar lub OnRxBuf ( nie testowałem ), cos w ten deseń: procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer); var bufor : array [0..1023] of char; begin ComPort1.Read(bufor,Count); Label1.Caption:=bufor; end; Pozdrawiam
Prosiłbym o część kodu w Arduino i Delphi W delphi użyłem w komponencie ComPort , procedury procedure TForm1.CPortRxChar(Sender: TObject; Count: Integer);
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 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,...
Jaki system, które Delphi, jaka wersja ComPort-u i co najważniejsze: jakie stertowniki dla FT232R; VCP czy natywne?
... trochę źle podałem nazwę kmponentu (zapamiętałem zakładkę w Delphi z nim) ... komponent to ComPort a poniżej dokładny link skąd go można pobrać http://sourceforge.net/search/?type_of_s...
comport wylicza nawet otwarte porty z tego co widac zainstalowane porty pobiera cobie z rejestru... procedure EnumComPorts(Ports: TStrings); var KeyHandle: HKEY; ErrCode, Index: Integer; ValueName, Data: string; ValueLen, DataLen, ValueType: DWORD; TmpPorts: TStringList; begin ErrCode := RegOpenKeyEx( HKEY_LOCAL_MACHINE,...
Witam, w załączeniu przesyłam błędy jakie się pojawiają przy compilacji COMPORT3
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;
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;...
Witam Bardzo dużo informacji na ten temat znajdiesz na www.elektroda.pl wystarczy poszukać :) W razie problemów pomogę. Pozdrawiam.
a czy zna ktos taka funkcje w vb? moge prosic o podeslanie kawalka kodu z tym sleepem do odbierania? obojetnie w jakim jezyku odpowiadam sama sobie;] w razie gdyby ktos potrzebowal w vb: System.Threading.Thread.Sleep(1000) nadal prosze o podeslanie tego kawalka kodu
Witam. Kabel , port w laptopie jak i max na pewno są sprawne. Jak pisałem powyżej na innym systemie /kompie program i urządzenie działa, to czy dane wychodzą stwierdzam po zachowaniu się urządzenia które ma być z tego portu sterowane. Dlatego tez zakładam ze problem wynika z niechęci do współpracy tego komponentu z laptopem, chyba że jeszcze może być...
włącz w komponencie ComPort buforowanie danych.
Spróbuj tego (używam go osobiście): http://sourceforge.net/projects/comport/
Ostatnia dobra wersja ComPORT i świetnie działająca to 3.1 a do zassania masz ją za free z: http://sourceforge.net/project/showfiles...
ja kożystam z COMPORT LIBRARY 3.0 jak to w tym zrobić próbowałem z tym ale coś niechodzi dzięki
Witam Ściągnołem sobie biblioteke ComPort : http://www.delphi32.com/vcl/5678/ http://sourceforge.net/projects/comport/ Zassaj z powyższego. To właściwie najważniejsza kontrolka do RS232c pod Delphi / C++ Builder.
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...:...
Ja znów polecam komponent ComPort. Prosta i bezproblemowa transmisja poprzez COM'a. Co do twojego kodu popróbuj z opóźnieniami rzędu 250-300ms. Miałem kiedyś ten sam problem i sllep'y pomogły ;) powodzonka
Ja do transmisji uzywam w Delphi komponent Comport. We właściwościach jest tam coś takiego >Timeouts<, ale nigdy tego nie uzywałem. Czy w strukturze DCB jest coś takiego?. Może tam trzeba coś wyzerować?
Problem w tym, że ja nie otwieram tych samych portów ...
Zastosuj ComPort Library, który znajdziesz tutaj: http://sourceforge.net/project/showfiles... Osobiście go używam i nie mam z nim problemów. Spróbuj, może nie warto "bić" się z CiaComPort. Pozdrawiam...
Witam Na PC piszę program w Delphi i do komunikacji przez RS232 używam komponentu CPort (ComPort). Gdy przesyłam do uC tzw. "znaki sterujące" ( kody od 0 do 32) to dzieją się dziwne rzeczy np. przed znak nr. 13 wstawiany jest znak nr. 10 itp. Chcę to wyłączyć aby uC odbierał takie znaki jak ja wysyłam z PC i odwrotnie. Jak to zrobić? Wojtek
Nic takiego nie ma ;\ Hm. 'OnRxFlag'? I to dobra konstrukcja? If comport1.OnRxFlag = 1 then coś tam ?
Już to kiedyś robiłem z tą małą różnicą, że wysyłałem dane na RS. Aby wysłać to na LPT wystarczy zamiast komponentu ComPort użyć SmallPort i dokonać kilku zmian w procedurach. http://www.elektroda.pl/rtvforum/viewtop... Pozdrawiam...
Witam, pod linkiem masz wersję poprawioną (3.10). Komponent jest pod Delphi 3, 4, 5, 6, 7, 2005, 2006 oraz C++ Builder 3, 4, 5, 6. Instalacje wykonaj według opisu w pliku readme.txt. Link do pliku: http://sourceforge.net/projects/comport/ Starsze wersje były pisane niezgodnie z zasadami tworzenia komponentów. Pozdrawiam ArteXL
zmień na: [syntax=delphi]Delete(StrOdb, 1, 4);[/syntax] Czy od odbioru pierwszych danych jest to echo ? czy pojawia się dopiero przy odbiorze drugiej danej ? na końcu procedury odczytu z COMa można wyczyścić bufory - w C++ Builder linijka wygląda tak: [syntax=cpp]ComPort1->ClearBuffer(true, true);[/syntax]
witam A uzywałeś może komponentu o nazwie ComPort ver.3 jeśli nie to polecam. Chodzi pod XP i moze odbierać i wysyłać nawet z 256000Kb (nie testowane). W załączniku masz ten komponent, a właściwie jego żródła a reszta jest wyjaśniona w README.txt Pozdrawiam Piotrek
Witam serdecznie; Wiem ze ten temat był kilka razy juz poruszany, ale niestety nie mogę sobie poradzić z zainstalowaniem komponentu Cport... Mogłby mi ktos napisać tak w łopatologiczny sposob jak to zrobic.. Komponent pobieram ze strony: http://sourceforge.net/projects/comport/ Z góry dziękuje za pomoc
Witam, Proponuje zostać przy Turbo Delphi Explorer i dynamicznie tworzyć komponenty typu ComPort, jeśli chodzi alternatywne technologie dostępu do baz danych to jest bardzo dobry, szybki i darmowy ZeosLib, nie pamiętam ale w wersji explorer możliwe że jest ado (nie pamiętam więc nie chcę wprowadzić w błąd). Pozdrawiam
Ogólnie chce napisać program, który będzie sterował dwoma przekaźnikami (napięcie zależy od tego jakie przekaźniki kupię, myślę że na 5V), przekaźniki mają działać jako wyłączniki chwilowe, a to będzie wykorzystane w ukłądzie sterownika silnika krokowego. Sam układ jest zasilany napięciem 12V, natężenie 0,15A (tyle pobiera sam silnik), nie wiem czy...
Witam, jak korzystasz z komponentu Cportlib to pod event ComPort1RxChar podpinasz taką procedurke: procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer); var strtmp : string; begin ComPort1.ReadStr(strtmp,Count); Memo1.Lines.Add(strtmp); end;
Do napisania takiego programu nie potrzeba jakiś super umiejętności programistycznych i ogromnej ilości czasu:D Proponuję jakieś środowisko prog. - Builder, Visual, Delphi etc. Ja osobiście takie rzeczy robiłem w Delphi. Do tego polecam jakiś komponent (najpopularniejszy: COMPORT) badź kontrolkę ActiveX. Przeczytać help i wszystko będzie jasne:) W ogóle...
już mi ręce opadają - z delphi dlaczego jak nie ustawie na hardware tylko zostawię bez kontroli przepływu to comport działa nie tak jak powinien? poza tym jak z bascoma wyśle printbin 5;4;3;40; itd (czyli konkretne wartości ) to delphi odczytuje Ok jak wyśle jako zmienna to jest do bani - i wszystko sie krzaczy - żeby było śmieszniej to za pomocą programu...
co do tematów na forum i comport-u to od tego zaczęłam teraz jestem na etapie próby wysłania do czujnika konkretnej informacji z poleceniem odesłania wyniku pomiaru. Czujnik: PR-10X/0.2bar/81634.7 Według "instrukcji" polecenie powinno być 8 bitowe i zawierać DevAddr | 0, Function code | n byte parameters (optional) |CRC16_H | CRC16_L nie wiem jak te...
W takim razie procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer); var znak:byte; begin if count>=3 then begin comport1.Read(znak,1); if znak>127 then begin dana[1]:=znak and 127; {maskuję bit 7 aby dostać "czysty" numer rozkazu} comport1.Read(znak,1);{czyt...
Uzywam pod builderem c++ i delphi kontrolki... chyba sie zwie Cport, czy comport (dokladnie napisze jak wroce z pracy) z pewnoscia dziala takze pod VB. Tez dlugo szukalem niekomercyjnych kontrolek, nie znalazlem nic z activeX. http://search.msdn.microsoft.com/search/... Jesli czujesz sie na...
Witam, robię projekt, w którym potrzebuję skomunikować się jednostronnie przez rs232 tzn. chce przesyłać dane od urządzenia do PC'ta i tam je wizualizować. Jednak programista w delphi ze mnie mizerny, w sumie moim największym problemem jest to, że nie wiem jak taka komunikacja musi wyglądać, aby była poprawna. Z urządzenie chce wysłać kilka wartości...
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...
procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer); Masz coś takiego jak Count. Spróbuj w pętli robić ComPort.ReadStr(Str, Count); Memo1.Text := Memo1.Text + Str; Powtarzaj pętlę Count razy. Używałem kiedyś ComPort ale jakoś inaczej to robiłem. Jak to nie zadziała to wieczorem sprawdzę w domu jak to było...
Ja używam RS już od dawna w delphi. wcześniej korzystałem z komponentu comport (dejana). jest to bardzo dobry komponent do portu szeregowego. Ale ostatnio musiałem z niego zrezygnować z powodu sterowania RTS.(musiałem napisać swojego dll akurat na podstawie tej książki i nie narzekam) Doszedłem do tego że w windzie jest poważny błąd (serial.vxd)i nie...
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...
No dobra. Załóżmy, że mam już ten COMPort ściągnięty i zainstalowany. Ale jak tym sterować? Czy będę potrzebował zewnętrznego programu do sterowania (kompilacji) - coś jak Visual Basic 5? Jak widzę, w archiwum mam kilka plików w katalogu source - jak się domyślam, rozszerzenie .pas to Turbo Pascal (od razu piszę, że nie wiem z czym to się je). W examples...
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:...
Pijany ty chyba rzeczywiście jesteś pijany całości projektu nikomu niestety nie wyślę jak już coś to jeżeli ktoś jest chętny to mógłbym sprzedać program sterownika za jakieś tam pieniądze(oczywiście że nie żródłowy)ale i z tym mam wątpliwości np.jakies reklamacje zwjązane z tym że komuś to nie chodzi.Jedyna możliwośc to sprzedaż całej płytki sterownika...
Witam męczę sie nad transmisja rs232 między uC a PC. Wymyśliłem juz jak stabilnie odbierać w kompie za pomocą komponentu Comport 2 bajty. Niestety próby połączenia ich w 1 liczbę gdzie 1 bajt jest młodszy a 2 starszy czyli w liczbę 16 bitową nie za bardzo mi wychodzą. Próbowałem przemnażać młodszy bajt przez 256 albo przesuwać zawartość rejestru operatorem...
Witam! Dopiero zaczynam swoją przygodę z programowaniem w C. Z programowaniem miałem trochę wspólnego, ale nigdy z C itp. Najbardziej interesuje mnie kwestia obsługi port COM. Chcę nadawać/odbierać dane właśnie przez rs232. Poszukałem trochę i mam kompilator Dev-C++, oraz komponent [url=http://sourceforge.net/project/show...
Mam prośbę odnośnie wykonania zadania, realizacja warunku po odbiorze danych typu string z portu rs232 w Delphi używając komponentu cport, podaję mój przykład ,który nie bardzo chce mi zadziałać, gdzie robię błąd? procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer); var Dane:string; D:string; begin ComPort1.Readstr(D,...
Albo proszę o kompletny sprawdzony kod programu dla C++Builder (BDS 2006), który będzie odbierał taki ciąg znaków i zapisywał do zmiennej typu AnsiString. Dane wysyłane są do komputera co 500ms. Ponadto musi być wykonywany w osobnym wątku bo w tle mam komunikację poprzez Internet, która stanowi integralną cześć programu. Pozdrawiam Dodano po 2 Bardzo...
Witam, Próbuje zapisać dane z rs232 do bazy firebird 2.0, niestety cały czas otrzymuje błąd konwersji. Pola MASA, RATE w bazie typu Float, poniżej przedstawiam procedurę zapisu: procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer); var Str : String; masa_str1,rate_str1,masa_str11,rate_str1... : String; begin if ComPort1.Connected...
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...
Dziękuję za ocenę Marczeli_P – Jak słusznie zauważyłeś, w pliku z danymi występuje „spam”. Jednak nie przejmuję się tym aż tak bardzo. Ponieważ jest to zaledwie 2% na godzię. Niemniej jednak postaram się to zmienić. Na chwilę obecną zmuszony jestem załatwić sprawę pisząc program (usuń daną jeśli jest tylko = „ , ” ) mariusz1109...
Witam Planuje wykonać urządzenie - "sterownik" urządzeń. Składał się będzie z dwóch elementów: - programu na PC napisanego w Delphi 7 - sterownika, którego "mózgiem" będzie atmega8. Uwzględniając to, że nie będę mógł programować układu "setki razy" poprawiając błedy popełnione w programach, chcę zbudować układ, zaprogramować i uruchomić. Ze schematem...
comport string instalacja comport comport delphi
kolory kabli kolejnosc dwufazowy jednofazowy prostowanie wałka
projektowanie mebli kuchenka amica 53gg5 43zptgn
Indesit WIS 105 - migająca dioda kluczyka, brak reakcji Bresser Biolux AL - brak oświetlenia, możliwe przyczyny