mundodelphi

Apunte sobre como crear e llamar procedimientos y funciones en delphi.

Cuando utilizar un procedimiento y una función?

Utilizaremos procedimientos para hacer tareas repetidas, que no delvuelve control de finalización

ejemplo 1

procedure MiProcedimiento;
begin
showmessage(‘hola mundo’);
end;

para llamar el procedimiento, solo debemos escribir MiProcedimiento;

pero ojo, antes de llamar el procedimiento asegura-te que el código del procedimiento este antes de llamarlo

implementation
{$R *.dfm}

procedure MiProcedimiento;
begin
showmessage(‘hola mundo’);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
MiProcedimiento(‘hola mundo’);
end;

ejemplo 2

llamar el procedimiento con un parametro

procedure MiProcedimiento(texto:string);
begin
showmessage(‘hola mundo, ‘ + texto);
end;

y la llamada seria
MiProcedimiento(‘easy code’);

El resultado nos saldría un cuadro de texto con el texto hola mundo, easy code

procedure MiProcedimiento(texto:string);

Nota: para definir dos parámetros del mismo tipo lo hacemos con el delimitador , si quisieramos poner otro parametro que no fuese integer lo deberíamos poner con ; el procedimiento anterior quedaria así procedure MiProcedimiento(texto,mensaje:string;valor:integer) ;