Jump to content

Delphi ShowModal doesn't stop


dsprata

Recommended Posts

Hello , I'm using google translator .
I'm opening a form as ShowModal , however, after the call have other instructions that must be made so that the child form is closed , however , I call the child application form is not " paused " continuing . Anyone have any ideas ?

Link to comment
Share on other sites

frmAtendentes.ShowModal;

if unModGeral.gCodigo <> '' then edCd_Problema.Text := unModGeral.gCodigo;

 

The second line have to go into a routine that step as a parameter in the ShowModal ?

 

example

 

frmAtendentes.ShowModal(ShowCallBack);

 


procedure TMainForm.ShowCallBack(Sender: TComponent; AResult:Integer);

begin

   if unModGeral.gCodigo <> '' then edCd_Problema.Text := unModGeral.gCodigo;

end;

 

Would it be this? There's no other way?

Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...