Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.03.2010, 21:27   #1
Belfigor
Пользователь
 
Регистрация: 28.02.2010
Сообщений: 12
По умолчанию Как узнать размер клиентской части окна?

Есть окно, как узнать размер его клиентской части? Способ с узнаванием координат левого верхнего и правого нижнего углов с последующим вычетанием из них высоты шапки и ширины рамки не подходит. Хотя если как-то программно и быстро можно узнать высоту и ширину рамки то объясните пожалуйста как
Belfigor вне форума Ответить с цитированием
Старый 01.03.2010, 21:34   #2
Marsel737
Форумчанин
 
Аватар для Marsel737
 
Регистрация: 09.11.2009
Сообщений: 669
По умолчанию

Код:
  Form1.ClientHeight
  Form1.ClientWidth
Я не всегда знаю, о чем говорю, но знаю, что прав. © Мухаммед Али.
К чёрту обстоятельства. Я создаю возможности. © Брюс Ли
Marsel737 вне форума Ответить с цитированием
Старый 01.03.2010, 21:37   #3
Belfigor
Пользователь
 
Регистрация: 28.02.2010
Сообщений: 12
По умолчанию

Чужого окна
Belfigor вне форума Ответить с цитированием
Старый 01.03.2010, 22:22   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Код:
Var ARect   : TRect;
begin
GetClientRect(хэндл чужого окна, ARect);
mihali4 вне форума Ответить с цитированием
Старый 03.03.2010, 13:00   #5
Belfigor
Пользователь
 
Регистрация: 28.02.2010
Сообщений: 12
По умолчанию

Мне пишет [Error] Unit1.pas(282): Too many actual parameters
когда я пытаюсь применить этот код:
procedure TForm1.Button6Click(Sender: TObject);
Var ARect : TRect;
begin
g_WH := FindWindow('triuiScreen', 'test');
GetClientRect(g_WH, ARect);
end;

Все, разобрался,
Windows.GetClientRect(g_WH, ARect);
если так, то работает

У нас принято оформлять код специальным тэгом - при помощи кнопочки "#".
Только...
И не значком #.
И не РНР-кодом.
И не значком цитаты.
И не собственными "ручками".
Рекомендую. Помимо общих правил форума есть и дополнения к ним в каждом разделе...
Модератор

Последний раз редактировалось mihali4; 03.03.2010 в 14:55.
Belfigor вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как растянуть див на всю высоту клиентской части окна браузера Anopsa - Anna HTML и CSS 3 21.09.2009 10:07
Как узнать какой символ является розделителем дроной части DarkEvil Общие вопросы Delphi 8 13.08.2009 08:05
Прозрачность в клиентской части окна. Ivan_32 Win Api 2 06.02.2009 15:53
установка клиентской части СУБД Банзай БД в Delphi 3 07.09.2007 14:12
Как узнать размер массива мандарин Общие вопросы Delphi 2 30.05.2007 19:18