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

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

Выравнивание текста в Edit [D7, Win2k, WinXP]


Антибайт ©   (2006-09-16 20:57:00) 

А как можно сделать вертикальное выравнивание в однострочном редакторе?

Попробовал так

var
Rect  : pointer;
Rect_  : TRect;

begin
Rect_.Top := 2;
Rect_.Left := 10;
Rect_.Right := 200;
Rect_.Bottom := 10;
Rect := @Rect_;
SendMessage (CatBox.Handle, EM_SetRectNP, 0, Integer (Rect));
end;


Не работает не фига ((

Фунrцию вызываю в OnShow.


DVM   (2006-09-19 15:01:00) [1]


> И что значит наследник на апях?

Ну не наследник, а оконную процедуру подменить своей можно вполне. SetWindowLong(...). В обработчике WM_PAINT рисовать все что угодно.
Для остальных сообщений вызывать дефолтовую оконную процедуру.


Leonid Troyanovsky   (2006-09-19 14:33:00) [2]


> Антибайт   (19.09.06 13:38) [6]

> А как быть с однострочным редактором?


http://groups.google.com/group/borland.public.delphi.vcl.components.using/msg/111fd76230bd76fd

--
Regards, LVT.


Антибайт   (2006-09-19 13:38:00) [3]

А как быть с однострочным редактором?


Leonid Troyanovsky   (2006-09-19 10:40:00) [4]


> Антибайт   (16.09.06 20:57)  

> А как можно сделать вертикальное выравнивание в однострочном
> редакторе?

> SendMessage (CatBox.Handle, EM_SetRectNP, 0, Integer (Rect));


This message is processed only by multiline edit controls.

--
Regards, LVT.


Антибайт   (2006-09-19 09:45:00) [5]

Ну ведь EM_GetRect возвращает правильный прямоугольник.  
Обязательно после этого перерисовыватся?


KilkennyCat   (2006-09-18 12:37:00) [6]

> [2] Антибайт   (17.09.06 20:53)


это я сглупил, извиняюсь... забыл, что апишный раздел.

Может, не работает из-за того, что EM_SetRectNP не вызывает перериросовки? :)


Антибайт   (2006-09-17 20:53:00) [7]

Да нифига не проще. Придётся перехватывать клавиатуру, писать в буфер, потом через TextOut выводить из буфера на каждое отжатие клавиши. Может можно проще, но мне пока в голову лезет этот вариант.

И что значит наследник на апях?

Почему EM_ SetRect не работает?


KilkennyCat   (2006-09-17 11:39:00) [8]

А не проще ли написать наследника с собственной процедурой отрисовки?


Наверх

Титульная страница Поиск, карта сайта Написать письмо