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

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

позиция мыши в memo [D7]

Nipel ©   (2007-03-07 13:44:00) 

Мне нужно вставить строку в MEMO( если надо Rich edit) на позицию мыши и перевести ти вперед(мышь) на n символов.
        mouse is hereпример.
Заранее благодарен.

---

begin...end   (2007-03-07 21:53:00) [1]

> default ©   (07.03.07 13:59) [1]

Memo1.SelText := 'StringToPaste'

---

nipel   (2007-03-07 14:31:00) [2]

спасибо. С меня молоко

---

default   (2007-03-07 13:59:00) [3]

вот это посмотри

procedure TForm1.Button1Click(Sender: TObject);
var
 s: String;
begin
  s := Clipboard.AsText;
  Clipboard.AsText := 'StringToPaste';
  Memo1.PasteFromClipboard;
  Clipboard.AsText := s;
  Memo1.SetFocus
end;


---

default   (2007-03-07 13:59:00) [4]

uses Clipbrd;

---

Наверх