Une unité qui va vous simplifier la vie : TypesHelpers

Version imprimable

14/04/2018, 02h42
BeanzMaster

6 pièce(s) jointe(s)

Une unité qui va vous simplifier la vie : TypesHelpers

Bonjour à tous,

Il y a quelque temps, pour des besoins personnels, j'ai installé Microsoft Visual Studio Community 2017

En refaisant mes premier pas sous cet EDI, j'ai remarqué une petite chose plutôt pas mal dont je ne me souvenais plus.

En C# (je ne sais plus si c'est valable en C++) pour les Type Integer, float etc., nous disposons de fonctions qui sont attachées.
Avec Lazarus et FPC ces fonctions sont limitées. Et il faut passer par le nom du type de la variable pour y avoir accès. Je vous ai fait quelques petites captures :

Pièce jointe 369972

Comme on peut le voir et je le disais, le nombre de fonctions est limité et ces fonctions ne sont pas vraiment utiles dans la pratique.

Sous Visual Studio certaine fonctions sont également attachées aux variables (en plus du type lui même) :

Pièce jointe 369976

Mais sous Lazarus, on se prend une grosse erreur :

Pièce jointe 369979

C'est alors que je me suis demandé s'il serait possible d'obtenir le même comportement avec Lazarus en utilisant des Helpers sur des types de variables comme le Char, Byte, Integer, Single, Double, String....
Et la réponse est oui ! :yaisse3: Il y a juste 2 conditions : l'unité doit être compilée en mode Delphi et il faut utiliser les même noms d'Helpers que ceux déjà définis par FPC.

Je vous propose donc une petite unité basée sur ces fameux Helpers

Les avantages sont clairs : plus besoin de se souvenir du nom de toutes les fonctions pour réaliser telle ou telle chose. Les fonctions peuvent être chainées. Résultat on code plus rapidement.

Pièce jointe 369983

J'ai réalisé une petite démo qui vous montre tout ça :

Pièce jointe 369987

J'ai testé sous Windows et Linux, tout fonctionne.

Petite information concernant les chaines de caractères String j'ai utilisé les fonctions présentes dans l'unité LazUTF8 ce qui permet de solutionner pas mal de petits problèmes liés à ce format de chaine ;)

Il manque surement encore quelques fonctions. Et il manque des "helpers" pour gérer les types Int64, Extended. Mais pour l'instant cette unité me suffit (presque) en l'état.
Je vais ajouter encore quelques fonctions et améliorer les commentaires.

Si jamais, pour vos propre besoins, rien ne vous empêche de rajouter vos propres fonctions :zoubi:

J'aimerais poster ce bout de code dans les sources Lazarus.

Mais avant, J'aurais souhaité avoir vos avis, impressions et suggestions.

Vous trouverez cette petite merveille en pièce jointe : Pièce jointe 369991

Merci d'avance pour vos tests et retours.

A+

PS : Désolé d'avance j'ai tout commenté en Anglais "basique". Si vous ne comprenez pas, un petit coup de google translate devrait faire l'affaire (je vous conseille ce petit addons pour vos navigateur, qui est très pratique)
14/04/2018, 08h28
Jipété

Salut,

Citation:

Envoyé par BeanzMaster

Mais sous Lazarus, on se prend une grosse erreur

Pièce jointe 369979

As-tu remarqué que le message d'erreur fait référence à la ligne 34, c-à-d dans la déclaration des variables, là où au bout de la ligne précédente tu as oublié le ";" comme te le rappelle le message ?

Je n'ai pas regardé le reste, c'est week-end je ne suis pas bien réveillé, :mouarf:
14/04/2018, 10h08
BeanzMaster

1 pièce(s) jointe(s)

Citation:

Envoyé par Jipété

Salut,

As-tu remarqué que le message d'erreur fait référence à la ligne 34, c-à-d dans la déclaration des variables, là où au bout de la ligne précédente tu as oublié le ";" comme te le rappelle le message ?

Je n'ai pas regardé le reste, c'est week-end je ne suis pas bien réveillé, :mouarf:

Salut Oups, non, j'avais pas vu :oops: il était près de 2h30, un peu fatigué à cette heure :zoubi:

De toute façon, cela ne change pas grand chose, la liste n'est pas exhaustive

Pièce jointe 370013

Du coup je pourrais virer 2/3 fonctions cela ne sert à rien d'avoir des duplicatas

Merci :ccool:

EDIT :
Je viens de regarder pour les String le helper original est fait pour les AnsiString et dans mon unité j'utilise LazUTF8. Et pour le coup, vu que je surcharge les helpers initiaux ce sont mes helpers qui sont pris en comptes et plus les originaux, les 2 ne s'additionnent pas. Dommage.
Il faudra que je teste pour voir les différences de résultats (surtout pour les string)
14/04/2018, 14h47
tourlourou

Intéressant :king:

Y a-t-il pour autant toujours un avantage par rapport à des fonctions surchargées suivant le type de paramètres ?

z := x.Min(y) vaut-il mieux que z := Min(x, y) ?
s := i.ToString vaut-il mieux que s := ToString(i) ?

En terme de lisibilité, je pense que ça dépend des cas, voire des sensibilités, et qu'il est du coup très bien de disposer des deux ! :ccool:
14/04/2018, 17h46
DomDA91

Citation:

Envoyé par BeanzMaster

Et la réponse est oui ! :yaisse3: Il y a juste 2 conditions : l'unité doit être compilée en mode Delphi et il faut utiliser les même noms d'Helpers que ceux déjà définis par FPC.

Pour autant que j'ai pu constater, ce n'est pas le mode Delphi en lui-même qui est requis mais simplement la directive {$modeswitch typehelpers}, (le mode Delphi se contente de pré-sélectionner cette option par défaut).

En ce qui concerne les noms d'Helpers (que je traduit par "Assistants" en français) je ne pense pas que le compilateur FPC en définisse par lui-même, par contre il peut y en avoir dans les bibliothèques d'exécution ou de composants et c'est comme pour tous les identifiants, il faut se méfier des collisions ou redéfinitions intempestives.

Citation:

Envoyé par tourlourou

Y a-t-il pour autant toujours un avantage par rapport à des fonctions surchargées suivant le type de paramètres ?

z := x.Min(y) vaut-il mieux que z := Min(x, y) ?
s := i.ToString vaut-il mieux que s := ToString(i) ?

L'avantage avec un EDI comme Lazarus c'est que l'on bénéficie de la complétion de code pour sélectionner l'assistant qui va bien : on tape un point à la suite de l'identifiant de variable et on choisit dans la liste. Avec les routines classiques on doit connaître les noms de fonctions par cœur.
14/04/2018, 20h14
tourlourou

Citation:

Envoyé par DomDA91

on bénéficie de la complétion de code pour sélectionner l'assistant

C'est tout à fait vrai et constitue bien un avantage.

NB : pour les objets qui disposent de nombreuses propriétés et méthodes, on a parfois plusieurs pages à parcourir dans le sélecteur si on n'a pas la première lettre pour restreindre les possibilités de complétion...
15/04/2018, 10h48
BeanzMaster

Bonjour

Citation:

Envoyé par tourlourou

Intéressant :king:

Y a-t-il pour autant toujours un avantage par rapport à des fonctions surchargées suivant le type de paramètres ?

z := x.Min(y) vaut-il mieux que z := Min(x, y) ?
s := i.ToString vaut-il mieux que s := ToString(i) ?

En terme de lisibilité, je pense que ça dépend des cas, voire des sensibilités, et qu'il est du coup très bien de disposer des deux ! :ccool:

Citation:

Envoyé par DomDA91

L'avantage avec un EDI comme Lazarus c'est que l'on bénéficie de la complétion de code pour sélectionner l'assistant qui va bien : on tape un point à la suite de l'identifiant de variable et on choisit dans la liste. Avec les routines classiques on doit connaître les noms de fonctions par cœur.

C'est tout à fait ça DomDA91, :D

En plus, te souviens tu dans quelle unité est déclaré la fonction Min ?. C'est pour cela que c'est avantageux. On bénéficie de fonctions qui sont regroupées par ci par là dans diverses unités.
les fonctions "Min" et "Max" sont présentes dans l'unité Math par exemple. Il faut le savoir et s'en souvenir.

Citation:

Envoyé par DomDA91

Pour autant que j'ai pu constater, ce n'est pas le mode Delphi en lui-même qui est requis mais simplement la directive {$modeswitch typehelpers}, (le mode Delphi se contente de pré-sélectionner cette option par défaut).

Merci pour {$modeswitch typehelpers} je savais pas que cette directive existait :ccool:

Citation:

Envoyé par DomDA91

En ce qui concerne les noms d'Helpers (que je traduit par "Assistants" en français) je ne pense pas que le compilateur FPC en définisse par lui-même, par contre il peut y en avoir dans les bibliothèques d'exécution ou de composants et c'est comme pour tous les identifiants, il faut se méfier des collisions ou redéfinitions intempestives.

Les assistants originaux sont présent dans le fichier "fpc/3.0.4/source/rtl/objpas/sysutils/syshelph.inc"

Merci pour vos retours. Je vais faire quelques petites modifications. Je vous remettrai là mise à jour ici.
21/04/2018, 16h51
BeanzMaster

1 pièce(s) jointe(s)

Bonjour à tous

Je suis de retour, pour partager avec vous cette petite mise à jour.

J'y ai ajouté des assistants pour les types : ShortInt, SmallInt, Cardinal, Word, Int64, QWord et un petit spécial pour manipuler plus facilement TDateTime. J'ai également rajouté pas mal de petites fonctions supplémentaires, Notamment pour le type String, plus 4 ou 5 pour les nombres, Je vous laisse les découvrir et en juger.

J'ai testé la majorité des fonctions, il ne devrait pas avoir d'erreurs (normalement :zoubi:) J'ai testé cette unité sous Windows 10 64 bits et Linux (Manjaro) 64 bits.

Voilà j'attend avec impatience vos retours, suggestions, erreurs si vous en voyez, etc... bref tout ce qui pourra améliorer le bouzin.

Merci d'avance

Bon weekend.

Pièce jointe 371976