Strich in 2ten Formular

[Nicodius]

jo aber da musst nur hier suchen .... per ApplicationEvents(in der komponenten liste bei "zusätzliches(weiß nicht ab welcher delphi version )) auf das deactivate, minimize etc agieren

im deactivate

Delphi-Quellcode:

begin
  BitBlt(Bit.canvas.handle, 0, 0, Form2.width, Form2.height, Form2.canvas.handle, 0, 0, srccopy);
end;

im activate

Delphi-Quellcode:

begin
  PaintBox1.Canvas.Draw(0, 0, Bit);
end;

und das halt bei minimaize auch noch einführen

Delphi-Quellcode:

begin
  BitBlt(Bit.canvas.handle, 0, 0, Form2.width, Form2.height, Form2.canvas.handle, 0, 0, srccopy);
end;

so leicht geht das