Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Edit zu TCaption

    Delphi
    by alcaeus, 29. Mai 2004
  Also, klar machen wir das:
  
  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.
  
  
  begin
• Forum: Sonstige Fragen zu Delphi

  Re: Edit zu TCaption

    Delphi
    by alcaeus, 29. Mai 2004
  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?
• Forum: Sonstige Fragen zu Delphi

  Re: Edit zu TCaption

    Delphi
    by alcaeus, 29. Mai 2004
  Na sag mal was in dem Edit1 was für ein Text drinnenstand?
  Außerdem habe ich durch Zufall bei einer Zeile etwas wichtiges vergessen:
  
  P.x := StrToInt(Copy(MeinString,1,Pos(',',MeinString)));
  
  wird zu
  
  P.x := StrToInt(Copy(MeinString,1,Pos(',',MeinString)-1));
• Forum: Sonstige Fragen zu Delphi

  Re: Edit zu TCaption

    Delphi
    by alcaeus, 29. Mai 2004
  Also, wenn der Beistrich und das Leerzeichen dazwischen sind, dann geht es doch ganz leicht, die TPoint-Variable zu füllen.
  
  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);