ActiveControl = nil

Question

Ol�,O meu problema � o seguinte:Tenho 2 forms, um Pai e outro filho. Quando tento usar a propriedade ActiveControl no form filho, a mesma vem nil. Acredito que isso seja aconte�a devido ao form pai es...

Delphi32 · Answer

Olha, eu nunca trabalhei com forms pai e filho, mas at� onde eu sei a propriedade ActiveControl retorna qual controle possui o foco no form. Atrav�s dessa propriedade voc� tem como saber se o controle que tem o foco � um edit, ou um bot�o, etc.
Para saber quem � o form pai do seu form use a propriedade Parent do form filho. Ex.:

   FormFilho.Parent.Caption := variavel;

At�!

Roswel · Answer

Certo, mas o ActiveControl esta vindo nil e ai n�o d� pau se for us�-lo ......

Roswel · Answer

Quer dizer: D� pau quando vou us�-lo ......

Massuda · Answer

Como o colega delphi32 escreveu, a propriedade ActiveControl � usada para saber qual controle tem o foco de entrada e � v�lido ter ActiveControl = nil, pois o form pode estar desativado.

Acho que tem duas alternativas... voc� inclui no seu c�digo o caso do ActiveControl ser nil (o form est� desativado) ou voc� poderia explicar melhor o que deseja fazer para vermos se existe alguma alternativa.

Delphi32 · Answer

entendi. Ent�o o seu problema n�o � acessar o form pai e sim acessar o controle ativo, certo? � isso mesmo? mas voc� quer acessar o controle ativo de quem? form pai ou filho? qual dos dois est� retornando nil e como voc� est� chamando a propriedade?

N�o esque�a que existem duas propriedades ActiveControl. Uma do TCustomForm e outra do TScreen. Por isso perguntei como voc� est� chamando a propriedade. O mais correto (acredito eu) seja chamar com o nome do form antes. Por exemplo Form.ActiveControl. Porque se voc� estiver chamando Screen.ActiveControl a� ele retorna o controle ativo do form ativo que no caso acredito eu que seria o form filho.

Fa�a um teste aqui e depois diga se funcionou ou n�o. At�!

Roswel · Answer

Ol�,Testei usando o Screen.activecontrol e deu certo!!!! Ele pegou o ActiveControl do Form Filho, do jeito que eu queria!!!!!!!!!Muito Obrigado � todos que postaram  :D...

F�rum ActiveControl = nil #270204