Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Taskleiste/Desktopicons eingeblendet? (https://www.delphipraxis.net/74872-taskleiste-desktopicons-eingeblendet.html)

cruso 9. Aug 2006 22:13


Taskleiste/Desktopicons eingeblendet?
 
Hi!

Es gibt eine einfache Möglichkeit die Taskleiste/Desktopicons aus-/einzublenden. Wie kann man aber nun überprüfen ob diese eingeblendet sind oder nicht (True/False)?

toredo 9. Aug 2006 22:23

Re: Taskleiste/Desktopicons eingeblendet?
 
Delphi-Quellcode:
ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_HIDE); //Taskleiste ausblenden
ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_SHOW); //Taskleiste einblenden

ShowWindow(FindWindow(nil,'Program Manager'),SW_HIDE); //Desktopsymbole ausblenden
ShowWindow(FindWindow(nil,'Program Manager'),SW_SHOW); //Desktopsymbole einblenden
leider kann ich dir nicht sagen wie man übeprüfen kann ob der wert bei show oder bei hide ist :(

wurde, glaub ich, schon mehrmals in der DP besprochen=> SuFu :roll:


mfG toredo

DGL-luke 9. Aug 2006 22:28

Re: Taskleiste/Desktopicons eingeblendet?
 
wie wärs mit MSDN-Library durchsuchenIsWindowVisible?

cruso 11. Aug 2006 22:44

Re: Taskleiste/Desktopicons eingeblendet?
 
Zitat:

Zitat von DGL-luke
wie wärs mit MSDN-Library durchsuchenIsWindowVisible?

Und wie kann ich das genau anwenden? Was muss ich übergeben etc.?

_frank_ 11. Aug 2006 23:39

Re: Taskleiste/Desktopicons eingeblendet?
 
mhm...mal vergleichen...

Zitat:

BOOL ShowWindow(
HWND hWnd,
int nCmdShow
);

hWnd
[in] Handle to the window.
nCmdShow
...
Zitat:

BOOL IsWindowVisible(
HWND hWnd
);

hWnd
[in] Handle to the window to test.
fällt was auf? :cyclops:

Gruß Frank

cruso 12. Aug 2006 08:51

Re: Taskleiste/Desktopicons eingeblendet?
 
Ja gut, nur wie soll ich das einbinden? Wenn z.B. auf einem Label "False" erscheinen soll, wenn die Taskleiste ausgeblendet ist, wie müsste das aussehen?

Andreas L. 12. Aug 2006 08:58

Re: Taskleiste/Desktopicons eingeblendet?
 
Zitat:

Zitat von cruso
Ja gut, nur wie soll ich das einbinden? Wenn z.B. auf einem Label "False" erscheinen soll, wenn die Taskleiste ausgeblendet ist, wie müsste das aussehen?

Ich denke mal so:

Delphi-Quellcode:
if IsWindowVisible(FindWindow('Shell_TrayWnd', nil)) = true then
 begin
  //ausblenden
 end
else
 begin
  //einblenden
 end;
:mrgreen:

cruso 12. Aug 2006 09:11

Re: Taskleiste/Desktopicons eingeblendet?
 
Da hab ich ja bei meinem Versuch gar net so viel falsch gemacht. Danke. :stupid:

DGL-luke 12. Aug 2006 12:59

Re: Taskleiste/Desktopicons eingeblendet?
 
@onlinehome: mit dem "= true" kannst du insbesondere bei WinAPI-Aufrufen, die gerne mal ein "etwas anderes" Boolean zurückliefern, gehörig auf die Schnauze fallen! Lass es einfach weg, und der Compiler erledigt das für dich.

PS: true ist afaik Boolean(-1), obwohl alle Werte (ein Boolean wird meist in 32bit, also in einem integer, gespeichert) außer 0 true sind. Es gibt auch den genau umgekehrten Weg. Ist nur Definitionssache.

cruso 12. Aug 2006 16:07

Re: Taskleiste/Desktopicons eingeblendet?
 
Das Problem ist, wenn ich den Code ausführe, dann wird zwar überprüft ob das Fenter sichtbar ist, aber es wird auch (wenn es sichtbar ist) ausgeblendet.

Delphi-Quellcode:
if IsWindowVisible(FindWindow(nil,'Program Manager')) = true then
begin
CheckBox5.Checked:=True;
end
else
begin
CheckBox5.Checked:=False;
end;
Also wenn die Symbole ausgeblendet sind, dann werden diese eingeblendet und umgekehrt. Ich möchte aber nur überprüfen, was vorliegt.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:18 Uhr.
Seite 1 von 2  1 2      

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