Вниз
Скачать: CL | DM;

Выделение в memo   Найти похожие ветки 

← →
DJ_UZer ©   (2008-03-15 18:24) [0]

Привет всем!
Подскажите пожалуйста, как сделать чтобы при выделении слова (2 щелчком мыши правой), в мемо, не выделялся еще пробел, а только само слово?


← →
{RASkov} ©   (2008-03-15 18:57) [1]

> [0] DJ_UZer ©   (15.03.08 18:24)

procedure TForm1.Memo1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
 if (Button=mbLeft) and (ssDouble in Shift) then
//if Memo1.SelText[Length(Memo1.SelText)]=#32 then
* while Memo1.SelText[Length(Memo1.SelText)]=#32 do
   Memo1.SelLength:=Memo1.SelLength-1;
end;

Можешь комментарий со звездочкой поменять местами, ну а саму звездочку выкинуть нафик :)


← →
{RASkov} ©   (2008-03-15 18:58) [2]

т.е. не сами строки местами менять, а символы // и *...
ну * это просто обозначение куда перенести комментарий, поэтому она вообще не нужна


← →
DJ_UZer ©   (2008-03-15 19:03) [3]

{RASkov}, большое спасибо! ;)


← →
{RASkov} ©   (2008-03-15 19:06) [4]

> (2 щелчком мыши правой),


> [3] DJ_UZer ©   (15.03.08 19:03)

только это для левой кнопки я сделал, а тебе нужно для правой?


← →
DJ_UZer ©   (2008-03-15 19:22) [5]

{RASkov}, ой нет для левой, перепутал..:)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
15-1204028231
Sairex
2008-02-26 15:17
2008.04.13
Подскажите уважаемые мастера...


6-1185177400
Dmitry_177
2007-07-23 11:56
2008.04.13
Сокеты: разрыв соединения для последующего соединения


2-1205343170
MegaPiha
2008-03-12 20:32
2008.04.13
Как создать "живой" SQL запрос?


3-1195555634
shah
2007-11-20 13:47
2008.04.13
Распределенные базы данных


2-1205829385
Sonia
2008-03-18 11:36
2008.04.13
Файловая переменная, как параметр процедуры




   Наверх