Fórum Form em tempo de execussão variavel #234234

Colque seu código aqui, pois com variável pública e as uses devidamente dedclaradas não tem como dar errado.

// Aqui eu chamo o formulario passando a variavel publica

procedure TfmAluno.butLocalizarClick(Sender: TObject);
Var
F: TForm;
begin
nomeal:=DBAluno.Text; // Variavel publica

F := TfmLocalu.Create(Application);
try
if F.ShowModal = mrOK then begin
Application.Initialize;
Application.CreateForm(TfmLocalu, fmLocalu);
Application.Run;
end;
finally
F.Free;
end;
fmEntrada.pPrograma := ´´;
end;


//Aqui deveria receber o valor
procedure TfmLocalu.FormShow(Sender: TObject);
begin
Label1.Caption := fmAluno.nomeal;
end;

Retorna erro de violação de memoria, objeto não instaciado