Alle Elemente vom Formular enable := false ?

[Satyr]

Huhu,

gibt es eine Möglichkeit alle Elemente eines Formulars mit einem Befehl zu "deaktivieren" oder muss man zwingend alle durchgehen?
Wobei ich dabei nur die wirklich sichtbaren Komponenten meine.

Gruß,
Andreas

[SirThornberry]

Was bezweckst du damit? Wenn die Komponenten nur nicht anklickbar sein sollen kannst du entweder das Formular auf Enabled=False setzen oder falls das Formular weiterhin benutzbar sein soll alle Komponenten (eigentlich Controls) die direkt auf dem Formular liegen auf ein Panel packen und bei diesem Enabled auf False setzen.

Falls die Controls alle optisch als deaktiviert erkennbar sein sollen bleibt nichts anderes übrig als diese durch zu iterieren. (TWinControl.ControlCount + TWinControl.Controls)

[Satyr]

Ich lasse eine lange (ca. 5000) Liste mit Strings in eine ListBox und gleichzeitig in eine DB einlesen. Das dauert, verständlicherweise. Damit man sieht das sich was tut, möchte ich jede Stringeinfüging in die ListBox Live anzeigen und im Status Panel auch ausgeben.
Die Anzeigen updaten sich aber nur, wenn ich jeweils ein Application.ProcessMessages; einbaue. Soweit, so gut.
Leider hat das den unschönen Nebeneffekt, das immer wenn Application.ProcessMessages; aufgerufen wird, mein Cursor für 1-2 Sekunden von crHourGlass auf rrDefault wechselt und in der Zeit die Controls anklickbar sind.
Das stört mich natürlich. Auch weil der Cursor dadurch "flackert".

[DeddyH]

Wäre ein Thread nicht eine sauberere Lösung?

[himitsu]

Zitat:

Wäre ein Thread nicht eine sauberere Lösung?

Sagen wir es mal so, wenn alles im Hauptthread läut und man der Form/Application keine Möglichkeit der Messageverarbeitung gibt, dann kann man sich das Disablen auch sparen.

So oder so, ob mit regelmäßigen ProcessMessages oder mit Thread ... man sollte das "sperren", was nicht rekursiv/geichzeitig aufgerufen werden darf/soll.

Zitat:

jede

Wenn etwas schnell ist, dann kann man damit alles ausbremsen.
- entweder mit fester Schrittweite z.B. nur jeden 100-ten
- oder zeitgesteuert die Anzeige auffrischen, bzw. den Fortschritt anzeigen.
z.B. alle 100-250 Millisekkunden sind flüssig oder eben alle 1 Sekunde

PS: BeginUpdates der ListBox beschleunigt auch die Verarbeitung und es guckt eh kaum jemand sich alle 50000000 Einträg der Box an, vorallem nicht, wenn man eine schöne ProgressBar/Counter zur Verfügung hat.





Die Form Disablen?

Oder die entsprechenden Komponenten auf ein/mehrere TPanel und dann das/die Panel disablen.

Oder ein modales "Progess"-Fenster an diese Form hängen (dabei wird die Form automatisch disabled)

Oder ...
- du schaust dir die Vererbung an
- suchst einen gemeinsamen Vorfahren, welcher die gewünschte Eigenschaft/Funktion enthält oder gar implementiert
- dann geht man alle Components oder rekursiv die Controls (jenachdem wie die Owner vergeben sind) der Form durch
- prüft auf diesen Vorfahren und verwendet den passenden Cast, um auf diese Eigenschaft/Funktion zuzugreifen.

[Satyr]

Ich muss zugeben, Threading wollte ich vermeiden, weil ich mich bisher damit nicht beschäftigt hatte und somit nicht auskenne.
ProgressBars wären mir zu aufwändig, weil die Anzahl der Strings variieren kann. Lässt sich zwar errechnen aber auch das kostet wieder Zeit.
Und die ProcessMessages brauche ich halt, damit StatusUpdates überhaupt angezeigt werden.

Aber nur alle 500 Datensätze upzudaten habe ich eingebaut, das lässt das Cursor Flackern verschwinden, vielen Dank für den Tipp. Den Rest werde ich dann wohl tatsächlich über Panels regeln.

Danke für Eure Anregungen .