NUR bestimmte Objecte Sichtbar?!

[mr_emre_d]

Ich möchte, dass (nur) ein label auf dem angezeigt wird(ich will ne uhr programmieren die auf dem desktop läuft):
Wie kann man in >Delphi die tform visible auf false setzten ohne das die Objekte, die drinnen sind, verschwinden? Ist das überhaupt möglich?

Es gibt da ein Paar andere Möglichkeiten wie zb. borderstyle auf none setzen aber erreiche ich damit nicht den erwünschten Effekt.

edit: wenn das nicht möglich ist: kann man label.color: auf hintergrund des desktops umstellen(transparenz) oder iwas in alphablending machen`?

Danke im vorraus

Mfg Emre

[bundy]

Zeichne doch gleich auf dem Desktop

Delphi-Quellcode:

procedure TForm1.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:=72;
       DCanvas.Brush.Style:=bsClear;
       DCanvas.TextOut(10, 10, 'Ein Schriftzug');
     finally
       DCanvas.Free;
     end;
    finally
      if ReleaseDc(0, DHandle)<>1 then
        RaiseLastOSError;
    end;
 end
 else
   RaiseLastOSError;
end;

lg
bundy

[mr_emre_d]

edit:danke