Ver Mensaje Individual
  #2  
Antiguo 30-09-2014
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 jeremiselxi.

Hay que darle visibilidad al procedimiento, declarándo la cabecera en la sección interface:
Código Delphi [-]
...
interface
...
var
  Form1: TForm1;

procedure sumar(a: string); // <== 

implementation 
{$R *.dfm}

uses Unit2;

procedure sumar(a: string);
begin
  ShowMessage('Hola ' + a);
end;

Y desde Form2 ya podes hacer:
Código Delphi [-]
...
implementation  
{$R *.dfm}

uses Unit1;

procedure TForm2.Button1Click(Sender: TObject);
begin
  sumar('mundo');
end;

Saludos
__________________
Daniel Didriksen

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