Como definir o SET FOCUS no momento de incluir um registro
Pessoal,
Estou tendo dificuldades de definir o setfocus no 2o. campo da tela, sempre que o usuário solicitar uma nova inclusão. O 1o. campo é uma chave incrmentada e por isso está como READ ONLY.
Não consigo encontrar em qual evento devo acrescentar o SETFOCUS. Desculpem a pergunta básica...rs
Alex
Estou tendo dificuldades de definir o setfocus no 2o. campo da tela, sempre que o usuário solicitar uma nova inclusão. O 1o. campo é uma chave incrmentada e por isso está como READ ONLY.
Não consigo encontrar em qual evento devo acrescentar o SETFOCUS. Desculpem a pergunta básica...rs
Alex
Alexsandro
Curtidas 0
Respostas
Belo
03/02/2005
Defina no evento OnNewRecord da sua tabela, veja o exemplo:
procedure TDM.SuaTabelaNewRecord(DataSet: TDataSet);
begin
SuaTabelaSeuCampo.FocusControl;
end;
procedure TDM.SuaTabelaNewRecord(DataSet: TDataSet);
begin
SuaTabelaSeuCampo.FocusControl;
end;
GOSTEI 0
Sandra
03/02/2005
Alexsandro,
Verifique o TabOrder dos componentes que estão no seu form: clique com o botão inverso do mouse sobre o seu form e escolha Tab Order. Na janelinha que abrir, defina qual a seqüência de objetos que o seu programa deve seguir, movendo-os convenientemente com as setas e pressione OK.
Como o campo da chave não será digitado pelo usuário e por estar com ReadOnly = False, habilite também a propriedade Enabled = False que, automaticamente o SetFocus passará para o próximo componente. Porém, se preferir, para ter certeza que estará nele, pode definir o foco no momento do clique do botão incluir também. Veja:
Espero que ajude!
Verifique o TabOrder dos componentes que estão no seu form: clique com o botão inverso do mouse sobre o seu form e escolha Tab Order. Na janelinha que abrir, defina qual a seqüência de objetos que o seu programa deve seguir, movendo-os convenientemente com as setas e pressione OK.
Como o campo da chave não será digitado pelo usuário e por estar com ReadOnly = False, habilite também a propriedade Enabled = False que, automaticamente o SetFocus passará para o próximo componente. Porém, se preferir, para ter certeza que estará nele, pode definir o foco no momento do clique do botão incluir também. Veja:
procedure TForm1.BitBtn1Click(Sender: TObject); begin SeuSegundoCampo.SetFocus; end;
Espero que ajude!
GOSTEI 0
Alexsandro
03/02/2005
Legal pessoal,
Obrigado Sandra. Vejo que você é bastante participativa neste fórum.
Muito Obrigado a todos,
Alex
Obrigado Sandra. Vejo que você é bastante participativa neste fórum.
Muito Obrigado a todos,
Alex
GOSTEI 0