Divers27 ressources dans cette catégorie

Retrouvez ici tous les meilleurs téléchargements

Un ensemble de petits programmes pour aborder et comprendre l'interpréteur d'expression des [b]LiveBindings [/b]
Ces exemples sont utilisés dans le deuxième volet de mon tutoriel sur les LiveBindings : Effets de Bord, à paraitre prochainement

Dérivé d'un exemple du manuel de référence Freepascal, voici une procédure d'analyze d'un objet Lazarus à des fins de debug:

Exemple d'usage:

analyzeObject([items], 'items');

items (TJSONObject) = { variable0 : "[wan=adsl]", start0 : 1, stop0 : 10 }

analyzeObject([lastOptions], 'lastOptions');

lastOptions (TStringList) =
[ 0]: 3
[ 1]: "[wan=adsl]"

Les versions de DELPHI STARTER ne comportent pas de formateur de code intégré.
Mais heureusement un formateur en ligne de commande "Formatter.exe" est disponible dans le répertoire \bin.

Trois méthodes sont indiquées pour le lancer depuis l’EDI et formater le projet en cours :
- avec un lanceur (Delphi) en mode graphique ;
- avec un lanceur (Delphi) en mode console ;
- directement.


Ces trois méthodes sont détaillées dans un fichier d’aide Windows « FormaterCode DelphiStarter.chm ». Les exécutables et le code source des deux programmes sont fournis.

La fonction logique PosExact est dérivée de Posex. elle présente l'avantage de ne pas explorer inutilement la chaine, car elle abandonne dès qu'il y a un écart.
elle est donc beaucoup plus rapide.
Elle est très utile dans un serveur car par exemple PosExact('GET', Str1) renvoie TRUE uniquement si la chaine commence par 'GET'
De même PosExact(url,Str1,6) renvoie TRUE pour la chaine 'GET /url'.
[codeinline]function PosExact(const SubStr, S: string; Offset: Integer = 1): Boolean;
asm
test eax, eax
jz @Nil
test edx, edx
jz @Nil
dec ecx
jl @Nil

push esi
push ebx

mov esi, [edx-4] //Leng ... Voir la suite

Exemple d'utilisation de l'objet TMatchCollectionEnumerator de l'unité RegularExpressions.

Version simplifiée d'un exemple trouvé dans la documentation de Delphi :

http://docwiki.embarcadero.com/CodeExamples/XE2/en/TMatchCollectionCount_(Delphi)

L'objet TMatchCollectionEnumerator permet de parcourir une collection de correspondances.

Compilation testée avec Delphi 10.1.