Edit zu TCaption

[Schilkschi]

So

'Zahl zwischen 0 und 9999, Zahl zwischen 0 und 9999'

Also

1, 1
oder
1111, 34
oder
12, 999

Das steht da drin wichtig ist das Leerzeichen!
------------

Es klickt juhuuu!!!
Wenn du mir jetzt noch alles genau erklären könntest was das im Einzelnen heisst?
Nämlich ich hasse nichts mehr als bei einem Problem nichts dazu zu lernen....

Ich denke mal du gehts den String durch bis zum Komma trennst ab sagst das ist
P.x
oder?

[alcaeus]

Naja, auf meiner Maschine hat es mit dem Code funktioniert, aber ich teste es gern nochmal durch....nein, bei mir funktionierts, vielleicht hast du was falsch gemacht. Hast du das -1 auch übernommen?

[Schilkschi]

Ich hab was geadded schau mal und sag mir Bescheid plz!

THX!!

[alcaeus]

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

Delphi-Quellcode:

  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.

[Schilkschi]

Was fürn andren Code?
Reicht doch!

THX nochmal :cheers: