Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Quadrat 90° gedreht

  Alt 3. Mär 2006, 14:17
willst du wirklich nur die Linie um 45° drehen oder doch das ganze bild?

wenn es nur um linie geht sollte die Funktion "PolyPolyline" eventuell das können was du willst.

[Edit]
Ich hab mich vertan, für deine Zwecke ist "Polyline" die richtige Funktion
Delphi-Quellcode:
var LPoints: Array of TPoint;
begin
  SetLength(LPoints, 5);
  LPoints[0] := Point(50, 0);
  LPoints[1] := Point(100, 50);
  LPoints[2] := Point(50, 100);
  LPoints[3] := Point(0, 50);
  LPoints[4] := Point(50, 0);
  Polyline(Image1.Picture.Bitmap.Canvas.Handle, Pointer(LPoints)^, Length(LPoints));
[/Edit]
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat