Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Canvas Bezugspunkt ändern

    Delphi
    by Lannes, 19. Mär 2007
  Hallo,
  
  da bietet sich doch eine Hilfsprozedur an:
  procedure PosRectangle(aCanvas: TCanvas;Left,Top,Width,Height: Integer);
  begin
  aCanvas.Rectangle(Left,Top,Left+Width,Top+Height);
  end;
  
  procedure TForm1.Button1Click(Sender: TObject);
  begin