請問一下，我的問題是在memo上我要選取一段文字，但是向右選取文字時我是用memo..CaretPos.X (而且我是寫在mousemove中)，而且向右選取時是會增加，但是我要從某一個點往左移動時，卻不會減少，請問該如才能讓滑鼠在某一點往左移時，mouse所選取的值也會跟著減少呢(是要寫在那一個事件中呢?)，謝謝。
ps：我已經找過論壇才發問，因為我用的關鍵字一直都找不到我要的結果，謝謝各位的回答。

delphi初學者

------
DELPHI初學者

[code]
procedure TForm1.Memo1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Label1.Caption := 'X = ' inttostr(x) ' Y = ' inttostr(Y) ;
end;
[/code]

在mousemove events 中 X,Y 應該就是你要的東西。