Einzelnen Beitrag anzeigen

Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.737 Beiträge
 
Delphi 6 Enterprise
 
#1

fsStayOnTop <-> fsNormal zur Laufzeit ändern?

  Alt 14. Feb 2012, 09:45
Zitat von Delphi 6 Hilfe:
Der Wert von FormStyle sollte nicht zur Laufzeit geändert werden.
Genau das brauche ich aber. Sprich der User soll in den Optionen einstellen können, dass das Fenster immer OnTop ist, wenn er das wünscht und nach verlassen der Optionen soll die Einstellung direkt geändert sein. Das funktioniert aber nicht, zumindest in der einen Richtiung wenn StayOnTop aktiviert werden soll. Wegen der Bemerkung in der Hilfe, durfte ich das auch nicht erwarten.

Also behelfe ich mir derzeit mit einem "unaufälligen" Neustart:

Delphi-Quellcode:
procedure TMain.Restart;
begin
 if (shellexecute(Application.Handle,
                  'open',
                  PChar(ParamStr(0)),
                  nil,
                  PChar(ExtractFilePath(ParamStr(0))),
                  SW_SHOWNORMAL) <= 32)
    then ShowMessage('Bitte manuell neu starten, damit die Änderungen wirksam werden');
  try
  acBeenden.Execute;
  finally
  //do nothing
  end
end;
Problem ist nun, dass ich aus anderen Gründen sicher stellen muss, dass das Programm nur einmal auf dem Rechner läuft und hab nun daher einen Mutex (nach einer Anleitung hier im Forum) eingebaut.
Und damit schieß ich mir nun selbst ins Knie. Das neue Programm startet bevor das alte geschlossen ist. Der Mutext verhindert den Neustart. Das alte Programm schließt. Und kein Programm ist mehr da.

Hat jemand eine Idee was man da machen könnte?

Zweite Frage bzw. Unterbedingung im ersten Problem. Die Anwendung hat eigentlich zwei Formulare. Das erste ist immer unsichtbar, trägt die Business-Logik und ruft das eigentlich sichtbare zweite Fenster auf. Mir ist nun aber nicht ganz klar, wie diese Forms bzgl. FormStyle zueinander stehen, denn wieder aus der Delphi-Hilfe:

Zitat:
Das Formular bleibt immer im Vordergrund, es sei denn, bei anderen Fenstern ist FormStyle auch auf fsStayOnTop gesetzt. Wenn ein fsStayOnTop-Formular ein anderes fsStayOnTop-Formular aufruft, bleibt keines der beiden dauerhaft im Vordergrund.
Wie stelle ich das FormStyle des "unsichtbaren" Forms sinnvollerweise ein?

(Nur so als Info: Das unsichtbare Formular ist das Optionen-Formular, sprich wenn der User was ändern will, wird dieses sichtbar gemacht und anschl. wieder ausgeblendet).
Ralph
  Mit Zitat antworten Zitat