Transportando Função de uma unit para uma Dll

24/03/2003

0

Olá Pessoal !!!

Eu tenho a seguinte função para fazer com que quando seja pressionado as teclas Seta para cima e Seta para baixo elas funcionem como a tecla tab na unit o código fica assim:

procedure SetaCampo(Key:Word;Form:TForm);
Begin

{ Esta função faz com que as teclas Seta para cima e Seta para baixo funcionar
Como Tab }

If Key=vk_Down then
Begin
Form.Perform(Wm_nextDlgctl,0,0);
end;
If Key=vk_Up then
Begin
Form.Perform(Wm_nextDlgctl,1,0);
end;
End;

Só que agora gostaria de colocar esta função numa Dll só que os parametros delas tem que ser passador como ShortString. Gostaria de saber se tem como ???? Já tentei de todas as formas até mesmo passando os dois parametros como ShortString e convertendo eles para os tipos citados no cabeçalho mas travei na conversão para o Tipo TFORM. Se puderem me ajudar desde já Agradeços...

Ulisses


Ulissesn

Ulissesn

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar