Thema: Delphi Edit zu TCaption

Einzelnen Beitrag anzeigen

Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: München
6.537 Beiträge
 
#8

Re: Edit zu TCaption

  Alt 29. Mai 2004, 21:09
Also, wenn der Beistrich und das Leerzeichen dazwischen sind, dann geht es doch ganz leicht, die TPoint-Variable zu füllen.
Delphi-Quellcode:
var
  MeinString: String;
  P: TPoint;
begin
  MeinString := Edit1.Text;
  P.x := StrToInt(Copy(MeinString,1,Pos(',',MeinString)-1));
  Delete(MeinString,1,Pos(',',MeinString)+1);
  P.y := StrToInt(MeinString);
end;
Der Code müsste so funktionieren.

Greetz
alcaeus
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat