Delphi Width einer Canvas auslesen

Thema durchsuchen

Ansicht

Themen-Optionen

Width einer Canvas auslesen

Offene Frage von "mytar"

Ein Thema von Nikolas · begonnen am 29. Dez 2004 · letzter Beitrag vom 30. Dez 2004

Vorheriger Beitrag

Nächster Beitrag

Nothine

Registriert seit: 3. Jul 2004
Ort: Mülheim an der Ruhr
198 Beiträge

Delphi 5 Enterprise

Re: Width einer Canvas auslesen

30. Dez 2004, 14:23

du könntest dir mit der funktion MSDN-Library durchsuchen

GetClipBox die maße des canvas holen.
Es gibt zwar laut MSDN einige einschränkungen, aber für den anfang funktionierts z.B. mit Form1.Canvas janz jut.

zusammenfalten · markieren

Delphi-Quellcode:

			function CanvasWidth(Canvas: TCanvas): Integer;

var R: TRect;

begin

  GetClipBox(Canvas.Handle,R);

  Result := R.Right;

end;

function CanvasHeight(Canvas: TCanvas): Integer;

var R: TRect;

begin

  GetClipBox(Canvas.Handle,R);

  Result := R.Bottom;

end;