Conseils - Utilitaires

Un article de Wikipedia.

Sommaire

Conseils

Voir Liaison entre Pascal et les API Palm et ses sources.

Inclure un fichier source

La commande suivante permet d'inclure un fichier source.

{$i fichier_source.pas}

Nombre de secondes écoulées

La fonction TimGetSeconds des API Palm permet d'obtenir le nombre de secondes écoulées à partir d'une certaine date.

{$i PalmAPI.pas}
...
debut := TimGetSeconds();
...
duree_ecoulee := TimGetSeconds() - debut;
...

Convertir une chaîne de caractères en entier

La fonction StrAToI(const:String):integer des API Palm permet de convertir une chaîne de caractères en entier.

{$i PalmAPI.pas}
 
var chaine : string;
entier : integer;
...
chaine := "1234";
entier := StrAToI(chaine);
...

Utilitaires

PPlib

Contenu

Ce source PPlib.pas disponible sur PP Compiler contient un ensemble d'utilitaires Pascal (voir Ressources).

Détails

Les fonctions contenuent sont les suivantes :

  • BoolToInt(B:boolean):integer;
  • IntToBool(N:integer):boolean;
  • IntToHexChar(H:integer):char;
  • IntToString(N:integer):string;
  • Max(A,B:integer):integer;
  • Min(A,B:integer):integer;
  • * <code pascalRealToString(R:real):string;
  • '''Retourne une chaîne de caractères constituée de N espaces.'''
    * <code pascalStringToInt(const S:string):integer;
  • * <code pascalSubString(const S:String;iStart,iEnd:integer):string;

Ressources