Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   NUR bestimmte Objecte Sichtbar?! (https://www.delphipraxis.net/105028-nur-bestimmte-objecte-sichtbar.html)

mr_emre_d 14. Dez 2007 11:11


NUR bestimmte Objecte Sichtbar?!
 
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 14. Dez 2007 11:19

Re: NUR bestimmte Objecte Sichtbar?!
 
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 14. Dez 2007 11:28

Re: NUR bestimmte Objecte Sichtbar?!
 
edit:danke

DP-Maintenance 14. Dez 2007 15:02

DP-Maintenance
 
Dieses Thema wurde von "SirThornberry" von "Programmieren allgemein" nach "VCL / WinForms / Controls" verschoben.


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:43 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz