@Daniel: nur (erst ab) XP wird das Datum eingeblendet - *IchAuchHabenWollen*
Die Lösung mit dem "unsichtbaren" Form dürfte die beste Variante sein. Wenn das Form minimiert wird (z.B. Win-D), dann sollest Du einfach das OnMinimize (Application oder Form
) Ereignis abfangen und eine WM_RESTORE Nachricht ein Dein Form senden.
Auf den Desktop zeichnen hat Nachteile, da beim Verschieben von Fenstern dasselbige oft nicht neu gezeichnet wird, sondern lediglich der sichtbare Bereich im wahrsten Sinne des Wortes verschoben wird. Dann hast Du am Ende Dein Datum mehrmals auf dem Bildschirm - bis die Fenster wirklich neu gezeichnet werden.
Um die Frage aber noch zu beantworten:
Code:
var
C: TCanvas;
begin
C := TCanvas.Create;
C.Handle := GetDC(0);
try
C.DrawText(0, 0, DateTimeToString(Now));
finally
ReleaseDC(C.Handle, 0);
C.Free;
end;
end;
...
...