Malerei auf Leinwand für eine andere Anwendung.

Malerei auf Leinwand für eine andere Anwendung.

Malerei auf Leinwand für eine andere Anwendung. : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

Code-Snippet, das zeigt, wie Sie in einer anderen Anwendung Fenster oder auf dem Bildschirm selbst zu malen.
Im Fenster von Word oder auf dem Desktop zeichnen sich jemals gewünscht? Haben Sie einen Blick auf diese:
Prozedur TForm1.Button1Click(Sender: TObject);
Var Thehandle:thandle;
Thecanvas:tcanvas;
beginnen
thecanvas:=tcanvas.Create;
winexec('notepad.exe',sw_normal);
thehandle:=FindWindow('notepad',Nil);
thecanvas.handle:=GetDC(thehandle);
thecanvas.Rectangle(0,0,100,100);
thecanvas.Free;
Ende;
Für die Malerei der Bildschirm selbst, verwenden:
thecanvas.handle:=CreateDC('DISPLAY',Nil,Nil,Nil);