Delphi - Funcionvereok

 
Vista:

Funcionvereok

Publicado por Esteban Santos (1 intervención) el 19/06/2006 20:44:17
permitanme darles las gracias por adelantado
mi problema es el siguiente:
Quisiera saber como puedo crear una funcion en delphi
es decir, quiero hacer un boton que cuando yo le de un click se active una funcion que yo he creado
es lo que quiero saber como crear esa funcion
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:Funcionvereok

Publicado por Virum (484 intervenciones) el 20/06/2006 18:21:18
Hola:

Creas la función en la seccion Implementation y después en el evento OnClick del botón la llamas.

Un ejemplo sencillo, una función para sumar.

Pon un form con un botón. En este ejemplo te hace la suma de 9 más 7 y te lo muestra con un ShowMessage.

.....
implementation

{$R *.dfm}

//tu función sumar
function suma(a,b: integer): integer;
begin
result := a + b ;
end;

//sumo 9 y 7
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr(Suma(9,7)));
end;
......

Esta función la puedes llamar desde donde la necesites así

suma(valorunsumando, valorotrosumando)

Suerte.
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