必需讓使用者在等待的時候,無法控制主Form. 我的處理方式是 procedure TForm1.FormActivate(Sender: TObject); begin if Form2.showing then Form2.Show; end; end. Form1 在處理完成後再關掉 Form2. 不過不知道有沒有美觀一點的物件..有連線中的樣子的圖..

zombit您好 可以用ShowModal使form為唯一可控制 可以用TAnimate.FileName載入自建的Avi來撥放傳送中的動畫 TAnimate有預設一些系統用的動畫

引言: zombit您好 可以用ShowModal使form為唯一可控制 可以用TAnimate.FileName載入自建的Avi來撥放傳送中的動畫 TAnimate有預設一些系統用的動畫

ShowModal 的方式我有試過, 我的整個敘述是這樣的, In Form1: xxxxxx; xxxxxx; Form2.show; i:=yyyyyy(); // 要花時間的程序. if i.. then Form2.close; // 如果 Form2 的開啟方式改用 Form2.showmodal, 的話,在 Form2.showmodal 之後的敘述都要等 Form2 close 之後, 才會繼續執行,所以似乎不適用. // TAnimate 我試試看,謝謝