Eingabeinterface kurzeitig sperren (Maus+Tastatur)

[Meflin]

Zitat:

Zitat von mr_emre_d

[Dann soll er alles auf n Panel packen und Panel1.Enabled := False - setzen

Gut, dass dus NOCHMAL widerholt hast :lol:

[mleyen]

Nennt man sowas nicht auch "schmuddelprogrammierung"? :smile2:

Hier hatte ich mir damals auch was zusammengeschrieben:

Delphi-Quellcode:

{*----------------------------------------------------------------------------------------
De/-aktiviert alle Controls im übergebenem TWinControl

@Comment Aufgrund der Darstellung geh ich rekursiv durch alle Untercontrols durch
@Param Win Alles hierdrin wird disabled
       Enable Aktivieren/Deaktivieren
----------------------------------------------------------------------------------------*}
procedure EnableCntrls(const Win: TWinControl; const Enable: Boolean = true);
var
  i: Integer;
begin
  for i := 0 to Win.ControlCount - 1 do
  begin
    Win.Controls[i].Enabled := Enable;
    if Win.Controls[i] is TWinControl then
      EnableCntrls(TWinControl(Win.Controls[i]), Enable);
  end;
end;

Jetzt brauchst du nur noch wiefolgt aufufen:

Delphi-Quellcode:

EnableCntrls(Self, false);

[mr_emre_d]

Zitat:

Zitat von Meflin

Zitat:

Zitat von mr_emre_d

[Dann soll er alles auf n Panel packen und Panel1.Enabled := False - setzen

Gut, dass dus NOCHMAL widerholt hast :lol:

xD hab ja nicht alles gelesen :) bin bis zu der Aussage gekommen, dann dacht ich mir, dass ich gleich antworte :P

MfG und sorry

[mirage228]

Ich packe da mal noch meine Funktion aus der Code-Library zu ;-)
Alle Subcontrols eines Controls dis- / enablen

Viele Grüße

[Whookie]

Erst mal danke für die vielen Hinweise!

Ich habe mir natürlich auch einige Gedanken darüber gemacht, wie sowas umgesetzt werden könnte.

Disablen aller Controls (= Menü, Toolbars, Hauptform) ist eine Möglichkeit, die ich nicht Erwägung gezogen hatte, sie hat halt den Nachteil, das dann alles "grau" wird, was unschön sein könnte.

Ein Programm das eben mal verschwindet, weil das Speichern länger dauert (und dann eventuell auch noch selber wieder aus der Versenkung auftaucht) finde ich allerdings noch viel schlimmer. Ein Bild von meinem Programm Design habe ich angehängt.

Vorstellen könnte ich mir auch, einen Dialog der Modal über dem Programm liegt und ähnlich dem Kopieren-Dialog in Windows eine Animation + Fortschrittsbalken bietet und so das Programm "legal" sperrt. Ist aber auch ned so schön, wenn sowas nach dem "Speichern"-Dialog aufpoppt ...

Eine weitere Option wäre es einen "Screenshot" vom aktuellen Programm zu machen, die eigentliche Form zu verstecken und eine "Dummy-Form" mit dem Bild + Fortschrittsbalken anzuzeigen (so macht Windows das mit Programmen die sich nicht mehr melden)... naja ... irgendwie auch nicht schön?

Gibt es dazu noch Meinungen?

LG
Whookie

[mr_emre_d]

Zitat:

Zitat von Whookie

Disablen aller Controls (= Menü, Toolbars, Hauptform) ist eine Möglichkeit, die ich nicht Erwägung gezogen hatte, sie hat halt den Nachteil, das dann alles "grau" wird, was unschön sein könnte.

wenn du alles auf ein panel klatscht und es disablest, werden die Controls nicht grau angezeigt

Demodino im Anhang

MfG

[Whookie]

Das mit dem Panel sieht nicht schlecht aus, nur das Hauptmenü bleibt davon leider ausgeschlossen ...

[_frank_]

du könntest das Hauptmenü zeitweise entfernen (form.menu:=nil;) und danach wieder zuweisen.

für den rest wäre evtl auch noch eine Möglichkeit, wie vorher gesagt alles auf ein Panel, dieses aber verstecken (panel.Visible:=false;). hätte den vorteil, dass man das fenster noch normal bedienen kann, aber die Aktionscontrols nicht bedienbar sind. an der Stelle wo das Panel war kannst du ein anderes Panel einblenden, was deinen Fortschrittsbalken und ggf. weitere Infos, eine Grafik oder Animation anzeigt.

Gruß Frank