Thumbnails von Pagecontrol-Pages ...

[guidok]

Schade, aber ihr habt (wie immer) recht. Naja, das war in meinem Fall eh nur just for fun. Ich habe das mal mit PaintTo ausprobiert, es funktioniert auch mit nicht sichtbaren Fenstern, allerdings werden schon einige Komponenten weggelassen.

Mein Testcode dazu

Delphi-Quellcode:

var
  bm: TBitmap;
begin
  //frmBotEditor.Show;
  bm:=TBitmap.Create;
  bm.SetSize(frmBotEditor.Width,frmBotEditor.Height);
  //bm.Canvas.Lock;
  frmBotEditor.PaintTo(bm.Canvas,0,0);
  //bm.Canvas.Unlock;
  Image1.Picture.Bitmap.Assign(bm);
  Image1.Stretch:=True;
  bm.Free;
end;

Falls sich deine Seiten nicht dynamisch ändern, dann würde ich eine verkleinerte Screenshoot bmp in eine Imagelist packen und entsprechend einblenden.

Guido