Form em tempo de execussão variavel
Meus formularios são em tempo de execurssão e preciso passar uma variavel para outro formulario
exemplo: no cadastro de cliente devo enviar para outro formulario de relatório emissão de contrato o nome do cliente, utilizando variavel public mas dar erro sempre.
preciso de uma função pra isso
exemplo: no cadastro de cliente devo enviar para outro formulario de relatório emissão de contrato o nome do cliente, utilizando variavel public mas dar erro sempre.
preciso de uma função pra isso
Dpinho
Curtidas 0
Respostas
Nigro
25/05/2004
Colque seu código aqui, pois com variável pública e as uses devidamente dedclaradas não tem como dar errado.
GOSTEI 0
Dpinho
25/05/2004
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
GOSTEI 0