1.variable d'application (application standard)
Décrire les informations au niveau de l'application
unité
Formulaires
varApplication : TApplication ;
décrire
Par défaut, lorsque vous créez un nouveau projet, Delphi construit un objet Application et l'affecte à la variable Application située dans l'unité Forms. L'application possède plusieurs propriétés qui peuvent être utilisées pour obtenir des informations sur l'application pendant son exécution.
Exemple
Ce code affichera le nom de votre projet dans la zone d'édition :
PRécédure TForm1.Button1Click(Expéditeur : TObject);
commencer
Edit1.Text := Application.Titre ;
fin;
2.CmdAfficher la variable
CmdShow est transmis à la fonction API Windows ShowWindow.
unité
Système
var CmdShow : entier ;
décrire
Dans le programme, lorsque l'application crée la fenêtre principale, la variable CmdShow contient les valeurs des paramètres que Windows s'attend à transmettre à ShowWindow.
Dans la bibliothèque (DLL), CmdShow vaut toujours 0.
3. Constante CompilerVersion
Spécifie le numéro de version du compilateur Delphi
unité
Système
const Version du compilateur = 15,0 ;
décrire
Utilisez CompilerVersion pour tester le niveau de configuration global du compilateur Delphi. Ceci est utile si vous souhaitez conditionner du code qui tire parti des fonctionnalités les plus récentes du langage Delphi.
4.Variable ExitProcessProc
ExitProcessProc spécifie la dernière procédure à exécuter avant l'arrêt de l'application.
unité
Système
var ExitProcessProc : procédure ;
décrire
Attribuez à ExitProcessProc pour spécifier le processus que vous souhaitez exécuter avant la fermeture de l'application. La valeur de ExitProcessProc est une procédure sans paramètres.
5.Fonction GetFileVersion
Retourner la version du fichier
unité
SysUtils
fonction GetFileVersion(const AFileName : string) : Cardinal ;
décrire
GetFileVersion renvoie les 32 bits les plus significatifs du numéro de version binaire d'un fichier. AFileName spécifie le nom du fichier, qui peut être recherché en utilisant le même chemin que la fonction LoadLibrary.
6.Fonction GetModuleName
Renvoie le nom complet du module pour le handle donné.
unité
SysUtils
fonction GetModuleName(Module : HMODULE) : chaîne ;
décrire
Appelez GetModuleFileName pour obtenir le nom complet du module pour le handle donné.
Le module est le handle du module.
7.HVariable d'instance
Handle, fourni par Windows au module.
unité
SysInit
var HInstance : Mot Long ;
décrire
HInstance contient un handle d'instance d'une application ou d'une bibliothèque fournie par Windows
8.Variable HintWindowClass
Spécifie la classe de la fenêtre utilisée pour afficher les astuces d'aide.
unité
Formulaires
var HintWindowClass : THintWindowClass = THintWindow ;
décrire
Lorsqu'une application affiche un indice d'aide, elle crée une instance de HintWindowClass pour décrire la fenêtre utilisée pour afficher l'indice. Les applications peuvent personnaliser cette fenêtre en créant une classe dérivée de THintWindow, puis en attribuant la classe dérivée à la variable HintWindowClass au démarrage de l'application.
9.Variable InitProc
InitProc est le dernier processus d'initialisation installé.
unité
Système
var InitProc : pointeur ;
décrire
Attribuez à InitProc pour spécifier une procédure que vous souhaitez exécuter au démarrage de l'application. InitProc est une procédure sans paramètre. Par exemple:
procédure MyInitProcedure ;
...
initialisation
InitProc := @MyInitProcedure;
commencer
fin;
Seule une procédure d'initialisation peut être affectée à la variable InitProc. Si votre application définit plusieurs procédures d'initialisation, seule la dernière affectée à InitProc sera exécutée. Pour permettre l'exécution d'autres procédures d'initialisation, vous devez « enchaîner » les procédures ensemble, en appelant l'ancienne valeur à partir de la nouvelle valeur d'InitProc. Par exemple, le code suivant de l'unité ComObj enregistre la valeur d'origine de InitProc avant d'attribuer une nouvelle valeur, puis appelle la valeur enregistrée lors du processus d'initialisation nouvellement attribué :
SaveInitProc := InitProc;
InitProc := @InitComObj;
10.Variable IsConsole
Indique si le module est compilé en tant qu'application console.
unité
Système
var IsConsole : booléen ;
décrire
Si le module a été compilé en tant qu'application console, la variable IsConsole est True. Ce sera vrai à la fois dans un exécutable et dans une DLL.
11.Variable IsLibrary
Indique si le module est une DLL.
unité
Système
var IsLibrary : booléen ;
décrire
Si le module est une DLL, alors la variable IsLibrary est True.
12.JITenable variable
Contrôle le moment où le débogueur juste à temps est appelé.
unité
Système
var JITEnable : octet = 0 ;
décrire
Utilisez JITEnable pour indiquer quel type d'exception déclenchera le débogueur juste à temps.
Lorsque JITEnable est 0 (valeur par défaut), toutes les exceptions seront gérées à l'aide du mécanisme de gestion des exceptions de l'application. Le débogueur opportun n'est appelé que lorsque l'application ne fournit aucun mécanisme pour intercepter les exceptions. Notez qu'à l'exception des zones d'initialisation et de finalisation de l'unité Delphi, toute application incluant l'unité Forms fournit une gestion des exceptions (via l'objet Application) et ne déclenche pas le débogueur en temps opportun (notez que toute application incluant l'unité Forms fournit une gestion des exceptions). (via l'objet Application) pour toutes les sections sauf les sections d'initialisation et de finalisation et ne déclenche pas le débogueur juste à temps).
Lorsque JITEnable vaut 1, toute exception non native (lancée par du code compilé à l'aide d'autres produits). déclenchera le débogueur en temps réel. Les exceptions natives sont gérées par le mécanisme de gestion des exceptions de l'application.
Lorsque JITEnable est supérieur à 1, toutes les exceptions déclencheront le débogueur en temps réel.
REMARQUE : lorsque vous installez l'EDI, il est enregistré en tant que débogueur opportun. Si vous avez installé d'autres outils avec des débogueurs, ils se sont peut-être enregistrés eux-mêmes, écrasant ainsi l'enregistrement de l'EDI.
13.Fonction Langues
Répertoriez les paramètres régionaux pour lesquels la prise en charge est disponible.
unité
SysUtils
Langues de fonction : TLangues ;
décrire
Utilisez la valeur renvoyée par Languages pour obtenir des informations sur les paramètres régionaux pris en charge par le système. Cette fonction est uniquement disponible sur la plateforme Windows
14.Variable d'instance principale
Indique le handle d’instance du fichier exécutable principal.
unité
Système
var MainInstance : LongWord ;
décrire
Utilisez MainInstance pour obtenir un handle d’instance pour le fichier exécutable principal d’une application. Ceci est utile dans les applications qui utilisent des bibliothèques ou des packages d'exécution lorsque vous avez besoin d'un handle vers le fichier exécutable plutôt que vers la bibliothèque.
Remarque : N'utilisez pas MainInstance lors de l'exécution d'une bibliothèque de liens dynamiques CLX (Windows) ou d'un objet partagé (Linux) à partir d'un exécutable compilé avec d'autres outils.
15.Variable MainThreadID
Indique le thread d'exécution principal dans le module actuel.
unité
Système
var MainThreadID : Mot Long ;
décrire
Utilisez MainThreadID pour obtenir l'ID de thread du thread d'exécution principal (le thread actuel lorsque le module est initialisé).
Lors du débogage, cet ID de thread principal est affiché dans la zone d'état du thread.
Sous Windows, la valeur MainThreadID est compatible avec l'ID de thread requis par certains appels d'API Win32.
16. Variable NoErrMsg
Contrôle si l'application affiche un message d'erreur lorsqu'une erreur d'exécution se produit.
unité
Système
var NoErrMsg : Booléen = Faux ;
décrire
Sous Windows, définissez NoErrMsg pour contrôler si un message s'affiche indiquant qu'une erreur d'exécution s'est produite. Lorsque NoErrMsg est faux (valeur par défaut), les erreurs d'exécution amènent l'application à afficher une boîte de message proposant le type d'erreur survenue. Lorsque NoErrMsg est vrai, ces messages seront supprimés.
Sous Linux, NoErrMsg n'a aucun effet.
Remarque : L'unité SysUtils convertira la plupart des erreurs d'exécution en exceptions. Si votre application inclut SysUtils, la boîte de message d'erreur d'exécution peut ne pas s'afficher même si NoErrMsg est faux.
17.Variable PopupList
Fournit un traitement centralisé des messages Windows envoyés aux menus contextuels
unité
Menus
var PopupList : TPopupList ;
décrire
Utilisez PopupList pour accéder à tous les menus contextuels de l'application ou pour accéder au handle de la fenêtre qui répond aux messages du menu contextuel. PopupList maintient une liste de tous les composants de menu contextuel créés dans l'application. Cette liste contient un handle vers une fenêtre masquée qui gère de manière centralisée les messages Windows envoyés à ces menus contextuels.
18. Constantes RTLVersion
Indique le numéro de version de la bibliothèque d'exécution Delphi.
unité
Système
const RTLVersion = 15,0 ;
décrire
Utilisez RTLVersion pour vérifier le numéro de version de la bibliothèque d'exécution Delphi qui ne dépend pas du niveau de version du compilateur.
19. Variable d'écran
Représente un périphérique à écran
unité
Formulaires
var Écran : TScreen ;
décrire
La variable Screen est un composant TScreen qui représente l'écran du système sur lequel l'application est exécutée. Par défaut, l'application crée un composant d'écran basé sur les informations sur le périphérique d'écran actuel et l'affecte à la variable Screen.
20.Variables de la plate-forme Win32
Spécifie l'identifiant de la plateforme Win32
unité
SysUtils
var Win32Platform : Entier = 0 ;
décrire
Win32Platform est utilisé pour identifier le type de plate-forme Win32 sur laquelle le système s'exécute. Ce sera l'une des valeurs suivantes :
Signification de la valeur
Le système VER_PLATFORM_WIN32s est Win32
Le système VER_PLATFORM_WIN32_WINDOWS est Windows 95
VER_PLATFORM_WN32_NT Le système est Windows NT
Win32Platform est uniquement disponible sous Windows.