Conseils - Utilitaires

Un article de Wikipedia.

(Différences entre les versions)
(→Conseils - Utilitaires)
Version actuelle (24 mars 2008 à 11:16) (modifier) (défaire)
(→Nombre de secondes écoulées)
 
(10 révisions intermédiaires masquées)
Ligne 1 : Ligne 1 :
-
= Conseils - Utilitaires =
+
= Conseils =
 +
 
 +
Voir [http://zigloo.ch/index.php/Liaison_entre_Pascal_et_les_API_Palm Liaison entre Pascal et les API Palm] et ses sources.
== Inclure un fichier source ==
== Inclure un fichier source ==
La commande suivante permet d'inclure un fichier source.
La commande suivante permet d'inclure un fichier source.
Ligne 11 : Ligne 13 :
<code pascal>
<code pascal>
{$i PalmAPI.pas}
{$i PalmAPI.pas}
 +
...
 +
debut := TimGetSeconds;
 +
...
 +
duree_ecoulee := TimGetSeconds - debut;
 +
...
 +
</code>
-
debut := TimGetSeconds();
+
== 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.
-
duree_ecoulee := TimGetSeconds() - debut;
+
 
 +
<code pascal>
 +
{$i PalmAPI.pas}
 +
 
 +
var chaine : string;
 +
entier : integer;
 +
...
 +
chaine := "1234";
 +
entier := StrAToI(chaine);
 +
...
</code>
</code>
 +
 +
= Utilitaires =
 +
== PPlib ==
 +
=== Contenu ===
 +
Ce source [[PPlib.pas]] disponible sur [http://www.ppcompiler.org PP Compiler] contient un ensemble d'utilitaires Pascal (voir [[Conseils - Utilitaires#Ressources|Ressources]]).
 +
=== Détails ===
 +
Les fonctions contenuent sont les suivantes :
 +
 +
* <code pascal>BoolToInt(B:boolean):integer;</code>
 +
* <code pascal>IntToBool(N:integer):boolean;</code>
 +
* <code pascal>IntToHexChar(H:integer):char;</code>
 +
* <code pascal>IntToString(N:integer):string;</code>
 +
* <code pascal>Max(A,B:integer):integer;</code>
 +
* <code pascal>Min(A,B:integer):integer;</code>
 +
* <code pascal>RealToFix(X:real;D:integer):string;</code>
 +
* <code pascal>RealToString(R:real):string;</code>
 +
* <code pascal>Spc(N:integer):string; // Retourne une chaîne de caractères constituée de N espaces.</code>
 +
* <code pascal>StringToInt(const S:string):integer;</code>
 +
* <code pascal>StringToReal(S:string):real;</code>
 +
* <code pascal>SubString(const S:String;iStart,iEnd:integer):string;</code>
 +
 +
= Ressources =
 +
* Utilitaire [[Media:PPlib_pas.PDB]]
 +
* Source [[PPlib.pas]]
 +
 +
[[Category:Logiciel]]
 +
[[Category:Pascal]]
 +
[[Category:Palm]]

Version actuelle

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;
  • RealToFix(X:real;D:integer):string;
  • RealToString(R:real):string;
  • Spc(N:integer):string; // Retourne une chaîne de caractères constituée de N espaces.
  • StringToInt(const S:string):integer;
  • StringToReal(S:string):real;
  • SubString(const S:String;iStart,iEnd:integer):string;

Ressources

Récupérée de « http://zigloo.ch/index.php/Conseils_-_Utilitaires »