Conseils - Utilitaires
Un article de Wikipedia.
(Différences entre les versions)
(→Conseils - Utilitaires) |
(→Nombre de secondes écoulées) |
||
Ligne 13 : | Ligne 13 : | ||
<code pascal> | <code pascal> | ||
{$i PalmAPI.pas} | {$i PalmAPI.pas} | ||
- | + | ... | |
debut := TimGetSeconds(); | debut := TimGetSeconds(); | ||
- | + | ... | |
duree_ecoulee := TimGetSeconds() - debut; | duree_ecoulee := TimGetSeconds() - debut; | ||
+ | ... | ||
+ | </code> | ||
+ | |||
+ | == 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. | ||
+ | |||
+ | <code pascal> | ||
+ | {$i PalmAPI.pas} | ||
+ | |||
+ | var chaine : string; | ||
+ | entier : integer; | ||
+ | ... | ||
+ | chaine := "1234"; | ||
+ | entier := StrAToI(chaine); | ||
+ | ... | ||
</code> | </code> |
Version du 13 mars 2008 à 13:08
Sommaire |
Conseils - Utilitaires
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);
...