Fechar Form

Question

Ol� Pessoal !!!!Tenho uma rotina de acesso que leio no evento onshow() do form,ao identificar que o usuario n�o tem acesso gostaria de fecha-lo logo em seguida mas n�o estou conseguindol, como devo fa...

Comodelphi · Answer

Pq vc nao testa antes de criar o formulario?...

Mayron Cachina · Answer

n sei como est� sua rotina, mais vc poderia usar um flag pra testar

OnFormShow (){
var 
  flag : boolean;
begin
//SUA ROTINA e coloca o flag nela

if flag = true
    Self.close;

end
}

pode fazer algo parecido...

Alexandrej · Answer

[quote:e28d5e62f1=�Robsons�]Tenho uma rotina de acesso que leio no evento onshow() do form,ao identificar que o usuario n�o tem acesso gostaria de fecha-lo logo em seguida mas n�o estou conseguindol, como devo fazer ??[/quote:e28d5e62f1]O ideal seria voc� sobreescrever o construtor do form e definir a rotina de acesso dentro dele.publicconstructor Create(AOwner: TComponent); reintroduce;...constructor TForm1.Create(AOwner: TComponent);begin  inherited Create(AOwner);  // suas defini��esend;...

Raserafim · Answer

boa dica alexandrej, j� passei por este problema e n�o havia pensado em sobrecarregar o constructor do form....

Robsons · Answer

Eu j� tentei no onshow() mas ele n�o fecha...
Quanto ao construtor do form n�o usei e confesso que n�o sei usa-lo, poderiam me dar uma explica��o mais clara...
Eu uso a rotina de acesso dentro do form porque o nome que ele procura na tabela de acessos e o Titulo do Form.....
Valeu galera...

Nigro · Answer

Cria a sua pr�pria procedure de cria��o de form, pois logo ap�s o create do Form voc� j� pega o Caption, e faz o uso antes do Show, caso n�o d� certo tente fazer no Activate, mas de qualquer forma � processamento desnecess�rio, voc� est� criando, dando show em algo que o usu�rio n�o tem acesso.

F�rum Fechar Form #347567