Hilfe ein Bug beim verstecken der TaskBar

[robinWie]

Hi,

ich habe ein Programm um Bilder zu präsentieren und wärend der Show wird die TaskBar nicht mehr angezeigt, dazu benutze ich disen Code:

Delphi-Quellcode:

procedure TMainForm.ShowTaskBar(AShow: Boolean);
const
  cmdShow: array[Boolean] of Integer = (SW_HIDE, SW_SHOW);
var
  Handle: THandle;
begin
  Handle := FindWindow('Shell_TrayWnd', nil);
  if Handle <> 0 then
    ShowWindow(Handle, cmdShow[AShow]);

  MainForm.Activate;
end;

Bei FormClose habe ich ShowTaskBar(True) (Also TaskBar anzeigen) eingetragen eingetragen aber wenn ich das Programm mit dem Taskmanager beenden wird die TaskBar nicht angezeigt, was ziemlich fatal ist. Wie kann ich diesen Bug fixieren?

Danke im Voraus

[Luckie]

Würdest du bitte deinem Thread ein aussagekräftiges Topic geben?

[mr.unbekannt]

kannst du nicht einfach die form verkleienrn, so groß das nur noch die laufleiste zu sehen ist, aber es nicht komplett schließen? ansonsten könnte man noch eine zweite datei schrieben die dann die laufleiste beinhaltet, laut meinem wissen.

[robinWie]

Zitat:

ansonsten könnte man noch eine zweite datei schrieben die dann die laufleiste beinhaltet, laut meinem wissen.

Ich habe zwar keine neue Datei geschrieben aber ist der Unit für das Project einfach unter Run geschreiben

Delphi-Quellcode:

if Application.Terminated then
    ShowDlg.ShowTaskBar(True);

ShowDlg beinhaltet die Procedre zum verstecken der Taskbar.

Danke für den Tipp

[Luckie]

Zitat von robinWie:

Bei FormClose habe ich ShowTaskBar(True) (Also TaskBar anzeigen) eingetragen eingetragen aber wenn ich das Programm mit dem Taskmanager beenden wird die TaskBar nicht angezeigt, was ziemlich fatal ist. Wie kann ich diesen Bug fixieren?

Wenn man den Prozess abschießt, wird OnClose nicht mehr ausgeführt. Probier mal, ob OnDestroy noch ausgeführt wird. Ansonsten, wer ein Programm mit Gewalt beendet, muss mit so was rechnen.

[ichbins]

Wenn der Prozess über Prozessbeenden gekillt wird, wird garnix ausgeführt. Da wird der Prozess mitten in der Prozedur abgewürgt. Du könntest allerdings einen 2. Prozess machen der nur da ist um zu überprüfen ob der erste noch läuft. Wenn ja -> alles gut. Wenn nein -> Taskleiste wieder anzeigen und selber beenden. Im 1. Prozess musst du gleichzeitig überprüfen ob der 2. geladen ist. Wenn ja, alles gut, wenn nein, starten.