E 'possibile conoscere il modulo viene mostrato con Show() o ShowModal()

Question

mio ambiente: C++ Builder XE4

E' possibile per FormB sapere FormB è mostrato con Show() o ShowModal()?

presso Forma:

void __fastcall TFormA::Button1Click(TObject *Sender) 
{ 
    FormB->Show(); 
    // FormB->ShowModal(); 
} 

Al FormB:

void __fastcall TFormB::FormShow(TObject *Sender) 
{ 
    // with some if sentence to know Show() or ShowModal() 
} 

Answer 1

È possibile verificare per fsModal in FormState al onShowEvent del modulo.

Ti ho fatto un piccolo esempio:

Creare un nuovo progetto e aggiungere un modulo aggiuntivo ad esso. Nella maschera principale posizionare due pulsanti, e far loro visualizzano il secondo modulo:

uses Unit2; 

procedure TForm1.Button1Click(Sender: TObject); 
begin 
    Form2.Show; 
end; 

procedure TForm1.Button2Click(Sender: TObject); 
begin 
    Form2.ShowModal; 
end; 

Niente magia qui: D

quindi aggiungere un OnShowEvent alla Form2:

procedure TForm2.FormShow(Sender: TObject); 
    begin 
     if fsModal in FormState then 
     Caption := 'ShowModal' 
     else 
     Caption := 'Show';  
    end; 

che dovrebbe fare il trucco per te.