[rogercito]

eso es lo que utilizo en el primer form y lo que utilizo en el segundo form es es :

Código Delphi [-]
unit Unit24;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;
type
  TForm24 = class(TForm)
    Label1: TLabel;
    RadioButton1: TRadioButton;
    RadioButton2: TRadioButton;
    RadioButton3: TRadioButton;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Button1: TButton;
    Label5: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure RadioButton1Click(Sender: TObject);
    procedure RadioButton2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  form24:tform24;

implementation

uses Unit23; {$R *.DFM}

procedure TForm24.FormCreate(Sender: TObject);
begin
  label5.visible:=false;
end;

procedure TForm24.RadioButton1Click(Sender: TObject);
var
  Salida,LLegada: string;
begin

  Salida:= '15:03:00';      // o convertir: TimeToStr(tu_hora_salida);...
  LLegada:= '15:30:12';
  SendMessage(FindWindow(nil, 'Form23'), WM_USER+300, 0, DWORD(PChar(Salida)));
  SendMessage(FindWindow(nil, 'Form23'), WM_USER+301, 0, DWORD(PChar(LLegada)));
  label5.visible:=true;
  //label8.visible:=true;
end;

procedure TForm24.RadioButton2Click(Sender: TObject);
begin
  label6.visible:=true;
  //label9.visible:=true;
end;

procedure TForm24.Button1Click(Sender: TObject);
begin
  form23.show;
end;

end.