[DELPHI] synchroniser le défilement d'un TListBox et d'un TMemo

synchroniser le défilement d'un TListBox et d'un TMemo [DELPHI] - Programmation

Marsh Posté le 04-10-2001 à 16:02:22    

voilà, je voudrais que quand je clique sur un item d'un listbox, le curseur se mette en début de la ligne ayant le même indice que l'item sélectionné et vise-versa
 
ex: si itemindex du listbox vaut 3, je veux que le curseur se place en début de ligne n°3 dans le mémo.
 
merci :)

Reply

Marsh Posté le 04-10-2001 à 16:02:22   

Reply

Marsh Posté le 04-10-2001 à 20:45:47    

pour te positionner sur la ligne numéro numLine de Memo tu fais
 
Memo.SelStart := SendMessage (Memo.Handle, EM_LINEINDEX, NumLine, 0);
 
et pour déterminer le numéro de la ligne où se trouve le curseur dans ton mémo tu fais
 
NumLine := SendMessage(memo.Handle,EM_LINEFROMCHAR,Memo.SelStart,0);
 
 
cela devrait fonctionner...

Reply

Marsh Posté le 05-10-2001 à 09:14:29    

taureau a écrit a écrit :

pour te positionner sur la ligne numéro numLine de Memo tu fais
 
Memo.SelStart := SendMessage (Memo.Handle, EM_LINEINDEX, NumLine, 0);
 
et pour déterminer le numéro de la ligne où se trouve le curseur dans ton mémo tu fais
 
NumLine := SendMessage(memo.Handle,EM_LINEFROMCHAR,Memo.SelStart,0);
 
 
cela devrait fonctionner...  




merci :)
 
ps: pour récupérer le N° de ligne où se trouve le curseur, moi je fais:
memo.caractpos.y :)

Reply

Marsh Posté le 05-10-2001 à 10:23:28    

oui mais cela ne fonctionne pas sur les anciennes versions de delphi alors qu'en passant directement par les api windows le code est valable même pour delphi 1 ;)

Reply

Marsh Posté le 05-10-2001 à 11:22:10    

taureau a écrit a écrit :

oui mais cela ne fonctionne pas sur les anciennes versions de delphi alors qu'en passant directement par les api windows le code est valable même pour delphi 1 ;)  




 
merci de cette précision :)
 
sinon, ben ton truc, ça marche nickel...

Reply

Marsh Posté le 05-10-2001 à 13:52:03    

ceci dit la nouvelle syntaxe à plus de chance d'être portable sur kylix  ;)

Reply

Marsh Posté le 05-10-2001 à 14:21:56    

taureau a écrit a écrit :

ceci dit la nouvelle syntaxe à plus de chance d'être portable sur kylix  ;)  




 
oui, mais Kylix, pour l'instant, je m'en tape :lol:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed