Fórum fechar formulario #231684
12/05/2004
0
porque nao consigo afzer isso
procedure TForm3.FormShow(Sender: TObject);
begin
showmessage(´teste´);
close;
end;
queria abrir um formulario executar uma linha de codigo qualquer e ja fechar
como poderia fazer isso
alguem pode me dar uma luz
Muito Obrigada
Abraços
Andreia
Andreya
Curtir tópico
+ 0Posts
12/05/2004
Lucas Silva
procedure TForm1.FormCreate(Sender: TObject); begin ShowMessage(´teste´); end; procedure TForm1.FormActivate(Sender: TObject); begin Form1.Close; end;
Gostei + 0
12/05/2004
Andreya
begin
Form1.Close;
end;
infelizmente nao fecha
mesmo assim Muito Obrigada
Abraços
Andreia
Gostei + 0
12/05/2004
Jackson Gomes
Gostei + 0
12/05/2004
Lucas Silva
Com o código que te passei acima, fecha o form sim.
Dê uma olhada lá.
Gostei + 0
12/05/2004
Fer_nanda
se vc só quer executar alguma instrução desse outro formulário vc não precisa abrir, executar e fechar.. se ele já estiver criado vc só precisa se referenciar ao evento desejado. Por exemplo:
qdo clicar num determinado botão (form1) vc quer q apareça a mensagem q está no evento onshow do form2, então vc só precisa fazer isso
procedure TForm1.Button1Click(Sender: TObject); begin // Form2 := TForm2.Create(self); --> caso o form2 não esteja sendo criado automaticamente form2.OnShow(self); end;
e é claro... precisa adicionar a unit do form2 no form1
espero ter ajudado
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)