Thema: Delphi Edit zu TCaption

Einzelnen Beitrag anzeigen

Schilkschi

Registriert seit: 25. Mai 2004
16 Beiträge
 
#9

Re: Edit zu TCaption

  Alt 29. Mai 2004, 21:17
Delphi-Quellcode:
var
  MeinString: String;
  P: TPoint;
begin
  MeinString := Edit1.Text;
  P.x := StrToInt(Copy(MeinString,1,Pos(',',MeinString)));
  Delete(MeinString,1,Pos(',',MeinString)+1);
  P.y := StrToInt(MeinString);

GetCursorPos(p);
mouse_event(MOUSEEVENTF_LEFTDOWN,p.x,p.y,0,0); //klicken
mouse_event(MOUSEEVENTF_LEFTUP,p.x,p.y,0,0);
// in Edit trägt User seine Koordinaten ein die er vorher lesen kann
So also? Klappt aber nicht kommt ne Meldung:
EConvertError with MEssage "572 <--- Koord, is not a valid Integer. Process stoped bla bla
  Mit Zitat antworten Zitat