如果在操作數據時, 要保持畫面的隨時更新, 最好是將數據操作放在線程中;<br>至於用ShowModal或Show, 看你程式的確切的需求、寫法, 並沒絕對可以或不可以<br>像以以下的方式就可以使用Show<br><br>procedure RunSQLS(cn: Connection; SQLs: array of string);<br> var<br> I: integer;<br>begin<br> with TForm1.Create(nil) do<br> try <br> Show; //顯示提示窗體<br> for I := 0 to High(SQLs)<br> begin<br> Application.ProcessMessages; //處理windows消息, 以Refresh畫面<br> cn.Execute(SQLs);<br> end;<br> finally<br> Free;<br> end; <br>end;<br>
