CommonDialog

Exemples d'Utilisation
Filtre : Fichier Choisi : Filtre : Fichier Choisi :
Explications
<OBJECT NAME="CommonDialog" ID="CommonDialog" CLASSID="CLSID:F9043C85-F6F2-101A-A3C9-08002B2F49FB"> <PARAM NAME="_ExtentX" VALUE="847"> <PARAM NAME="_ExtentY" VALUE="847"> <PARAM NAME="_Version" VALUE="393216"> <PARAM NAME="CancelError" VALUE="0"> <PARAM NAME="Color" VALUE="0"> <PARAM NAME="Copies" VALUE="1"> <PARAM NAME="DefaultExt" VALUE=""> <PARAM NAME="DialogTitle" VALUE=""> <PARAM NAME="FileName" VALUE=""> <PARAM NAME="Filter" VALUE=""> <PARAM NAME="FilterIndex" VALUE="0"> <PARAM NAME="Flags" VALUE="3"> <PARAM NAME="FontBold" VALUE="1"> <PARAM NAME="FontItalic" VALUE="0"> <PARAM NAME="FontName" VALUE="Courier New"> <PARAM NAME="FontSize" VALUE="12"> <PARAM NAME="FontStrikeThru" VALUE="0"> <PARAM NAME="FontUnderLine" VALUE="0"> <PARAM NAME="FromPage" VALUE="0"> <PARAM NAME="HelpCommand" VALUE="0"> <PARAM NAME="HelpContext" VALUE="0"> <PARAM NAME="HelpFile" VALUE=""> <PARAM NAME="HelpKey" VALUE=""> <PARAM NAME="InitDir" VALUE=""> <PARAM NAME="Max" VALUE="0"> <PARAM NAME="Min" VALUE="0"> <PARAM NAME="MaxFileSize" VALUE="260"> <PARAM NAME="PrinterDefault" VALUE="1"> <PARAM NAME="ToPage" VALUE="0"> <PARAM NAME="Orientation" VALUE="1"> </OBJECT>
CouleurCommentaires
CommonDialog.Color=couleur เ modifier;
CommonDialog.ShowColor();
couleur เ modifier=CommonDialog.Color;
pour que cela fonctionne j'ai du faire
    couleur เ modifier   112233 en H้xa
<=> couleur Commondialog 332211
je ne sais pas si c'est normal
ou si je fais une erreur. o๙ ?
ImprimanteCommentaires
 CommonDialog.flags=3;
 CommonDialog.ShowPrinter();
Flags en H้xa
000001  s้lectionne option S้lection
000002                     Tout
000004  force option Tout
000008  s้lectionne option Page
000010  copies assembl้es coch้
000020  impr. fichier coch้
000040  configuration imprimante
000080  pas de message si imprimante
        par d้faut absente
000800  bouton Aide
100000  Impr. vers Fichier cach้
CommonDialog.Copies
CommonDialog.FromPage
CommonDialog.PrinterDefault
CommonDialog.ToPage
CommonDialog.Orientation
PoliceCommentaires
CommonDialog.Flags=0x0103;
CommonDialog.ShowFont();

Flags en H้xa ( on peut combiner )
000002   polices imprimantes
000003   polices ้crans ou imprimantes
000004   bouton Aide
000100   barr้,soulign้,couleurs activ้s
000400   polices Windows
004000   polices fixes
008000   polices ้crans et imprimantes
040000   police True Type
nom    police choisie : CommonDialog.FontName
taille                                   Size
Gras ?                                   Bold
Italique ?                               Italic
Ray้ ?                                   StrikeThru
Soulign้ ?                               UnderLine
FichierCommentaires
 CommonDialog.Title="titre boite dialogue";
 CommonDialog.Flags=voir ci dessous;
 CommonDialog.Filter=voir cidessous;
 CommonDialog.Filename="";
 CommonDialog.ShowOpen(); ou CommonDialog.ShowSAve();

Flags en H้xa ( on peut combiner )
000001  case เ cocher "Read Only" valid้e
000002  message si fichier existe
000004  case เ cocher "Read Only"
000008  r้pertoire en cours = celui actif เ 
        l'ouverture de la boite de dialogue
000010  bouton Aide
000100  caract่res non valides autoris้s
000200  multi-selections autoris้s
000400  extansion renvoy้e non= DefaultExt
000800  le nom chemin doit ๊tre valide
001000  doit exister
002000  message Cr้er ? si n'existe pas
004000  erreurs de violation de partage ignor้s
008000  pas d'attributs Read Only
040000  pas de noms longs
080000  boite de dialoque style window 95
100000  pas de raccourcis
200000  noms longs

Filter : de la forme type | เ lister [ type | เ lister ... ]
associ้ avec FilterIndex ( nฐ dans Filter par d้faut )
type     : titre 
           exemple : tous 
                     textes
                     sons ...
เ lister : * ? autoris้s, s้par้s par ;
           exemple : *
                     *.txt;*.rtf
                     *.mp3;*.wav

exemple : *|*|Textes|*.txt;*.rtf|Sons|*.wav;*.p3|
          Ex้cutables|*.com;*.exe;*.bat;*.hta;*.htm;*.html|
          Tous|*
 if (CommonDialog.Filename.length>0) 
     { un fichier a ้t้ choisi }
else { bouton Annuler }
HelpCommentaires
 je ne sais pas ?

HelpCommand
HelpContext
HelpFile : fichier appel้ si appui sur touche Aide
HelpKey

si c'est incomplet, s'il y a des erreurs,
si vous voulez des ้claircissements, des explications ...
contactez-moi : marcel Bultez