Ver Mensaje Individual
  #4  
Antiguo 14-07-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola sonymix.

Suponiendo que la función sea:
Código:
function NumALetras(const Num: string): string;
Y el TEdit donde escribís los números se llame Edit1, podés usar el evento OnExit de Edit1 para llamar a la función y asignar el resultado a EDit2.
( Supongamos que así se llama el otro edit ).


Estando seleccionado Edit1, en el Object inspector, events, haciendo doble click sobre el evento OnExit:
Código:
procedure TForm1.Edit1Exit(Sender: TObject);
begin
  Edit2.Text:= NumALetras(Edit1.Text);
end;
No dudes en poner cualquier duda.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita