Einzelnen Beitrag anzeigen

Benutzerbild von devnull
devnull

Registriert seit: 5. Okt 2003
362 Beiträge
 
Delphi 7 Personal
 
#1

Rechteck gestrichelt zeichnen

  Alt 5. Nov 2005, 13:27
Hi,
wie zeichnet man ein gestricheltes Rechteck?

Delphi-Quellcode:
with DXDraw1.Surface.Canvas do
  begin
    Brush.Style := bsClear;
    Pen.Style := psDash; //Geht nicht, weil Pen.Width = 2
    Pen.Width := 2;
    Pen.Color := clBlack;
    DXDraw1.Surface.Canvas.Rectangle(x,y, x+20,y+20);
  end;
Wie gesagt, das Rechteck wird durchgängig gezeichnet, weil die Pen.Width auf 2 steht

mfg
devnull
-- Never change a running system --
  Mit Zitat antworten Zitat