在程式中有一個主窗體和一個公共子窗體，在主窗體中按每個按鈕，可以建立起公共窗體 現在：按Button1或Button2時，可以建立公共窗體，按“OK”鍵顯示message，然後公共窗體自動關閉 想要的結果：按Button，公共窗體建立，按“OK”鍵顯示message，顯示完畢返回公共窗體，可以再次按“OK”鍵顯示message。直到按“Cancel”鍵，關閉公共窗體。 必須保持公共窗體的獨立性，以保證不同按鈕都可以調用。    請各位幫忙看看能不能解決，先謝謝了。     發表人 - leonli 於 2005/07/12 00:59:46

爲什麽沒有人能幫我解決這個問題呢？ 附件檔在這裏下載： http://delphi.ktop.com.tw/loadfile.php?TOPICID=23398641&CC=523299

Form1 的 Button 的 Click 內容改為如下試試:

begin
  with TForm2.Create(nil) do
    begin
      ShowModal;
      while ModalResult = mrOK do
      begin
        ShowMessage('Button1');
        ShowModal;
      end;
      Free;
    end;
end;

-- hagar.