Return Focus To Previous Form Controls after close the Top Form

[molla2005b]

Hi , i would like to  Return Focus To Previous Form Controls after close the Top(Modual) Form:

 

ex :

I Open Form1 and Open Form2 Thru Form1.I want to return Focus to Form1 control After Close Form2

I try with setFocus and WebFocus and UniSession.AddJS and SetActivate

  but not work.

 

I upload a test case Download

 

Best regards.

[Sherzod]

Hi,

 

For now try:

 

For example:

procedure TMainForm.UniButton1Click(Sender: TObject);
begin
  UniForm1.ShowModal
  (
     procedure(sender:TComponent;Res:Integer)
     begin
       //ed1.WebFocus;
       UniSession.AddJS('setTimeout(function(){'+ ed1.JSName +'.focus()}, 100)');
     end
  );
end;

Best regards.

[molla2005b]

Big Thanks

Delphi Developer

It is work perfectly ....

[leandroavila74]

Hi,

 

For now try:

 

For example:

procedure TMainForm.UniButton1Click(Sender: TObject);
begin
  UniForm1.ShowModal
  (
     procedure(sender:TComponent;Res:Integer)
     begin
       //ed1.WebFocus;
       UniSession.AddJS('setTimeout(function(){'+ ed1.JSName +'.focus()}, 100)');
     end
  );
end;

Best regards.

 

I'm having problems using mobile,

In mobile setfocus is not working

I tried using this method but in mobile it does not work

 

Leandro

[Sherzod]

Hi,

 

Can you make a small test case?!

 

Best regards.