Fórum cannot make a visible window modal #331359
17/10/2006
0
Ao criar meu Form ele me retorna o erro: ´cannot make a visible window modal´
Ao criar o form o foco passa para um edit dentro de um panel, mas nada via código... tudo pelo tabOrder dos componentes
chamo meu form assim:
if Consulta = nil then Consulta := TConsulta.Create(application); Consulta.ShowModal;
outras informações:
procedure TConsulta.FormClose(Sender: TObject; var Action: TCloseAction); begin Consulta := nil; action := caFree; end;
TConsulta.FormStyle := fsNormal
TConsulta.BorderStyle := bsDialog
alguem poderia me ajudar?
Abraços!
Mahdak
Curtir tópico
+ 0Posts
17/10/2006
Massuda
Gostei + 0
17/10/2006
Marco Salles
Citação:
engraçado este erro é tipico de aplicaçoes MDI... mas voce disse que
TConsulta.FormStyle := fsNormal ... Afinal é SDI ou MDI ?????
Gostei + 0
17/10/2006
Mahdak
massuda, o que voce sugeriu deu certo, porem quando eu dou um close no TConsulta ele me da um Access Violation
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)