Hallo zusammen,
ich habe ein Form wo in einem Memofeld ein
SQL-Statement geschrieben werden kann, und das dann auf Knopfdruck ausgeführt wird indem es an eine TADOQuerry übergeben wird. Die Daten werden dann in einem DBGrid angezeigt. Funktioniert alles soweit ganz gut.
Es gibt aber Selects, die ganz schön lange laufen, unter Umständen Minuten. Ich möchte verhindern, dass der User in der Zeit wild auf dem Form rumklickt.
Z.Zt. ist es so, dass der User auf irgendwelche Buttons klicken kann, aber nichts passiert, während die Querry läuft. Aber danach werden alle diese Klicks mit Verspätung ausgeführt. Das möchte ich aber so nicht. Es soll auf keinen Klick reagiert werden, der geschieht, während die Querry läuft.
Ich hab schon versucht die ActionList auf asSuspended zu setzen und später dann auf asNormal zurück aber das Hilft nicht. Vllt. hab ich es aber auch an falscher Stelle getan?
Quelle ist die TADOQuerry:
Code:
Quelle.SQL.Clear;
Quelle.SQL.Text:= Memo1.Lines.Text;
try
ActionList1.State:= asSuspendedEnabled;
Quelle.Open;
Application.ProcessMessages;
ActionList1.State:= asNormal;
Hat wer eine Idee, warum das nicht klappt?
Danke,
Jumpy