Hola martini002.
Cita:
Me gustaria conocer la forma de llamar al primer procedimiento desde el segundo
|
Ejemplo:
Código Delphi
[-]
...
procedure TForm1.Image1Click(Sender: TObject);
begin
if Sender is TLabel then
ShowMessage(TLabel(Sender).Name); end;
procedure TForm1.Label3Click(Sender: TObject);
begin
Image1Click(Sender)
end;
...
Como ves, no estabas tan lejos...
Saludos