wie kann man systemweit auf allem zeichnen

[rob60]

wie kann man systemweit auf allem zeichnen zb. destop

Für den desktop hab ich auch was gefunden doch zb im win explorer kann ich nicht zeichnen

Mein dektopcode(kopiert)

Delphi-Quellcode:

procedure TForm3.Button1Click(Sender: TObject);
var
DCanvas: TCanvas;
DHandle: HWND;
begin
DHandle:=GetDC(0);
if DHandle<>0 then
begin
   try
     DCanvas:=TCanvas.Create;
     try
       DCanvas.Handle:=DHandle;
       DCanvas.Font.Color:=clRed;
       DCanvas.Font.Size:=24;
       DCanvas.Brush.Style:=bsClear;
       DCanvas.TextOut(100, 100, 'Du bist ein Trottel!!!');
     finally
       DCanvas.Free;
     end;
    finally
      if ReleaseDc(0, DHandle)<>1 then
    end;
end;
end;

[Larsi]

Du kannst ja ein Bild des ganzen Bildschirms machen und dann auf diesem Zeichnen oder geht es dir um was anderes?

[rob60]

Nein geht leider nicht ich will alles noch bedienen können

Beispiel:

Ich schreibe in Word nun will ich mir etwas an dieser stelle etwas markieren
und danach weiterschreiben(kann ich auf einem bild nicht)

[XXcD]

Versuchs doch mit einer Durchsichtigen Form die StayOnTop ist.
Denke mal das wäre die einfachste Methode.
Da kannst du dann drauf zeichnen und trotzdem alles andere bedienen.