| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
всплывающий список
Lotus © (2002-02-13 10:33:00)Нужно чтобы при вводе текста в Memo после нажатия какой-то кнопки, под курсором появлялся список ListBox (так же как появляются свойства компонентов после ввода точки в delphi).
Не знаю, как для этого определить координаты курсора в пикселях, относительно экрана или того же Memo?
Юрий Зотов (M) (2002-02-13 16:09:00) [1]> Дело в том, что GetCaretPos выдает координаты в кол.ве строк и символов
Почему? В пикселях и выдает. И в справке так написано, и тест то же самое показывает.
Lotus (2002-02-13 15:57:00) [2]Дело в том, что GetCaretPos выдает координаты в кол.ве строк и символов, а координаты ListBox, нужно указывать в пикселах, так что этот способ врядли подойдет (конечно можно делать пересчет на пикселы, но шрифт может быть разного размера). Что можно сделать?
Юрий Зотов (M) (2002-02-13 12:12:00) [3]procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
var
P: TPoint;
begin
GetCaretPos(P);
Caption := Format("X=%d, Y=%d", [P.X, P.Y])
end;
Lotus (2002-02-13 12:04:00) [4]Не совсем понятно, можно пример?
Юрий Зотов (M) (2002-02-13 11:15:00) [5]GetCaretPos
| |
