in scrollbox zeichnen

[Sharky]

Hai Christian,

lege auf deine Scrollbox einfach ein TImage. Darauf kannst Du dann zeichen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
  var i : TImage;
begin
  // Parameter festlegen
  i:=Image1;
  // Blatt zeichnen
  i.Canvas.Rectangle(0,0,i.Width,i.Height);
end;