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

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

EDIT во все окно

k@rt ©   (2003-08-08 20:33:00) 

Может кто подскажет как можно сделать чтоб edit был размеров со всю клиентскую часть окна. Может есть какое свойство?
Щас я делаю так:
function WindowProc(Wnd: HWND; Msg: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT;
stdcall;
var
ClientRect: TRect;
begin
case Msg of
WM_SIZE:
begin
GetClientRect(MainWnd,ClientRect);
( EditWnd, 0, 0, ClientRect.Right, ClientRect.Bottom, True)

Может кто подскажет как можно сделать чтоб edit был размеров со всю клиентскую часть окна. Может есть какое свойство?
Щас я делаю так:
function WindowProc(Wnd: HWND; Msg: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT;
stdcall;
var
ClientRect: TRect;
begin
case Msg of
WM_SIZE:
begin
GetClientRect(MainWnd,ClientRect);
MoveWindow(EditWnd, 0, 0, ClientRect.Right, ClientRect.Bottom, True);
end;
end;

---

Крот   (2003-08-09 14:40:00) [1]

Поставь стиль ES_MULTILINE. И MSDN тоже поставть :)

---

k@rt   (2003-08-08 20:50:00) [2]

Пишу прогу на чистом АПИ без использования VCL

---

Rouse_   (2003-08-08 20:40:00) [3]

Как вариант:
Делай наследника от TEdit и активируй и него Align

Желаю успехов

---

Наверх