Point nach Str?

**AlexII**

Wer kann mir sagen wie man Point nach String umwandelt?

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var p: TPoint;

begin

p := ScreenToClient(Mouse.CursorPos);

ShowMessage(????PointToStr(p));              <- kann hier nämlich die "p" nicht ausgeben

end;

Danke!

**himitsu**

Ein TPoint besteht aus 2 Integern ... wie wäre es also, wenn du diese Integer einzeln umwandelst?

**Bernhard Geyer**

Wir wäre es mit Format?

Format('x=%d, y=%d', [p.x, p.y]);

**DeddyH**

markieren

Delphi-Quellcode:

			function PointToStr(aPoint: TPoint): string;

begin

  Result := Format('X: %d, Y: %d',[aPoint.X, aPoint.Y]);

end;

[edit] *Huch*, wo kommen die Antworten denn plötzlich her?

[/edit]

Point nach Str?

Point nach Str?

Re: Point nach Str?

Re: Point nach Str?

Re: Point nach Str?

Forumregeln

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 43.153 Beiträge Delphi 12 Athens	#2 Re: Point nach Str? 19. Feb 2010, 11:30 Ein TPoint besteht aus 2 Integern ... wie wäre es also, wenn du diese Integer einzeln umwandelst? Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. my Delphi wish list : BugReports/FeatureRequests
	Zitat

Bernhard Geyer Registriert seit: 13. Aug 2002 17.171 Beiträge Delphi 10.4 Sydney	#3 Re: Point nach Str? 19. Feb 2010, 11:31 Wir wäre es mit Format? Format('x=%d, y=%d', [p.x, p.y]); Windows Vista - Eine neue Erfahrung in Fehlern.
	Zitat