IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Codes sources à télécharger Delphi Discussion :

[FMX] Utilisation de TPath pour obtenir des images sympa


Sujet :

Codes sources à télécharger Delphi

  1. #1
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut [FMX] Utilisation de TPath pour obtenir des images sympa
    Bonjour,

    Je vous propose un nouvel élément à utiliser : [FMX] Utilisation de TPath pour obtenir des images sympa

    Ce programme, je l'ai écrit surtout dans le but de tester les possibilités du composant TPath. La genèse de ce petit essai n'avait rien à voir avec une customisation d'image, mon objectif était de voir ce que TPath pouvait m'apporter, je voulais utiliser ce composant moins gourmand en octets qu'une liste d'images au sein d'un style.

    De fil en aiguille, pour tenter de percer les différentes possibilités, d'un simple affichage d'un TPath avec saisie de la propriété Data dans un mémo je suis passé à la colorisation, la sauvegarde et même le chargement d'un fichier SVG (attention un fichier simple, l'objectif n'étant pas de faire un lecteur de fichier SVG).

    La colorisation m'a poussé à créer mes dialogues de couleurs (pas si évident que cela cette chose) et étudier de près les gradients, considérez cela comme un bonus.



    Qu'en pensez-vous ? Tout encouragement, genre sur cette discussion, me poussera, peut-être et selon mes disponibilités, à écrire un tutoriel pour expliquer plus en détail ma démarche.
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  2. #2
    Membre éprouvé
    Avatar de Cirec
    Profil pro
    Inscrit en
    Octobre 2010
    Messages
    467
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2010
    Messages : 467
    Points : 1 072
    Points
    1 072
    Par défaut
    Bonjour,

    je ne dois pas être correctement réveillé parce que je n'ai pas trouvé le lien pour télécharger l'exemple !

    Cordialement,
    @+

  3. #3
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut
    Tu l'es (réveillé), j'ai eu un problème à la publication (Erreur : Jeton de sécurité), le texte s'est bien mis mais je n'ai vu aucun lien pour le zip
    certainement un problème de poids car dans le zip se trouve la version debug
    Voilà qui est corrigé, j'ai séparé les sources de l'exe et, pour ce dernier, la version release 32 bits
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  4. #4
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut Post Scriptum
    Le programme ou du moins le code est certainement portable et doit pouvoir tourner sur Mac mais ça, je ne peux le tester.
    Une version mobile demande, à mon avis, une refonte de l'IHM mais serait-elle vraiment utile ? Je ne le pense pas.
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  5. #5
    Expert éminent sénior
    Avatar de Paul TOTH
    Homme Profil pro
    Freelance
    Inscrit en
    Novembre 2002
    Messages
    8 964
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Freelance
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Novembre 2002
    Messages : 8 964
    Points : 28 430
    Points
    28 430
    Par défaut
    pas mal, dans le genre j'ai fait un TTextPath qui permet de charger dans un TPath un texte quelconque depuis l'IDE, cela transforme donc un texte dans une police TrueType en un ensemble de points utilisés par TPath, la police n'a pas besoin d'être présente sur le poste destinataire du coup.

    https://github.com/tothpaul/Firemonk...aster/TextPath
    Developpez.com: Mes articles, forum FlashPascal
    Entreprise: Execute SARL
    Le Store Excute Store

  6. #6
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut
    Bonjour Paul,
    J'ai vu quelque chose de similaire ici
    la bibliothèque de ce forgeron pour traiter directement les fichiers SVG est certainement plus efficace que mon petit truc d'analyse du fichier mais d'un autre côté, ce n'était pas mon objectif
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  7. #7
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut Programme executable
    N'arrivant pas à l'inclure dans la présentation pour ceux qui ne serait intéressé que par le programme et/ou ne peuvent compiler faute d'une version suffisante.
    J'ai maintenant mis tout le paquet (exe et sources) sur github
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  8. #8
    Membre expert
    Avatar de Charly910
    Homme Profil pro
    Ingénieur TP
    Inscrit en
    Décembre 2006
    Messages
    2 344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Ingénieur TP
    Secteur : Bâtiment Travaux Publics

    Informations forums :
    Inscription : Décembre 2006
    Messages : 2 344
    Points : 3 122
    Points
    3 122
    Par défaut
    Merci Serge,

    j'ai téléchargé et compilé. Très beau, mais je n'accroche toujours pas à FMX bien que j'en vois les avantages (multi plateforme et format vectoriel). Pour le moment je développe toujours sous Win32 ou 64 pour PC . Mais cela va venir avec mes quelques essais sous Android.

    Merci pour cette démo.

    A+
    Charly

    PS : avec D7, pas de Pb pour inclure l'exe dans le zip à télécharger contrairement à D10.3 ou il est tellement gros et gras

  9. #9
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut
    Bonjour,

    FMX, il m'a fallu du temps et pas mal de sueur pour accrocher le wagon. J'avoue que, maintenant, après quelques applications pros, j'ai du mal à revenir à VCL et quand j'y reviens du mal à ne pas utiliser les livebindings (surtout lorsqu'il s'agit de liste). C'est donc bien une question d'habitude avant tout.
    Cela dit, tu n'as pas tort en ce qui concerne la taille des exe mais toutes les versions ou presque ont augmenté la taille des exe j'ai encore quelques programmes D3 migrés en D7 puis en D2010 et la taille n'a fait que s'accroitre quand je pense à l'époque où il fallait économiser chaque octet
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  10. #10
    Expert éminent sénior
    Avatar de Paul TOTH
    Homme Profil pro
    Freelance
    Inscrit en
    Novembre 2002
    Messages
    8 964
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Freelance
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Novembre 2002
    Messages : 8 964
    Points : 28 430
    Points
    28 430
    Par défaut
    Citation Envoyé par SergioMaster Voir le message
    Bonjour Paul,
    J'ai vu quelque chose de similaire ici
    la bibliothèque de ce forgeron pour traiter directement les fichiers SVG est certainement plus efficace que mon petit truc d'analyse du fichier mais d'un autre côté, ce n'était pas mon objectif
    oui sauf qu'il utilise la fonction TextLayout.ConvertToPath, du coup il faut que la police que tu veux utiliser soit présente sur le système. Mon idée c'était de transformer au moment du Design une police Windows de mon choix en TPath afin que le résultat soit utilisable partout
    Developpez.com: Mes articles, forum FlashPascal
    Entreprise: Execute SARL
    Le Store Excute Store

  11. #11
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut
    Ah, je n'avais pas pousser la comparaison jusqu'à ce point, effectivement c'est un plus.

    Pour continuer sur les SVG et Github, j'ai vu un projet qui permettrait de lire ces fichiers https://github.com/ekot1/DelphiSVG et une fourche https://github.com/salvadordf/DelphiSVG, pour ceux qui voudraient s'y aventurer
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  12. #12
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 038
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 038
    Points : 40 943
    Points
    40 943
    Billets dans le blog
    62
    Par défaut Toujours dans mes essais d'utilisation, quelques remarques
    Bonjour,
    c'est en fait une suite à ce premier programme. J'ai voulu vérifier comment la résolution allait intervenir
    En bonus voici les sources nécessitant l'ajout des composants RadiantShapes (voir GetIt), au départ non nécessaires je me suis piqué au jeu des "et si ..."

    Plusieurs onglets pour comprendre les différences entre TPath, TImage mais aussi de quoi voir comment fonctionne (ou pas) le multiresbitmap.

    pas intéressés par la compilation ou par le fait que vous ne voulez pas installer RadiantShapes ? Vous pourrez retrouver l'exécutable ici dans l'archive PathTestsExe.zip
    Fichiers attachés Fichiers attachés
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

Discussions similaires

  1. [Article] Obtenir des images types pour tester vos design
    Par FirePrawn dans le forum Publications (X)HTML et CSS
    Réponses: 3
    Dernier message: 04/04/2013, 11h05
  2. Obtenir des images types pour tester vos design
    Par FirePrawn dans le forum Mise en page CSS
    Réponses: 0
    Dernier message: 21/02/2013, 15h01
  3. Réponses: 1
    Dernier message: 22/10/2012, 11h58
  4. [GD] Utiliser la bibliotheque GD pour creer des images cliquables
    Par willyg28 dans le forum Bibliothèques et frameworks
    Réponses: 9
    Dernier message: 05/04/2012, 18h24
  5. Réponses: 1
    Dernier message: 21/08/2009, 14h29

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo