Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Anwendung in Tray minimieren (https://www.delphipraxis.net/22593-anwendung-tray-minimieren.html)

devnull 19. Mai 2004 17:54


Anwendung in Tray minimieren
 
Hi, ich hab eine Frage zu diesem Code-Schnipsel:

Minimieren:
Delphi-Quellcode:
  ShowWindow(application.handle, SW_HIDE);

Maximieren:
Delphi-Quellcode:
   hWnd := FindWindow(nil, PChar('MeinProgramm'));
   windows.ShowWindow(hwnd, 1);

Wieso kann ich nach dem Minimieren und anschließendem Maximieren die Anwendung
nicht erneut minieremn???

mfg
devnull

moritz 19. Mai 2004 18:04

Re: Anwendung in Tray minimieren
 
Hallo,

was genau funktioniert denn nicht?

Code:
windows.ShowWindow(hwnd, 1);
Versuch mal stattdessen
Code:
ShowWindow(hwnd, SW_SHOW);
(Aber eigentlich sollte sich nix ändern...)

Gruß

devnull 19. Mai 2004 18:06

Re: Anwendung in Tray minimieren
 
Also das Minimieren klappt einwandfrei...
Wenn ich dann im Tray auf das Icon meines Progs klicke, wird es auch maximiert.

Nur wenn ich jetzt erneut auf Minimieren klicke, wird das Fenster nicht minimiert, sondern
es reagiert gar nicht auf den Klick.

[EDIT]
Wenn ich ShowWindow(hwnd, SW_SHOW); benutze, dann passiert gar nix --> also das fenster
wird auch nicht angezeigt
[/EDIT]

mfg
devnull

Muetze1 19. Mai 2004 23:01

Re: Anwendung in Tray minimieren
 
Moin!

Ansonsten ist bei mir auf meiner HP unter Delphi/Projekte ein grundlegend Beispiel Projekt zu einem Trayicon (ohne Kompo) wo dein Problem nicht auftritt...

MfG
Muetze1

NeoXX 24. Mai 2004 19:49

Re: Anwendung in Tray minimieren
 
Versuchs doch mal SW_RESTORE...

ausblenden...
Delphi-Quellcode:
  ShowWindow(Application.Handle, SW_HIDE);
  ShowWindow(Form1.Handle, SW_HIDE);
einblenden...
Delphi-Quellcode:
    ShowWindow(Application.Handle, SW_RESTORE);
    ShowWindow(Form1.Handle, SW_RESTORE);


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:33 Uhr.

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