GARANTIR DESCONTO

Fórum cannot make a visible window modal #331359

17/10/2006

0

bom estou passando por um dilema aqui...
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

Mahdak

Responder

Posts

17/10/2006

Massuda

No Object Inspector, mude a propriedade Visible do form para False.


Responder

Gostei + 0

17/10/2006

Marco Salles

outra linha de raciocineo..

Citação:
´cannot make a visible window modal´


engraçado este erro é tipico de aplicaçoes MDI... mas voce disse que
TConsulta.FormStyle := fsNormal ... Afinal é SDI ou MDI ?????


Responder

Gostei + 0

17/10/2006

Mahdak

Tconsulta.FormStyle := fsNormal, porem o form que chama ele é MDIChild

massuda, o que voce sugeriu deu certo, porem quando eu dou um close no TConsulta ele me da um Access Violation


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar