Mehrere Instanzen TBlockserial

Alle Fragen zur Netzwerkkommunikation
Antworten
starkard
Beiträge: 87
Registriert: Mi 31. Okt 2007, 10:44

Mehrere Instanzen TBlockserial

Beitrag von starkard »

Hallo,

habe mit Synaser versucht zwei serielle Schnittstellen anzusprechen. Unter Linux kein Problem. Unter Windows bekomme ich immer die LastError Meldung: "Falscher Parameter". Dies passiert auch nur dann, wenn ein Objekt mit einem Stoppbit konfiguriert wird. Werden jeweils 2 Stoppbits angegeben läuft es. Womit kann das zusammenhängen.

Code: Alles auswählen

kemesSeri:=TBlockSerial.Create;
     Sleep(500);
     kemesSeri.Connect(progIniDaten.kemesCom);
     Sleep(500);
     kemesSeri.Config(9600,7,'E',1,false,false);
     Memo1.Lines.Add('Device: ' + kemesSeri.Device + '   Stauts: ' + kemesSeri.LastErrorDesc +' '+ IntToStr(kemesSeri.LastError));
     kemesSeri.ConvertLineEnd:=true;
     if progIniDaten.pcCom<>'' then
     begin
           pcSeri:=TBlockSerial.Create;
           Sleep(500);
           pcSeri.Connect(progIniDaten.pcCom);
           Sleep(500);
           pcSeri.Config(9600,8,'N',2,false,false);
           Memo1.Lines.Add('Device: ' + pcSeri.Device + '   Stauts: ' + pcSeri.LastErrorDesc +' '+ IntToStr(pcSeri.LastError));
           pcSeri.ConvertLineEnd:=true;
     end;


P.S Habe mal etwas von einer LCLeigenen Komponente für serielle Schnittstellen gehört??

Benutzeravatar
theo
Beiträge: 10467
Registriert: Mo 11. Sep 2006, 19:01

Re: Mehrere Instanzen TBlockserial

Beitrag von theo »

Halte dich an die Konstanten und RTFM ;-)

SB1 = 0;
stopbit value for 1 stopbit

SB1andHalf = 1;
stopbit value for 1.5 stopbit

SB2 = 2;
stopbit value for 2 stopbits

starkard
Beiträge: 87
Registriert: Mi 31. Okt 2007, 10:44

Re: Mehrere Instanzen TBlockserial

Beitrag von starkard »

Vielen Dank Theo; jetzt gehts :wink:

Antworten