toda vez q o foco retornar para o form anterior jogar o foco para um objeto especifico [delphi]

Delphi

14/11/2017

apartir desse formPrincipal eu abro outros, quando eu fechar esses outros forms e o foco for retornar a formPrincipal o StringGrid deve receber o foco automaticamente.
algo tipo assim:

procedure formPrincipal .FormActivate(Sender: TObject);
   begin
      if Self.ActiveControl <> stringgrid then
	begin
		self.stringgrid.SetFocus;
	end;
   end;
  end.
Henrique Dias

Henrique Dias

Curtidas 0

Melhor post

Diego Jacauna

Diego Jacauna

21/11/2017

olá...

Acredito que possa fazer isso de 2 formas que já testei

1ª- Se vc abrir os outros forms como modais basta vc colocar o setfocus apos chamar a abertura dos forms
Ex. 
Form1.showmodal;
stringgrid.setfocus;


2ª - Vc pode dá um hide na tela principal e chamar o outro form e depois que o form for fechado vc pode colocar um show e no onshow do form principal colocar o que vc quer.
ex.:
hide;
Form1.showmodal;
show;


no onshow coloca

      if Self.ActiveControl <> stringgrid then
	begin
		self.stringgrid.SetFocus;
	end;
GOSTEI 1
POSTAR