Hola...
¿Estás seguro que
Form1 es una variable que apunta al formulario que deseas?
Ahora, algo que yo hago cuando quiero usar formularios a los que les mando valores para mostrar es crear propiedades públicas que hagan esa función:
Código Delphi
[-]
type
TForm1 = class(TForm)
private
function GetNombre: string;
procedure SetNombre(const Value: string);
public
property Nombre: string read GetNombre write SetNombre;
end;
implementation
function TForm1.GetNombre: string;
begin
Result := Edit1.Text
end;
procedure TForm1.SetNombre(const Value: string);
begin
Edit1.Text := Value
end;
Así ya puedo hacer algo como:
Código Delphi
[-]
begin
with TForm1.Create(nil) do
try
Nombre := 'Filomeno';
if ShowModal = mrOk then
ShowMessage(Nombre)
finally
Free
end
end;
Espero te sirva...
Saludos...