若我有三個Form分別為A,B,C... 分別都可以Call Form D(此Form為Search的畫面,分別讓Form A,B,C來共用)... 我要怎麼去判斷說是那一個Form來call Form D呢... 是不是要用到Sender這個呢... 現在就是不知道程式要怎麼寫...>"< 麻煩各位大大指導一下囉...感恩...

應該不用用到Sender 寫個共同變數 當各Form呼叫FormD時順道修改該值 當FormD,Show時判斷該變數值即可知道是誰在call  

void __fastcall TForm2::FormShow(TObject *Sender)
{
   if(CommVar=="FormA")
    {
    }
   else if(CommVar=="FormB")
     //..........;
}
 

引言: 應該不用用到Sender 寫個共同變數 當各Form呼叫FormD時順道修改該值 當FormD,Show時判斷該變數值即可知道是誰在call

void __fastcall TForm2::FormShow(TObject *Sender)
{
   if(CommVar=="FormA")
    {
    }
   else if(CommVar=="FormB")
     //..........;
}
 

這個方式我用過了...只是在想說還有沒有辦法不用到共同變數的方式... 感謝大大指導...感恩...

A,B,C三個如果是三種不同物件, 而他們都是繼承TForm 例如: 他們分別為TAForm, TBForm, TCForm. 那麼在D中，只要用(Sender is TAForm)的方式比對.. if (Sender is TAForm) or (Sender like TAForm) then begin ... 你試看看is與like的用法, 也許能達到你要的功能。 end;

不知道你是如何呼叫該Search form 一般利用Sender的方法可如下~ 

 
  TButton* now_Sender=(TButton*)Sender;
   if(now_Sender->Name=="Button1")
    //......;
   else
    //.......

但如果為不同的FORM之間傳遞,則此Sender為被呼叫的form此例為FormD 所以此法無實質效益~

有三種做法: (1) 在 FormD Class 的 public: 加上一個自訂函數 bool Execute( int a); a 就是你的 From 代碼(自己用 enum去訂)， 程式碼內容就是 bool TFormD::Execute( int a) { FormD->Show(); switch(a) { case 1: // 做你要做的事: break; case 2: // 依此類推. } } ================== 例如 FormA 要呼叫 FormD 原本是用FormD->Show(); 那現在就變成 FormD->Execute(1); 一樣的效果。 (2) 一樣在FormD class public 上加上一個變數(例如 int Work)，也就是rogan321大大講的方法，再呼叫 FormD->Show() 之前，先設定 FormD->Work = 1; (3) 什麼都不需要，直接在 FormA、B、C 呼叫 FormD就好了.. 傳回的變數，直接在 A,B,C內處理就夠了. if( FormD->ShowModal() == mrOk) { DM->Query1->ParamByName("Zone")->AsString = FormD->Edit1->Text; DM->Query1->Open(); } 以上三種方法自己去選一個來用吧...