Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by mymuschy,
18. Aug 2006
Guten Morgen!
Erstmal danke für die Fülle eurer Beiträge! Bin begeistert...
Ich hab jetzt nochmal 2 Dinge versucht.
Im OnClose Ereigniss:
tC_Serial.OnRxData := nil;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by mymuschy,
17. Aug 2006
@Klaus01
habs mit
tc_serial.ZapRxQueue;
versucht.
Ja es wird noch korrekt empfangen. Aber das Problem ist nicht weg.
@unwissender
Des mit der eigenen Funnktion versuch ich mal.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by mymuschy,
17. Aug 2006
Er spring beim schliessen sofort "rein" und erst nach ca. 10sek. "raus"
procedure TSS.FormClose(Sender: TObject; var Action: TCloseAction);
begin
showmessage('rein');
tC_Serial.Active:=false;
showmessage('raus');
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by mymuschy,
17. Aug 2006
Hallo Klaus01,
bringt leider auch nichts! Ich hab auch schon versucht in die Schleifenbedingung eine zweite Bedingung einzubauen.
procedure TSS.tC_SerialRxData(Sender: TObject);
Var C : Char;
begin
While (tC_Serial.ReadChar(C)>0) and not sofort_beenden do Begin
Case C of
#2 : HS:='';
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by mymuschy,
17. Aug 2006
Hallo,
ich kommuniziere per Tserial mit einem externen Gerät das über die Serielle Schnittstelle ständig nur am Senden ist. Empfangen wird dieses Dauerfeuer per:
procedure TSS.tC_SerialRxData(Sender: TObject);
Var C : Char;
begin
While tC_Serial.ReadChar(C)>0 do Begin
Case C of
#2 : HS:='';