Message "ShowModal" dans une TForm
Bonjour, :D
y-a-til un moyen d'envoyer depuis l'exterieur d'une form, un message (send ou postmessage) indiquant à la form de s'ouvrir en mode modal ?
Ceci fonctionne:
Code:
1 2 3 4 5 6 7 8
| Depuis "l'exterieur"
SendMessage( MaForme.Handle, MONMSG, 0, 0 );
Dans la form:
procedure TMaForme.MONMSGMessage(var Message: TMessage); message MONMSG;
begin
ShowModal;
end; |
Je souhaiterais savoir si il existe un message prédéfini avec éventuellement des param., pour faire un truc du style en équivalence
Code:
1 2
| Depuis "l'exterieur"
SendMessage( MaForme.Handle, SW_SHOWMODAL, 0, 0 ); |
Sans définir de réception de message au niveau de la form.
étant donné que là... le message SW_SHOWMODAL est fictif et n'existe pas.
Je crains une réponse négative mais on sait jamais !
Merci :)