ADDATOM |
Ajout d'un Atom |
---|---|
Turbo Pascal pour Windows | WINPROCS |
Syntaxe
Function AddAtom(Str: PChar): TAtom; |
Paramètres
Nom | Description |
---|---|
Str | Ce paramètre permet d'indiquer l'adresse de la chaine de caractères à ajouter. |
Description
Cette fonction permet d'ajouter une chaine de caractères ASCIZ à l'Atom local.
Exemple
Voici exemple permettant de rechercher un atome précédemment recherché :
- Program AddAtomSamples;
-
- Uses WinCrt,WinProcs,WinTypes;
-
- Var
- ABC:TAtom;
- DEF:TAtom;
- GHI:TAtom;
-
- BEGIN
- WriteLn('Ajout d''atome...');
- ABC := AddAtom('ABC');
- DEF := AddAtom('DEF');
- GHI := FindAtom('ABC');
- If(ABC = GHI)Then Begin
- WriteLn('Atome identique');
- End
- Else
- Begin
- WriteLn('Atome non-identique');
- End;
- END.
on obtiendra le résultat suivant :
Ajout d'atome...Atome identique
Voir également
Langage de programmation - Turbo Pascal pour Windows - Référence de procédures et fonctions - DELETEATOM
Langage de programmation - Turbo Pascal pour Windows - Référence de procédures et fonctions - FINDATOM
Langage de programmation - Turbo Pascal pour Windows - Référence de procédures et fonctions - GETATOMNAME
Langage de programmation - C pour OS/2 - Support de Windows 3.1 - AddAtom
Dernière mise à jour : Dimanche, le 10 décembre 2017