Les systèmes Windows boîtes de dialogue


Les boîtes de dialogue windows que microsoft a oublié de document
la Plupart d'entre nous ont vu ces boîtes de dialogue de windows et la plupart des états membres des programmes ici est un moyen d'entrer en contact avec la plupart de ces:
1) Sortie de boîte de Dialogue windows présenté quand vous allez dans le menu démarrer et sélectionnez arrêter. la poignée paramètre n'est pas utilisé dans windows NT sur un ordinateur windows 95, vous obtenez un WM_QUIT dans wndproc, cependant, si vous affectez un événement dans OnCloseQuery va faire.
& nbsp & nbsp procédure ExitWindowsDialog(Poignée: THandle) stdcall externe 'shell32.dll indice 60 //déclaration d'API
Exemple d'utilisation:
procedure TForm1.Button1Click(Sender: TObject)
begin
& nbsp & nbsp ExitWindowsDialog(Manche)
fin
2) Redémarrer windows boîte de dialogue est présenté à chaque fois qu'un système de changement à l'échelle (surtout avec les pilotes), le paramètre flags de la poignée est utilisée pour connaître le propriétaire de la fenêtre de la raison est une chaîne qui est indiqué dans la boîte de dialogue (astuce: utiliser un retour de chariot pour diviser le texte en lignes) les indicateurs correspondent à aucun ExitWindowsEx ou ExitWindows drapeau (ils commencent la plupart avec EW_XXX ou EWX_XXX)
& nbsp & nbsp fonction RestartWindowsDialog(Poignée: THandle Raison: PChar Drapeaux: Integer): Integer stdcall externe 'shell32.dll' index 59
Exemple d'utilisation:
procedure TForm1.Button2Click(Sender: TObject)
begin
& nbsp & nbsp RestartWindowsDialog(Poignée, PCHAR('ME DIO LA GANA'), EW_RESTARTWINDOWS)
fin


3)sélection d'une icône de la boîte de dialogue est celui affiché à chaque fois que tu veux sélectionner une icône dans l'environnement windows, filename spécifie le nom de fichier à partir d'où extraire des icônes, filenamesize est la longueur de la chaîne (généralement de Longueur(nom de fichier) en supposant que le nom de fichier sous forme de chaîne), Indexicône est une variable qui reçoit le indexicône sélectionné dans la boîte de dialogue. la valeur de retour de la fonction est true si le dialogue est un succès et que le bouton ok est sélectionné, la valeur false si la pression du bouton annuler
& nbsp & nbsp fonction PickIconDialog(Poignée:THandle nom de fichier:PChar FileNameSize:entier var Indexicône:integer):Boolean stdcall externe 'shell32.dll' index 62
Exemple d'utilisation:
procedure TForm1.Button3Click(Sender: TObject)
var
& nbsp & nbsp Indexicône: Integer
begin
& nbsp & nbsp si PickIconDialog(Poignée, PChar('shell32.dll'), Length('shell32.dll'), Indexicône)
& ! & ! & ! & nbsp ShowMessage('Selecciono' IntTOStr(Indexicône))
fin
4) Exécuter la boîte de dialogue de fichier est exécuté à chaque fois que vous sélectionnez dans le menu démarrer exécuter, et est également observée dans windows media player et internet explorer. ici est l'api qui va faire l'affaire
& nbsp & nbsp procédure RunDialog(Poignée: THandle Icône: HIcon Répertoire: PChar Titre: PChar Description: PChar Drapeaux: Integer) stdcall externe 'shell32.dll' index 61
Exemple d'utilisation:
procedure TForm1.Button4Click(Sender: TObject)
begin
& nbsp & nbsp RunDialog(Poignée, Icône.Poignée, PCHAR('C:'), PCHAR('SELECT ce MAUDIT FICHIER'),
& ! & ! & ! & nbsp PCHAR('), REF_NOBROWSE ou REF_NODEFAULT ou REF_CALCDIRECTORY)
fin
cette boîte de dialogue utilise les constantes suivantes
const
& nbsp & nbsp REF_NOBROWSE = 1 //Désactiver le bouton parcourir
& nbsp & nbsp REF_NODEFAULT = 2
& nbsp & nbsp REF_CALCDIRECTORY = 4 //calculer le répertoire de base sur les propriétaires de chemin d'accès
& nbsp & nbsp REF_NOLABEL = 8 //Pas de description de l'étiquette
& nbsp & nbsp REF_NOSEPARATEMEM = $20 //Pas de sepated mémoire case (NT Uniquement)

dans le cas où vous utilisez NT remplacer tous les pchar par PWChar
C'est maintenant dans mon prochain article je vais créer un objet wrappers pour ces fonctions, vous trouverez l'emballage de la boîte de dialogue exécuter très utile









Les systemes Windows boîtes de dialogue


Les systemes Windows boîtes de dialogue : Plusieurs milliers de conseils pour vous faciliter la vie.


Les boîtes de dialogue windows que microsoft a oublie de document
la Plupart d'entre nous ont vu ces boîtes de dialogue de windows et la plupart des etats membres des programmes ici est un moyen d'entrer en contact avec la plupart de ces:
1) Sortie de boîte de Dialogue windows presente quand vous allez dans le menu demarrer et selectionnez arreter. la poignee parametre n'est pas utilise dans windows NT sur un ordinateur windows 95, vous obtenez un WM_QUIT dans wndproc, cependant, si vous affectez un evenement dans OnCloseQuery va faire.
& nbsp & nbsp procedure ExitWindowsDialog(Poignee: THandle) stdcall externe 'shell32.dll indice 60 //declaration d'API
Exemple d'utilisation:
procedure TForm1.Button1Click(Sender: TObject)
begin
& nbsp & nbsp ExitWindowsDialog(Manche)
fin
2) Redemarrer windows boîte de dialogue est presente a chaque fois qu'un systeme de changement a l'echelle (surtout avec les pilotes), le parametre flags de la poignee est utilisee pour connaître le proprietaire de la fenetre de la raison est une chaîne qui est indique dans la boîte de dialogue (astuce: utiliser un retour de chariot pour diviser le texte en lignes) les indicateurs correspondent a aucun ExitWindowsEx ou ExitWindows drapeau (ils commencent la plupart avec EW_XXX ou EWX_XXX)
& nbsp & nbsp fonction RestartWindowsDialog(Poignee: THandle Raison: PChar Drapeaux: Integer): Integer stdcall externe 'shell32.dll' index 59
Exemple d'utilisation:
procedure TForm1.Button2Click(Sender: TObject)
begin
& nbsp & nbsp RestartWindowsDialog(Poignee, PCHAR('ME DIO LA GANA'), EW_RESTARTWINDOWS)
fin


3)selection d'une icone de la boîte de dialogue est celui affiche a chaque fois que tu veux selectionner une icone dans l'environnement windows, filename specifie le nom de fichier a partir d'ou extraire des icones, filenamesize est la longueur de la chaîne (generalement de Longueur(nom de fichier) en supposant que le nom de fichier sous forme de chaîne), Indexicone est une variable qui reçoit le indexicone selectionne dans la boîte de dialogue. la valeur de retour de la fonction est true si le dialogue est un succes et que le bouton ok est selectionne, la valeur false si la pression du bouton annuler
& nbsp & nbsp fonction PickIconDialog(Poignee:THandle nom de fichier:PChar FileNameSize:entier var Indexicone:integer):Boolean stdcall externe 'shell32.dll' index 62
Exemple d'utilisation:
procedure TForm1.Button3Click(Sender: TObject)
var
& nbsp & nbsp Indexicone: Integer
begin
& nbsp & nbsp si PickIconDialog(Poignee, PChar('shell32.dll'), Length('shell32.dll'), Indexicone)
& ! & ! & ! & nbsp ShowMessage('Selecciono' IntTOStr(Indexicone))
fin
4) Executer la boîte de dialogue de fichier est execute a chaque fois que vous selectionnez dans le menu demarrer executer, et est egalement observee dans windows media player et internet explorer. ici est l'api qui va faire l'affaire
& nbsp & nbsp procedure RunDialog(Poignee: THandle Icone: HIcon Repertoire: PChar Titre: PChar Description: PChar Drapeaux: Integer) stdcall externe 'shell32.dll' index 61
Exemple d'utilisation:
procedure TForm1.Button4Click(Sender: TObject)
begin
& nbsp & nbsp RunDialog(Poignee, Icone.Poignee, PCHAR('C:'), PCHAR('SELECT ce MAUDIT FICHIER'),
& ! & ! & ! & nbsp PCHAR('), REF_NOBROWSE ou REF_NODEFAULT ou REF_CALCDIRECTORY)
fin
cette boîte de dialogue utilise les constantes suivantes
const
& nbsp & nbsp REF_NOBROWSE = 1 //Desactiver le bouton parcourir
& nbsp & nbsp REF_NODEFAULT = 2
& nbsp & nbsp REF_CALCDIRECTORY = 4 //calculer le repertoire de base sur les proprietaires de chemin d'acces
& nbsp & nbsp REF_NOLABEL = 8 //Pas de description de l'etiquette
& nbsp & nbsp REF_NOSEPARATEMEM = $20 //Pas de sepated memoire case (NT Uniquement)

dans le cas ou vous utilisez NT remplacer tous les pchar par PWChar
C'est maintenant dans mon prochain article je vais creer un objet wrappers pour ces fonctions, vous trouverez l'emballage de la boîte de dialogue executer tres utile


Les systèmes Windows boîtes de dialogue

Les systèmes Windows boîtes de dialogue : Plusieurs milliers de conseils pour vous faciliter la vie.
Recommander aux amis
  • gplus
  • pinterest

Messages récents

Commentaire

Laisser un commentaire

évaluation