Discussion :

[delaio]

Bonjour à tous,

je développe sous delphi 10.2 tokyo une application multi périphérique sous android.

je charge des données via une API et je remplis un listview via le live binding. son ItemAppearance est en mode "dynamicAppearance" et j'ai crée 6 TTextObjectAppearance dans l'Item.

Au final, chaque ligne du listview affiche plusieurs données (1 ligne prend les 3/4 de l'écran) et pour une consultation plus agréable, je souhaite effectuer un défilement horizontal (façon diaporama photo) plutôt qu'un défilement vertical standard.

J'ai beau cherché dans les propriétés ou sur le net, je ne trouve aucune info. J'ai même tenté de coller un compo enfant "THorzScrollBox" dans le listview sans résultat

Question : Suis je passée à côté de LA propriété que je cherche ou je me trompe de compo (le design du listview est parfait pour ce que je veux faire) ?

Merci par avance pour vos éclaircissements

delaio.

[SergioMaster]

Bonjour,

si une "ligne" prend les 3/4 de l'écran (autant dire tout) peut-être vaudrait-il mieux songer à utiliser un TabControl (en jouant sur le tabposition = dots par exemple) .

[guillemouze]

Regarde dans l'exemple fireflow, tu trouvera peut etre l'inspiration car il me semble qu'elle ressemble à ce que tu recherches.
Chez moi elle se trouve dans

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

C:\Users\Public\Documents\RAD Studio\11.0\Samples\FireMonkey\FireFlow

[free07]

Bonjour,

pour une consultation plus agréable, je souhaite effectuer un défilement horizontal (façon diaporama photo) plutôt qu'un défilement vertical standard.

J'ai beau cherché dans les propriétés ou sur le net, je ne trouve aucune info.

J'ai aussi voulu me servir d'un TListView et faire un défilement horizontal mais j'en suis arrivé à la conclusion que le listview n'est pas prévu pour cela, j'en ai même eu la confirmation sur un forum anglophone ( je me souviens plus lequel ) òu quelqu'un disait que cela n'est pas possible avec le ListView, c'est étonnant mais le défilement horizontal n'est pas prévu.

J'ai même tenté de coller un compo enfant "THorzScrollBox" dans le listview sans résultat

Pour ma part j'ai abandonné l'idée du tlistview et j'utilise uniquement un THorzScrollBox dans lequel j'ajoute dynamiquement les composants dont j'ai besoin et cela fonctionne bien.

[delaio]

Bonsoir à tous,

Chacun de vous m'a permis de trouver la solution !
- ne plus courir après le listview qui ne gère pas le défilement horizontal
- m'orienter vers un autre compo
- farfouiller dans les samples embarcadero

Au final, j'ai choisi le TListBox qui, grâce au concepteur de style, m'a permis d'avoir le même résultat avec un défilement horizontal !

Je me suis inspirée de l'exemple suivant :
C:\Users\Public\Documents\Embarcadero\Studio\19.0\Samples\Object Pascal\Multi-Device Samples\User Interface\CustomListBox

Merci à vous ! bonne soirée.

delaio.

[SergioMaster]

Bonjour,

Au final, j'ai choisi le TListBox qui, grâce au concepteur de style, m'a permis d'avoir le même résultat avec un défilement horizontal !

je suis curieux, s'il est possible de voir ton style ? j'en serai très heureux

[delaio]

Avec plaisir Sergio. Je te prépare ça dans un nouveau projet neutre...

[delaio]

voici un projet neutre qui affiche plusieurs données dans chaque item d'un listbox avec un défilement horizontal :

10.2 tokyo - design item listbox.zip

(Sergio : je t'ai épargné l'install du JSONAdapter pour le chargement des données dans le FDMemTable )

paramétrage des propriétés du listbox :
itemheight et itemwidth ainsi que le liststyle "Horizontal"

Dans le concepteur de style :
le layout à la même taille que le item du listbox

Dans le code :
je me suis vraiment inspirée du sample CustomListBox. Il faut penser à rajouter aux uses System.Rtti, utile pour la gestion de l'évènement onclick du bouton intégré dans le Item. Il va d'ailleurs falloir que je me penche sur cette méthode d'appel que je ne maitrise pas et qui n'est peut être pas compatible IOS :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

item_lis.StylesData['envoyerticket_bt.OnClick'] := TValue.From<TNotifyEvent>(envoyer_ticket_sms)

si questions ou problème de compil, n'hésitez pas (j'ai vidé les debug pour alléger le zip).

delaio.

[free07]

Il va d'ailleurs falloir que je me penche sur cette méthode d'appel que je ne maitrise pas et qui n'est peut être pas compatible IOS :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

item_lis.StylesData['envoyerticket_bt.OnClick'] := TValue.From<TNotifyEvent>(envoyer_ticket_sms)

delaio.

Bonjour,

Pas de problème de compatibilité avec iOS, je viens de le tester sur mon iPad et cela fonctionne très bien. Ma version d'iOS est 11.1.2

[delaio]

Bonjour,

Pas de problème de compatibilité avec iOS, je viens de le tester sur mon iPad et cela fonctionne très bien. Ma version d'iOS est 11.1.2

Bonjour,

Super, merci pour l'info !!! une épine de moins...

[free07]

Oups, désolé, j'ai fait le test trop rapidement, En regardant le code de + près, je viens de m'apercevoir que le bouton 'envoyerticket_bt' n'est pas affiché sur iOS, je n'avais pas fait attention, il y a donc bien un problème de compatibilité avec iOS.
La listbox fonctionne correctement mais il y a un problème avec ce bouton du concepteur de style

[delaio]

Oups, désolé, j'ai fait le test trop rapidement, En regardant le code de + près, je viens de m'apercevoir que le bouton 'envoyerticket_bt' n'est pas affiché sur iOS, je n'avais pas fait attention, il y a donc bien un problème de compatibilité avec iOS.
La listbox fonctionne correctement mais il y a un problème avec ce bouton du concepteur de style

arfff... c'était trop beau pour être vrai merci de m'avoir prévenu je pensais que seul l'évènement du bouton poserai problème sous IOS... apparemment, ça va être plus compliqué que ça si le bouton ne s'affiche même pas

[SergioMaster]

Bonjour,

je ne répond que maintenant car je n'ai pu m'y pencher avant. Tout d'abord merci pour le partage.
Je ne pourrais pas tester la partie Apple n'ayant pas de matériel de cette marque (je suis prêt à accepter les dons en ce sens )

Il m'a falloir voir pour vraiment comprendre ce que tu voulais obtenir. Perso je ne serais pas passer par un TListView, plutôt par trois panneaux, un Frame et quelques effets. J'ai souvenance d'une séance "Dev du Jeudi" ou équivalent s'approchant beaucoup de ça , à moins que ce soit un de mes programmes ... il faut que je vérifie.
Je pourrais peut-être te faire un proposition Lundi.
Déjà, selon moi cette histoire de bouton ne sera plus un problème grâce au Frame. Mais bon, je n'ai pas encore fouillé dans ton style (pour l'apparition du bouton avec IOS ce n'est peut être tout simplement qu'un problème de couleur) !

[Edit] un premier délire (déjà) sur la base d'un TLayoutGrid et d'un TFrame

[delaio]

bonjour,

Bonjour, je ne répond que maintenant car je n'ai pu m'y pencher avant. Tout d'abord merci pour le partage.

aucun souci, on a tous des contraintes et avec plaisir pour le partage

Perso je ne serais pas passer par un TListView, plutôt par trois panneaux, un Frame et quelques effets.

ben du coup, c'est bien un Tlistbox et pas un TListView que j'utilise mais je vois bien où tu veux en venir. Les tickets que je dois afficher sont dynamiques. Dans mon exemple, j'en ai affiché trois, mais l'utilisateur peut en avoir 1 seul ou 5 par exemple... et je ne me voyais pas trop créer des compos de manière dynamique et devoir gérer leur position, taille et autres propriétés à l'écran (avec les moultes résolutions des smartphones même si le scale est magique) : j'ai supposé que la charge de travail serait plus lourde comparé à ma solution qui offre le même résultat (même si j'ai passé pas mal de temps à la mise en page du concepteur de syle que je découvre tout juste... )

Je pourrais peut-être te faire un proposition Lundi

Je suis tout de même intéressée par ta solution car je me trompe peut être et de nouvelles méthodes, c'est toujours bon à prendre !!!

merci.

delaio.

[free07]

Bonjour,

Mais bon, je n'ai pas encore fouillé dans ton style (pour l'apparition du bouton avec IOS ce n'est peut être tout simplement qu'un problème de couleur) !

J'avais pris un peu de temps pour justement voir si cela n'était pas du à une propriété dudit bouton et j'avais fait des tests avec plusieurs couleurs mais voila... vu que je n'avais jamais utilisé le concepteur de style, je ne me suis pas rendu compte qu'il fallait valider pour que delphi applique les modifs au style, je viens de m'en rendre compte et effectivement en modifiant la couleur du texte du bouton, celui-ci est bien affiché avec iOS.
Tout fonctionne en changeant simplement la couleur du texte...

ben du coup, c'est bien un Tlistbox et pas un TListView que j'utilise mais je vois bien où tu veux en venir. Les tickets que je dois afficher sont dynamiques. Dans mon exemple, j'en ai affiché trois, mais l'utilisateur peut en avoir 1 seul ou 5 par exemple... et je ne me voyais pas trop créer des compos de manière dynamique et devoir gérer leur position, taille et autres propriétés à l'écran (avec les moultes résolutions des smartphones même si le scale est magique) : j'ai supposé que la charge de travail serait plus lourde comparé à ma solution qui offre le même résultat (même si j'ai passé pas mal de temps à la mise en page du concepteur de syle que je découvre tout juste... )

Les différentes tailles d'écran sont un réel problème et je ne connais pas encore de solution magique, j'aime bien utiliser TScaledLayout pour cela. Pour ma part, la solution du THorzScrollBox avec la création dynamique des compos m'a parut plus rapide à faire vu que je n'ai jamais utiliser le concepteur de style, mais je me demande pourquoi la création d'un style simplifierait cette problématique, est ce que c'est parce que les dimensions peuvent être fixé à la conception ?
Mais est ce que cela peut réellement résoudre les problèmes liés aux différentes tailles d'écran, à 1ère vue je ne vois pas comment.

Sinon lorsque j'ai basculé l'ipad pour le mettre en portrait ( vertical ), j'ai constaté l'affichage suivant ( mais cela ne doit pas être un problème si tu cibles que les smartphones ) :

[delaio]

Bonjour Free07

vu que je n'avais jamais utilisé le concepteur de style, je ne me suis pas rendu compte qu'il fallait valider pour que delphi applique les modifs au style

oui, moi même je n'ai pas encore cerné toutes les subtilités du concepteur de style dont ce fameux bouton "appliquer le style" qui parait capricieux quelque fois

je viens de m'en rendre compte et effectivement en modifiant la couleur du texte du bouton, celui-ci est bien affiché avec iOS.
Tout fonctionne en changeant simplement la couleur du texte...

ça c'est cool ! merci beaucoup d'avoir pris du temps pour regarder et merci à Sergio pour l'idée
et l'évènement fonctionne ? quand tu cliques sur le bouton : as tu le petit message qui apparaît ?

je me demande pourquoi la création d'un style simplifierait cette problématique, est ce que c'est parce que les dimensions peuvent être fixé à la conception ?

la réponse est oui : c'est un avis perso. je trouve plus facile de travailler la mise en page en amont plutôt qu'à la compilation. et le fait de pouvoir renseigner les propriétés Text de chaque TText facile d'autant plus le travail (réglage des couleurs, des sizes, des wordwrap...)

lorsque j'ai basculé l'ipad pour le mettre en portrait ( vertical ), j'ai constaté l'affichage suivant ( mais cela ne doit pas être un problème si tu cibles que les smartphones )

d'ailleurs pour l'affichage vertical de l'ipad, j'ai encore quelques réglages à faire (hauteur de lignes tronquée) mais le résultat ne me choque pas. L'objectif est vraiment de rendre la consultation des tickets agréable sur petit écran. si tout s'affiche sur grand écran c'est parfait aussi. mais c'est vrai, j'ai encore quelques finitions à faire (mode paysage sur smartphone, rajouter un défilement vertical pour le coup !)

[free07]

et l'évènement fonctionne ? quand tu cliques sur le bouton : as tu le petit message qui apparaît ?

Oui, ça fonctionne, le message apparait indiquant la bonne valeur d'index de la listbox.

[delaio]

génial ! ça c'est une bonne nouvelle

sinon, si tu as eu l'occasion de manipuler les TAniIndicator, j'ai posté une nouvelle discussion...

[free07]

sinon, si tu as eu l'occasion de manipuler les TAniIndicator, j'ai posté une nouvelle discussion...

Malheureusement non, pour le projet multi-periph sur lequel je travaille, je charge les données au démarrage de l'appli et j'affiche une image pour patienter, bien qu'avec iOS les perfs soient très correctes, c'est même relativement très rapide avec la version 11.
Mais je vais suivre avec attention cette nouvelle discussion car je sais que je vais y être confronté un jour surtout lorsque je vais travailler avec des données provenant d'un serveur sur le net

[SergioMaster]

Bonsoir,

oui, moi même je n'ai pas encore cerné toutes les subtilités du concepteur de style dont ce fameux bouton "appliquer le style" qui parait capricieux quelque fois

J'ai écrit il y a déjà pas mal de temps quelque chose sur les styles j'avais intitulé la manipulation AFRO en suggérant de la faire très, très souvent sous peine de péter des câbles !

ça c'est cool ! merci beaucoup d'avoir pris du temps pour regarder et merci à Sergio pour l'idée

un autre truc que j'ai vu à propos de ce bouton c'est que tu n'as pas indiqué de famille de style ça pourrait jouer.

c'est bien un Tlistbox et pas un TListView

comme quoi quand on a quelque chose en tête !

j'en ai affiché trois, mais l'utilisateur peut en avoir 1 seul ou 5 par exemple.

je pensais à beaucoup plus et planchais sur une solution à base de un panneau previous (image sauvegardée remplissage du panneau)/ panneau en cours livebinding/panneau prior (image sauvegardée remplissage du panneau)
jusqu'à cinq seulement je pense pas que ce soit la peine, du coup mon utilisation de la LayoutGrid et d'une frame devient presque trop facile