Bonjour,
Newbie sur Lazarus. J'essaie sans succès de synchroniser deux Memos :
Quand je fais rouler la molette de la souris sur memo1, l'ascenseur du memo2 est bien synchrone, mais le texte ne défile pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 procedure TForm1.memo1MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); begin memo2.VertScrollBar.Position:= memo1.VertScrollBar.Position; // memo2.setFocus ; // memo2.refresh ; end;
J'y suis presque là, non ?
Ne peut-on pas indiquer à un Memo sur quel n° de String se positionner ?
Partager