Accéder au contenu principal

Articles

Affichage des articles du janvier, 2001

Chaine de caractère

CHAÎNE DE CARACTÈRE Type de chaîne Chaîne courte Les chaînes courtes ont une longueur fixe, elles ne peuvent dépasser plus de 255 caractères. Étant donné que les chaînes courtes ont une valeur fixe, leurs vitesses d'exécution sont très rapides. On peut les déclarer de deux façons, mais une seule est vraiment utile. var Nom:shortstring; Prenom:string[30]; Lorsqu'on utilise shortstring, la longueur de la variable est automatiquement de 255 caractères. A moins d'avoir absolument besoin de 255 caractères, il n'est pas vraiment intéressant d'utiliser le type shortstring. Il est intéressant d'utiliser les chaînes courtes lorsqu'on sait que la longueur de la variable sera fixe ou que l'on sait le nombre de caractère maximum qu'il peut y avoir. Le gain de vitesse sera appréciable si l'on fait beaucoup de manipulation sur les chaînes. Le premier élément d'une chaîne courte représente la longueur de la chaîne, ce qu...

Comment chercher et remplacer des caractères?

Comment chercher et remplacer des caractères? function SearchAndReplace (sSrc, sLookFor, sReplaceWith : string) : string; var nPos, nLenLookFor : integer; begin nPos := Pos(sLookFor, sSrc); nLenLookFor := Length(sLookFor); while (nPos > 0) do begin Delete(sSrc, nPos, nLenLookFor); Insert(sReplaceWith, sSrc, nPos); nPos := Pos(sLookFor, sSrc); end; Result := sSrc; end;

Comment vérifier si un fichier est utilisé?

Comment vérifier si un fichier est utilisé? function IsFileInUse(fName : string) : boolean; var HFileRes : HFILE; begin Result := false; if not FileExists(fName) then exit; HFileRes := CreateFile(pchar(fName), GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); Result := (HFileRes = INVALID_HANDLE_VALUE); if not Result then CloseHandle(HFileRes); end;

Learn Pascal

Delphi est basé sur pascal, alors autant le connaître. Bien connaître le pascal, facilitera le développement sous delphi.  Les routines de bas niveau du pascal nous serons présentées afin d'optimiser au mieux notre code delphi. La qualité de ce livre est phénoménale, on lit et on comprend aussitôt tellement que les exemples sont compréhensifs. De nombreux aspects que les autres livres oublient trop souvent d'expliquer sont précisés dans cet ouvrage: pointeur, tri de donnée, recherche de données...  Ces aspects sont très bien détaillés, ce qui m'a vraiment surprit, car ce sont des concepts complexes à apprendre.  C'est un livre en anglais, qui est aisé à lire et qui s'adresse à celui qui veut approfondir ses connaissances afin d'améliorer son code. Après la lecture de ce livre, les côtés sombres de Delphi vous sembleront plus claire. Le livre inclut une version complète de Delphi 4 standard.

Dll

DLL Les dll (dynamic link library) sont très répandues dans la programmation Windows. Une dll est en fait une portion de code exécutable d'un fichier ayant une extension dll. N'importe quel programme peut faire appel à une dll. Avantage d'une dll Réutilisation du code Partage du code entre plusieurs applications Fractionnement du code Meilleure gestion des ressources de Windows Création d'une dll Allez dans le menu File, cliquer sur New..., choisisez Dll Syntaxe d'une dll library Calculer; uses SysUtils, Classes; var //déclaration des variables TPS: double; TVQ: double; //déclaration de la fonction function CalculerTotal(Somme:double):double;register; begin Somme := Somme * TPS + Somme; Somme := Somme * TVQ + Somme; Result := Somme; end; //exportation de la fonction afin de pourvoir l'utiliser dans les programmes exports CalculerTotal; //initialisation des variables //peu pratique étant donné que la valeur des taxes...