Section courante

A propos

Section administrative du site

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é :

  1. Program AddAtomSamples;
  2.  
  3. Uses WinCrt,WinProcs,WinTypes;
  4.  
  5. Var
  6.  ABC:TAtom;
  7.  DEF:TAtom;
  8.  GHI:TAtom;
  9.  
  10. BEGIN
  11.  WriteLn('Ajout d''atome...');
  12.  ABC := AddAtom('ABC');
  13.  DEF := AddAtom('DEF');
  14.  GHI := FindAtom('ABC');
  15.  If(ABC = GHI)Then Begin
  16.   WriteLn('Atome identique');
  17.  End
  18.   Else
  19.  Begin
  20.   WriteLn('Atome non-identique');
  21.  End;
  22. 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