Fórum Iniciante com duvida #143776
10/03/2003
0
:)
Estou Desenvolvendo meu primeiro programa em Delphi 6. Usei a CLX e agora to quebrando a cabeça pra fazer a mudança entre os campos com o enter ao invés do tab. Tentei um código de um amigo, mas não funcionou. O código é o seguinte:
if key = #13 then
begin
key:=0;
perform(Wm_NextDlgCtl, 0, 0);
end
isso no evento Keypress e a propriedade Keypreview como true. Funcionou bem na biblioteca conveniconal mas quando usei a CLX deu erro...
alguém tem um código que funcione na CLX?!
Agradeço a ajuda.
Anonymous
Curtir tópico
+ 0Posts
10/03/2003
Anonymous
if Key = #13 then Key := 9;
não sei se vai funcionar, nunca testei.
perform(Wm_NextDlgCtl, 0, 0); // isso não funciona por ser API do Windows, agora vc está em Linux ´The World Modified´
Gostei + 0
10/03/2003
Evandro Massini
Vc vai utilizar seu sistema na plataforma Linux??? Caso contrário , ao invés de iniciar uma aplicação CLX , inicie uma aplicação VCL.
Lamento não poder ajudar mais...
Até mais...
Gostei + 0
10/03/2003
Rood_luiz
if key = #13 then
Selectnext(activecontrol,true,true);
end;
else
key := 0;
Espero ter ajudado.
Rood :)
Gostei + 0
10/03/2003
Paulo
begin
if key = #13 then begin
key := 0;
Perform(CM_DialogKey, VK_Tab, 0);
end;
end;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)