Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.19;
Скачать: CL | DM;

Вниз

как отловить смену положения курсора в TEdit?   Найти похожие ветки 

 
DimG   (2003-03-19 16:16) [0]

Подскажите как отловить смену положения курсора в TEdit не используя WM_KeyDown и т.п.?


 
Astrov Alseos   (2003-03-19 17:35) [1]

Эта функция возвращает положение курсора в TEdit (D6, Win98)


Function _GetPosition(Sender: TEdit):Integer;
var iX,iY: Integer;
begin
iX := 0; iY:=0;
iY := SendMessage(Sender.Handle, EM_LINEFROMCHAR, Sender.SelStart,0);
iX := Sender.SelStart - SendMessage(Sender.Handle, EM_LINEINDEX,iY, 0);
Result:=iX + 1
end;


...возможно, и в D7 она будет работать...


 
Diamond Cat ©   (2003-03-20 00:55) [2]

надо перехватывать wm_command и в случае если hiword(wparam)=EN_CHANGE и lParam=edit№.handle, значит произошло изменение в едите, а для того чтоб получить изменение позиции каретки, надо через set/getwindowlong, устанавливать едиту новый обработчик и внем отлавливать сообщение EM_SCROLLCARET



Страницы: 1 вся ветка

Текущий архив: 2003.05.19;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.01 c
1-59725
RIPer
2003-05-05 14:47
2003.05.19
HorizontalScrollBar


3-59581
Sergey
2003-04-25 15:59
2003.05.19
SQL запрос ???


14-59922
crash
2003-04-28 00:21
2003.05.19
отправить сообщение другим приложениям


1-59773
Arkady
2003-05-06 11:08
2003.05.19
TOpenDialog


1-59798
TALLA_
2003-05-07 08:14
2003.05.19
Как приспособить строки из макроса Excel в Delphi, через OLE