Jaką wtyczkę do Delphi użyć do komunikacji RS-232 z attiny2313?

Question

Witam! Już od dawna zamierzałem napisać taki program ale nie potrafiłem ale tear zabiore się ostro do pracy tylko potrzebuje pomocy od was: 1. jaką wtyczke tzreba ściągnąć do delphi jak się nazywa najlepiej link do jakiejś sprawdzonej 2. Nigdy nie spotakłem się z takim programem jak to zapisać...

zolciak · Accepted Answer

comport

zolciak · Accepted Answer

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.

mirekk36 · Accepted Answer

... jeśli zassałeś sobie ten komponent to masz tam też chyba ze trzy przykładowe programiki - które fajnie pokazują jak się posługiwać w podstawowy sposób tym komponentem, m.inn "ComExample.dpr" . Tam jest przykład odczytywania znaków w metodzie opisanej powyżej przez kolegę.

Działa bardzo dobrze - właśnie robię oprogramowane w D7 które współpracuje ze sterownikiem własnie na ATTiny2313, podłączonym przez RS232/RS485 do PCta i wszystko jest SUPER

pozdrówka

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

mirekk36 · Accepted Answer

... żeby widać było Cport.dcu - musisz sobie ustawić w opcjach i w libararies - ścieżkę do źródeł tego komponentu (tak jak dla wszystkich nowo instalowanych komponentów) pozdrówka

GrEG0 · Accepted Answer

Wyprobiuj cos takiego. Oczywiscie to jest tylko przyklad.

*Inicjacja portu*


hCommFile : THandle;
DCB: TDCB;
CommTimeouts : TCommTimeouts;
Port: String;

 Port:='COM1:';

  hCommFile := CreateFile(PChar(Port),
                          GENERIC_READ or GENERIC_WRITE,
                          0,
                          nil,
                          OPEN_EXISTING,
                          FILE_ATTRIBUTE_NORMAL,
                          0);
  if hCommFile=INVALID_HANDLE_VALUE then
  begin
    ShowMessage('Unable to open '+ Port);
    CloseHandle(hCommFile);
    exit;
  end;

// Config
if not SetupComm(hCommFile, RxBufferSize, TxBufferSize) then
    begin
    end;
   { Raise an exception }

if not GetCommState(hCommFile, DCB) then
   { Raise an exception }
    begin
    end;


DCB.StopBits:=0;
DCB.BaudRate:=57600;
DCB.ByteSize:=8;

if not SetCommState(hCommFile, DCB) then
   { Raise an exception }
    begin
    end;

      with CommTimeouts do
begin
   ReadIntervalTimeout := 1;
   ReadTotalTimeoutMultiplier := 1;
   ReadTotalTimeoutConstant := 1;
   WriteTotalTimeoutMultiplier := 1;
   WriteTotalTimeoutConstant := 1;
end;


 if not SetCommTimeouts(hCommFile, CommTimeouts) then
   { Raise an exception }
    begin
    end;

*Zamkniecie portu*


CloseHandle(hCommFile);

*Odczyt/Zapis*


ReadFile(hCommFile, Buffer, sizeof(Buffer),
              NumberOfBytesRead, nil);

WriteFile (hCommFile, Send_string, length(send_string), NumberOfBytes, Nil);

treker · Answer

oki mam ten komponent ale teraz głupia sprawa nie instalowałem nowego komponentu już od bardzo dawna jak to zrobić mam delphi 2005? i oczywiście proszę też o opis jak wykonać ten programik;)

Dodano po 3 [godziny] 57 [minuty]:

robię według tego http://www.borland.pl/cgi-bin/tip.exe/showtip?mode=1&id_tip=77
i mi nie działa dochodzi do końca i nie ma tego komponentu:/ ale i tak najważniejsza jest proźba o wytłumaczenie tego proga;)

treker · Answer

witam! Robie dokładnie jak tu i mam błąd :/ Dodano po 23 [minuty]: dobra troche pokombinowałem i się zainstalowało ale go nigdzie nie wide na której palecie on jest? Dodano po 7 [minuty]: niby sie insatluje ale w uses podkreśla że błędn ai że nie może znalexć Cport.dcu

treker · Answer

:/ jestem jakiś nie kumaty nie wiem gdzie to zrobić w Component nie ma żadnej opcji która otwiera *.cpu mam delphi 2005

mirekk36 · Answer

... ja mam Delphi 7 - tu jest tak, że po zainstalowaniu komponentu, trzeba wejść w menu w:
Tools, Environment options, Library i kliknąć klawisz Library path. W tym miejscu ustawia się ścieżki poszukiwań dla modułów - plików, które mają być tam poszukiwane podczas kompilacji. Zauważ, że jak kładziesz na formę ten komponent to przy próbie kompilacji do sekcji USES na początku dodaje się CPort. Czyli trzeba wskazać kompilatorowi gdzie znajdują się jego pliki źródłowe, żeby to skompilować - tak jest w przypadku w zasadzie prawie wszystkich komponentów. Niestety nie jestem w stanie dokładnie powiedzieć jak to jest w D2005 ale myślę, że podobnie, co najwyżej opcje mogą się troszkę inaczej nazywać

.... ale jeśli masz tyle problemów z tym komponentem akurat (chyba, że masz wogóle problemy ze znajomością Delphi) to zainstaluj sobie dowolny inny - np w jednym z wg mnie najlepszych pakietów (free) w sieci SYNAPSE jest moduł "synaser", trudniejszy i jest tam troszkę więcej pracy żeby się nim posługiwać ale za to daje to niesamowite efekty - w poważniejszych programach to jego wykorzystuję do obsługi portów COM. Jeszcze inny łatwy i przyjemny komponent do COMa to np SerialNG (zapuść google i odrazu go znajdziesz)

pozdrawiam

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

treker · Answer

nie ma takich opcji w delpgi 2005 mam problemy z tym bo dawno już tego delphi nie ruszałem:/ i teraz są problemy:/

Dodano po 34 [minuty]:

no dobra niby się zainstalowało w uses nie podkreśla tego ale niemam tego komponentu:/ nie wiem gdzie to dodać:/ ten *.dcu

starob · Answer

Polecam książkę RS232C Praktyczne programowanie ..... aut. Andrzej Daniluk - Helion

treker · Answer

Witam! Z programem dam sobie już rade ale jak zainsatlowac ten komponent mam delphi 2005 zainstalowąłem go ale nie wiem gdzie ten plik *.dcu

mirekk36 · Answer

... kolego - jakiej ty wersji tego komponentu używasz???? - ja mam chyba ostanią wersję 3.10 (choć może jest nowsza - nie sprawdzałem) i w tej wersji 3.10 są jak byk pakiety: " DsgnCPort9.dpk" dla D2005 oraz "DsgnCPort10.dpk" nie wspominając o starszych wersjach Delphi. Jest tam też w katalogu source jak byk - plik CPort.dcu, CPort.inc oraz CPort.pas .... więc nie wiem co ty wyrabiasz, że nie możesz sobie tego zainstalować i używać

??? ... no chyba, że masz jakąś starszą wersję tego komponentu w której jeszcze nie było pakietów do instalcji dla D2005 i D2006. Tą poprzednią wersją była v2.64 - maksymalnie dla D6 ale spokojnie kompilowała się wtedy też pod D7....

... poszukaj sobie więc wersji 3.10 (myślę że napewno będzie gdzieś na sourceforge.net)

pozdrówka

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

treker · Answer

Elo
Po pierwsze sorry, że tak truje.
Opisze dokładnie co i jak mam ten komponent co pod 2005 działa otwieram delphi wybieram odpowiedni plik robie kompiluje i instaluj komponent się instaluje i w pokazuje komunikat że zainstalowało itd. i w uses nie podkreśla Cport ale nie mam na żadnej z palet tego komponentu więc każda wstawka w kodize która dotyczy tego komponentu zosatje podkreslona więc coś jest nei tak:/

mirekk36 · Answer

ponieważ nie używam jeszcze D2005 więc sprawdziłem w necie i okazuje się, że wielu ma problemy z instalką tego pod Delphi wyższe niż 7

jeszcze raz powtórzę - bo niby mówisz

Cytat:
"Opisze dokładnie co i jak..."

a potem w zasadzie NIC tak jak w poprzednich postach. Jeśli chcesz żeby ci pomóc to spróbuj się wysilić i odpowiedzieć na konkretne pytania bo tak można tu gadać 3 lata i nic z tego nie wyniknie.

1. Masz wesję 3.10???
2. jeśli masz wersję 3.10 to czy widzisz, że masz tam w katalogu source takie pliki jak CPort.dcu, CPort.inc i CPort.pas???? Plus oczywiście wiele innych
3. Czy nie masz w D2005 gdzieś w opcjach czegoś żeby ustawić ścieżkę poszukiwań dla bibliotek komponentów?????????? (to niemożliwe żeby nie było)

jeśli na któreś z tych pytań odpowiesz przecząco to nie uda mi się tobie pomóc

ale jeśli poszukasz tego co w tych pytaniach i znajdziesz te elementy układanki to:

spróbuj sobie podmienić zawartość pliku CPort.inc - dodaj w nim na końcu to:

{$IFDEF VER170} { Delphi 2005 }
{$DEFINE DELPHI_4_OR_HIGHER}
{$DEFINE DELPHI_5_OR_HIGHER}
{$DEFINE DELPHI_6_OR_HIGHER}
{$DEFINE DELPHI_7_OR_HIGHER}
{$DEFINE DELPHI_2005_OR_HIGHER}
{$DEFINE DELPHI_2005}
{$IFDEF BCBNOTDELPHI}
{$ObjExportAll On}
{$ENDIF}
{$WARN UNSAFE_TYPE OFF}
{$WARN UNSAFE_CODE OFF}
{$WARN UNSAFE_CAST OFF}
{$ENDIF}

następnie spróbuj otworzyć plik CPortLib9.dpk i zapuść instalację. Aha ale zanim zapuścisz instalację DODAJ SOBIE do "Ordered list of Library path" w zakładce LIBRARY ścieżkę z katalogiem source - twojego komponentu (w którym są te wszystkie pliki). Dzięki temu jak puścisz kompilację CPOrt to w locie powinny się dokompilować pakiety designtime. No i powinna ci się pojawić zakładka w palecie komponentów o nazwie CPortLIB

...niestety nie jestem na 100% pewien czy opisany przeze mnie sposób zmiany w pliku CPort.inc pomoże(pomysł ten zaczerpnąłem z jakiejś strony po francusku)... ale jeśli odpowiesz na 3 pytania to może jeszcze uda mi się coś pomyśleć na później.

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

treker · Answer

Ad1. Tak Ad2.Tak ad3 gdyby było to bym już to zrobił :/

mirekk36 · Answer

no ok ... ale ja własnie na tej francuskojęzycznej stronce wyczytałem, że D2005 napewno ma tę opcję o której mowa w pkt.3

pokazałeś kawałek zrzutu ekranu ale on miał dotyczyć czego? ... bo aby dojść do tej opcji trzeba zapewne wejść przez Tools i dalej może będzie Environment Options a później zakładka library

pozdrówka

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

treker · Answer

dobra znalazłem są inaczej nazwane podałem ściezke do katalogu i dalej go nie wiedze a w jakiej zakładze on by się pojawił?

mirekk36 · Answer

... no przecież mówiłem we wcześniejszym poscie:

treker · Answer

acha sorry przeoczyłem:/ Zrobiłem tak jak mówiłeś z tym plikiem inc i wyszło to co w załączniku ale zakładki takiej nie ma a mam podan

Jaką wtyczkę do Delphi użyć do komunikacji RS-232 z attiny2313?

Post #1

Post #2

Post #3

Post #4

Post #5

Post #6

Post #7

Post #8

Post #9

Post #10

Post #11

Post #12

Post #13

Post #14

Post #15

Post #16

Post #17

Post #18

Post #19

Post #20

Post #21

Podsumowanie tematu