Image oder Picture an fremdes Fenster senden

[simjoh]

Hallo,

ich möchte gerne ein Image oder ein Picture in einem fremden Fenster anzeigen. Hat jemand einen Tipp?

Herzliche Grüße
Markus

[sirius]

Immer wenn das fremde Fenster eine PaintMessage bekommt, holst du dir den Device Context und kopierst das Bild rein.

[bitsetter]

Hi,

sicherlich nicht so elegant wie sirius Vorschlag, aber manchmal geht es auch so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Panel1.BevelOuter := bvNone;
  Panel1.BoundsRect:= Image1.BoundsRect;
  Image1.Left:= 0;
  Image1.Top:= 0;
  image1.Parent:= Panel1;
  Windows.SetParent(Panel1.Handle, (*handle*));
  panel1.Left:= 0; //Im fremden Fenster Positionieren
  panel1.Top:= 0;
end;

Das Panel wird benötigt, da das TImage kein WinControl ist.
Manche Controls in fremden Fenstern überzeichnen das Panel jedoch immer wieder.

[simjoh]

Super herzlichen Dank.