Einzelnen Beitrag anzeigen

messie

Registriert seit: 2. Mär 2005
Ort: Göttingen
1.592 Beiträge
 
Delphi 2009 Professional
 
#27

Re: Verbindung mit COM-Schnittstelle aufbauen über TComPort

  Alt 17. Jul 2008, 15:57
Zitat von Dark Angel:
das funzt auch nicht:
Delphi-Quellcode:
if Strx = ('MV' + #$20) then
 label24.caption := strx;
Logisch, denn Du liest ja 20 Zeichen in die Variable ein und fragst dann, ob die Variable GLEICH der 3 Zeichen ist. Kann also nicht gehen.
Eher mit Pos:
Delphi-Quellcode:
if Pos('MV'+#20,strx) = 1 then
begin
  //aha, Du bist am Beginn Deiner Sequenz
end;

//andere Variante

if Pos('MV'+#20,strx) > 0 then //ist die 3er-Squenz in der Variable enthalten?
begin
  i := Pos('MV'+#20,strx); //Anfang suchen
  strZ := copy(strx,i+4,5);//damit solltest Du "26,92" im Kasten haben.
end;
Alles ungetestet.

Grüße, Messie
  Mit Zitat antworten Zitat