synchroniser le scroll horizontal d'un Tmemo avec un Tedit

Bonjour a tous,

j'ai un gros casse tête que je n'arrive pas a résoudre, j'ai un memo dont les lignes sont limitées a 80 caractères, et juste au dessus de ce memo j'ai un edit lui aussi bloqué a 80 caractères.

l'objectif est que le text du edit soit la ligne actuellement sélectionné du memo (ça c bon ça marche), mais mon probleme c'est qu'avec un memo de 80 caractères par lignes, mon appli n'est pas adaptée pour les résolutions inférieures à 1024*768.

du coup si ma form doit etre réduite, la scrollbar du memo permet d'accéder aux parties de la ligne que l'ont ne voit pas, mais mon edit lui ne possède pas de scrollbar (et il ne doit pas en avoir) et donc en fait l'objectif serait de trouver un moyen de synchroniser la position de la scrollbar du memo avec le texte affiché dans mon edit.
Car sinon lorsque j'affiche la fin de la ligne de mon mémo avec la scrollbar le champ edit lui continue de me montrer le debut du texte.

j'expère que j'ai réussit a être assez clair dans l'explication de mon probleme, mais sinon je reste disponnible pour apporter des informations complémentaires.


Merci d'avance si quelqu'un peu m'aider pour cette synchronisation.

détourne le traitement du message WM_SCROLL_qqch du memo pour envoyer le même message à l'Edit en même temps que tu laisse le memo faire son traitement

RESOLU par moi-meme :

j'ai changé mon edit pour un autre memo d'une seule ligne et du coup l'instruction suivante fonctionne :


procedure TFormMappingSource.dcmREPORTMemoScroll(Sender: TObject;
ScrollStyle: TScrollStyle; Delta: Integer);
begin
if ScrollStyle = ssHorizontal then
dcmMASK.ScrollScreenHorz(Delta);
end;