Voici une petite DLL qui me permet de regrouper des fonctions non encore disponibles sous Panoramic.
Il n'y a pas grand chose pour l'instant, mais je la complèterai petit à petit...
form.zip form.dll demo_form.bas
Autorise ou non le redimensionnement d'un formulaire
Syntaxe:
retour=dll_call2("SetSize",handle(N°form),status)
Paramètres:
handle(N°form): Adresse du formulaire
status: 0-> OFF 1-> ON
Autorise ou non l'affichage de la barre de titre (caption) d'un formulaire
Syntaxe
retour = DLL_CALL2("SetCaption", HANDLE(N°form), status)
Paramètres:
handle(N°form): Adresse du formulaire
status: 0-> OFF 1-> ON
Attention :le formulaire n'est plus déplacable, on ne peut plus également le fermer à l'aide de la souris... (normal... )
Désactive le bouton de fermeture du formulaire.
Syntaxe
retour=dll_call1("SetCloseOff",handle(N°form))
Paramètres:
handle(N°form):Adresse du formulaire
Autorise ou non la mise en icone d'un formulaire.
Syntaxe
retour = DLL_CALL2("SetMinimize", HANDLE(N°form), status)
Paramètres:
handle(N°form):Adresse du formulaire
status: 0-> OFF 1-> ON
Autorise ou non la mise en plein écran d'un formulaire.
Syntaxe
retour = DLL_CALL2("SetMaximize", HANDLE(N°form), status)
Paramètres:
handle(N°form):Adresse du formulaire
status: 0-> OFF 1-> ON
Renvoi 1 si le formulaire est en avant-plan sinon 0
Syntaxe
retour = dll_call1("GetFormActive",handle(N°form))
Paramètres:
handle(N°form):Adresse du formulaire
Met le formulaire en avant-plan.
Syntaxe
retour = dll_call1("SetFormActive",handle(N°form))
Paramètres:
handle(N°form):Adresse du formulaire
Force le formulaire à rester en avant-plan par rapport au form 0.
Syntaxe
retour = dll_call1("SetTopMost",handle(N°form))
Paramètres:
handle(N°form):Adresse du formulaire
Fonction un peu folklorique (créée pour des besoins perso). Elle supprime la barre des titres et modifie la bordure du formulaire.
Syntaxe
retour = dll_call1("CreateBox",handle(N°form))
Paramètres:
handle(N°form):Adresse du formulaire
Disparition d'un formulaire vers le centre.
Syntaxe
retour = dll_call1("CloseForm",handle(N°form))
Paramètres:
handle(N°form):Adresse du formulaire