Discussion :

[Le_Suisse]

Bonjour,

Je suis à la recherche d'un composant qui me permettrait de faire une sorte de slide. J'ai dans une TForm plusieur mémo que je souhaite afficher d'une manière agréable. Mon idée était de les faire défiler avec un système de flèche de chaque coté.

Malheureusement je ne sais pas comment m'y prendre car je n'ai rien trouvé comme discussion allant dans ce sens. Dois-je utiliser des Frames ? Est-il possible d'obtenir cet effet visuel en Delphi ? Auriez-vous une autre idée ?

Merci d'avance pour vos réponses.

[sjrd]

J'ai rien compris Tu aurais une application qui fait ce que tu veux, dont tu pourrais donner un screenshot ?

[mick605]

Salut

Si tu souhaites simplement faire défiler les mémos horizontalement, tu peux utiliser un TTimer et modifier régulièrement la valeur de Memo1.Left. Ton composant se déplacera donc horizontalement.

Bonne chance

Mick605

[Le_Suisse]

Effectivement je souhaite faire défiler les mémo horizontalement mais avec des flèches (donc à la demande de l'utilisateur) et non avec un ttimer. Donné un effet de "pages coulissantes".

[Archimède]

Alors dans l'événement onKeyDown de la fiche, tu incrémentes la propriété left de ton mémo...

Code :

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

1
2
 
If Key=VK_Right then memo1.left:=memo1.left+1;

ça risque de clignoter... un doublebuffered dans le oncreate ...

a+

[mick605]

Effectivement je souhaite faire défiler les mémo horizontalement mais avec des flèches (donc à la demande de l'utilisateur) et non avec un ttimer. Donné un effet de "pages coulissantes".

Oui, le timer sera activé par un bouton. Lors du clic, le timer est activé, et dépllace régulièrement le mémo.


Edit : Quand tu parles d'un système de fleches, c'est un ensemble de boutons, ou les touches du clavier ?