На главную
Подписка
Новости


Рейтинг@Mail.ru











Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Редакторы текста, отчеты / Как сделать окошко подсказки в редакторе как дельфи по CTRL-J? Сделать домашней страницей Добавить в избранное Написать писмо

Как сделать окошко подсказки в редакторе как дельфи по CTRL-J?




Допустим у тебя TMemo..
1. Делаешь ListBox, заполняешь, visible := false, parent := Memo
2. У Memo в обработчике Memo.onKeyDown что-нибудь типа:

if ((key = Ord('J'))and(ssCtrl in Shift)) then begin
lb.Left := Memo.CaretPos.x;
lb.Top := Memo.CaretPos.y + lb.height;
lb.Visible := True;
lb.SetFocus;
end;

он показывается.. а дальше работай с листбоксом, вставляй в мемо нужный текст, пряч листбокс
hog - hog@i.am (12.11.00 02:53)

-= Из конференции сайта MASTERS OF DELPHI (http://delphi.mastak.com) =-

Copyright ©   "Мастера DELPHI"   E-mail:   delphi@mastak.com  http://www.delphimaster.ru
Источник получения информации: http://www.delphimaster.ru
Hosted by uCoz