Delphi - Llamar procedure

   
Vista:

Llamar procedure

Publicado por GUSH (8 intervenciones) el 11/05/2010 06:07:19
Hola colegas:

otra vez yo el novato en delphi jejejejejeje, necesito de su ayuda, miren tengo una aplicacion en la cual necesito llamar un procedimiento, esto pa no escribir mas codigo

tengo en el evento de un edit una secuencia de instrucciones que necesito llamar desde otro.

procedure tform1.edit1.onexit(sender:tobject)
begin
// cargo algunos parametros de mi base de datos

end;

procedure tform1.boton.onclick(sender:tobject)
begin
//aqui tengo q cargar los mismos parametros lo he intentado asi y me manda error, como lo puedo hacer?
tform1.edit1.onexit;
end;

ayuda pliss
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Llamar procedure

Publicado por E.T. (1108 intervenciones) el 11/05/2010 06:28:43
Solo te faltó decir quien mandó el mensaje, que en algunos casos puede ser nadie, ademas de que tienes algunos errores al declarar los eventos

esta sería la forma correcta

procedure TForm1.Edit1Exit(Sender: TObject);
begin
//hacer algo
ShowMessage('saliendo del edit');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1Exit(nil);
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar