Discussion :

[mariustrezor]

bonjour à tous
examinez s'il vous plait le code suivant qui se trouve dans l'événement OnClick d'un bouton sur une fiche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
//instructions préliminaires
MaFiche:=TMaFiche.Create(Application);
with MaFiche do
begin
 //initialisation des propriétés des composants de MaFiche
 showmodal
end;

J'obtiens un message d'erreur me disant entre autres impossible de rendre modale une fenêtre visible
J'ai bien vérifié dans le code, il n'y avait aucun autre appel à la méthode show de la fiche avant l'appel à showModal qui cause problème.
Lorsque je le change en Show, la fiche s'affiche sans problème mais j'ai vraiment besoin qu'elle soit modale.
Merci!

[ElNan]

Ta fenetre est surement une fenetre fsMDIChild : on ne peut l'afficher en faisant un ShowModal.

[ElNan]

En fait l'exception levée dans ton cas est levée sur le code suivant dans Forms.pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 function TCustomForm.ShowModal: Integer;
...
 if Visible or not Enabled or (fsModal in FFormState) or
    (FormStyle = fsMDIChild) then
    raise EInvalidOperation.Create(SCannotShowModal);

Dons exception si :
- ta fenetre est déjà visible : apparement non puisquetu viens de la créer, à moins que tu es is en visible := true sur un Create surchargée de ta TForm1.
- ta fenetre est désactivée : même motif même punition que juste avant.
- ta fenêtre est une fenêtre fsMFIChild.

Voila.

[mariustrezor]

merci de me répondre
apparemment, c'est aucun de ces trois cas je continue à scruter le code pour voir s'il y a aucun pépin. Mais pour l'instant, c'est le statu quo.

[JustMe]

Tu remet sa propriété Visible à false à la conception.

[qi130]

Peut-être pourriez vous demander le déplacement de ce post dans le forum Delphi (je ne vois pas le rapport avec les BD ?)

[mariustrezor]

Merci à tous pour vos réponses. En fait, JustMe a raison. Il suffisait tout simplement de mettre la propriété Visible de la fiche à False à la conception. Je me demande d'ailleurs pourquoi j'y ai pas pensé
Le fait est que je n'avais jamais remarqué que cette propriété était automatiquement à False lorsqu'on crée une nouvelle fiche.
Encore merci!!!