Also, klar machen wir das:
Delphi-Quellcode:
var
MeinString: String;
P: TPoint;
Diese Variablen benötigen wir, um einerseits den Wert des Edits zwischenzuspeichern (so dass er im Edit nicht verändert wird) und um den Punkt zu speichern.
Delphi-Quellcode:
begin
MeinString := Edit1.Text;
Wir "kopieren" mal den Text aus dem Edit raus
P.x := StrToInt(Copy(MeinString,1,Pos(',',MeinString)-1));
Hier kopieren wir mit Copy zunächst einen Teil des Strings heraus, und zwar beginnend beim ersten Zeichen, und wir gehen bis eine Stelle vor dem Komma, dessen Index wir mit Pos finden. Das ganze wandeln wir in einen Integer um.
Delphi-Quellcode:
Delete(MeinString,1,Pos(',',MeinString)+1);
P.y := StrToInt(MeinString);
end;
Hier löschen wir zuerst alles bis einschließlich der ersten Stelle nach dem Komma, und wandeln das Ganze wiederum in einen Integer um.
Soviel zu meinem Code, ich fühle mich leider z. Zt. nicht danach, anderen Code auch noch durchzugehen.