| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Выделение в memo [D7, XP]

DJ_UZer ©   (2008-03-15 18:24:00) 

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

---

DJ_UZer   (2008-03-15 19:22:00) [1]

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

---

{RASkov}   (2008-03-15 19:06:00) [2]

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


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

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

---

DJ_UZer   (2008-03-15 19:03:00) [3]

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

---

{RASkov}   (2008-03-15 18:58:00) [4]

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

---

{RASkov}   (2008-03-15 18:57:00) [5]

> [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;

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

---

Наверх