FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Problème mathématique en 3D
par papydall Aujourd'hui à 2:59

» Reprise du développement et de la documentation
par Yannick Aujourd'hui à 1:21

» Une copie de Panoramic Editeur
par Jean Claude Mar 22 Mai 2018 - 21:03

» Objet 3D_PLANE, réalisation d'un dé en 3D
par Marc Mar 22 Mai 2018 - 0:33

» Cacher la barre des tâches
par Klaus Lun 21 Mai 2018 - 21:27

» Une "base de connaissance" - pour jouer ou plus si affinité
par Minibug Lun 21 Mai 2018 - 10:29

» quel est ce comportement de Panoramic_editor
par Oscaribout Lun 21 Mai 2018 - 0:22

» Des FORM(s) Colorés
par Jean Claude Dim 20 Mai 2018 - 20:58

» Recherches dans un fichier texte
par JL35 Dim 20 Mai 2018 - 20:18

» Problème d'affichage des pages du forum (Résolu)
par Jean Claude Dim 20 Mai 2018 - 20:00

» Créer une application *.exe
par Yannick Ven 18 Mai 2018 - 20:01

» [RÉSOLU] Priorité affichage des objets : comment la définir?
par papydall Ven 18 Mai 2018 - 18:22

» Aucune différence entre ON_CLICK et ON_DOUBLE_CLICK
par Jean Claude Jeu 17 Mai 2018 - 8:37

» [Résolu] Récuperer les fonctions systeme de Panoramic
par Minibug Mar 15 Mai 2018 - 23:21

» Est-ce qu'un fichier est inclus dans l'application ?
par Yannick Mar 15 Mai 2018 - 12:04

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Mai 2018
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Forcer l'état d'affichage d'une fenêtre (agrandir, réduire).

Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5907
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Forcer l'état d'affichage d'une fenêtre (agrandir, réduire).   Ven 15 Avr 2016 - 2:41

Code:

rem ============================================================================
rem               ShowWindow
rem ============================================================================
rem Cette fonction permet de forcer l état d affichage d une fenêtre (agrandir, réduire).
rem La fonction demande deux paramètres :
rem hWnd est un pointeur (handle) vers une fenêtre.
rem nCmdShow peut prendre la valeur d une constante voir ci-dessous.
rem La fonction retourne 0 si la fenêtre était cachée,
rem et une valeur différente de 0 dans le cas contraire.
rem ============================================================================

form 10
form 20 : left 20,500

 ShowWindow(10)
end
rem ============================================================================
SUB  ShowWindow(Num_Form)
    dim_local hWnd,ret%
    dim_local SW_HIDE : SW_HIDE = 0 : ' Cache la fenêtre et en active une autre
    dim_local SW_MAXIMIZE : SW_MAXIMIZE = 3 : ' Agrandit la fenêtre
    dim_local SW_MINIMIZE : SW_MINIMIZE = 6 : ' Réduit la fenêtre et active la prochaine (dans l'ordre des tâches windows)
    dim_local SW_RESTORE  : SW_RESTORE  = 9 : ' Active et affiche la fenêtre à sa taille et position initiales
    dim_local SW_SHOW     : SW_SHOW     = 5 : ' Active et affiche la fenêtre
    dim_local SW_SHOWMAXIMIZED : SW_SHOWMAXIMIZED = 3 : ' Active et agrandit la fenêtre
    dim_local SW_SHOWMINIMIZED : SW_SHOWMINIMIZED = 2 : ' Active et réduit la fenêtre
    dim_local SW_SHOWNA   : SW_SHOWNA = 8 : ' Identique à SW_SHOW sauf que la fenêtre n'est pas activée
' ------------------------------------------------------------------------------
    dll_on "user32"
    hWnd = handle(Num_Form)
    ret% = dll_call2("ShowWindow",hWnd,0) : ' cache FORM(Num_FORM) et active la suivante
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,5) : ' Active et affiche FORM(Num_FORM)
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,3) : ' Agrandit FORM(Num_FORM)
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,6) : ' Réduit la fenêtre et active la prochaine (dans l'ordre des tâches windows)
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,2) : ' Active et réduit la fenêtre (en bas à gauche du bureau)
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,9) : ' Active et affiche la fenêtre à sa taille et position initiales
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,8) : ' Identique à SW_SHOW sauf que la fenêtre n'est pas activée
    pause 1000
    ret% = dll_call2("ShowWindow",hWnd,0) : ' cache FORM(Num_FORM) et active la suivante
    dll_off
END_SUB
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jicehel

avatar

Nombre de messages : 5916
Age : 45
Localisation : 77500
Date d'inscription : 18/04/2011

MessageSujet: Re: Forcer l'état d'affichage d'une fenêtre (agrandir, réduire).   Ven 15 Avr 2016 - 14:31

Procédure à ajouter à la bibliothèque de procédures ça c'est clair que c'est pratique.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5907
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Forcer l'état d'affichage d'une fenêtre (agrandir, réduire).   Ven 15 Avr 2016 - 14:48

Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Contenu sponsorisé




MessageSujet: Re: Forcer l'état d'affichage d'une fenêtre (agrandir, réduire).   

Revenir en haut Aller en bas
 
Forcer l'état d'affichage d'une fenêtre (agrandir, réduire).
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Erreur java affichage didacticiel fourni avec E-Anim
» Affichage sous IE des smileys et gif animés
» Affichage Quick times
» Problème d'affichage dans FORM
» Réglages des parametres d'affichage

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: