Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

Форма без заголовка, без рамки, но может изменять размеры?   Найти похожие ветки 

 
Артем К.   (2004-07-08 08:05) [0]

Такое возможно?


 
basic   (2004-07-08 08:19) [1]

а BorderStyle какой?


 
КаПиБаРа ©   (2004-07-08 08:21) [2]

Возможно


 
Артем К.   (2004-07-08 08:24) [3]

BorderStyle := bsSizeable
Я знаю надо через CreateParams, но не знаю какие WS_ надо ставить


 
basic   (2004-07-08 09:07) [4]

если bsSizeable то возможно, меняй значение на bsNone, и не парься CreateParams


 
Артем К.   (2004-07-08 09:11) [5]

все верно, но я не смогу изменять размеры формы мышью


 
ssk ©   (2004-07-08 09:26) [6]

Мне без заголовка такой вариант нравится. Этот пример был дан кем-то здесь же на форуме. Вот только не помню, кем.


procedure FormWithoutCaption(Form: TForm);
var
FSizeCaption: Integer;
begin
 with Form do
   begin
     FSizeCaption := GetSystemMetrics(SM_CYCAPTION);
     SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_Style) and not WS_Caption);
     Height:=Height - FSizeCaption;
   end;
end;


 
Артем К.   (2004-07-08 09:32) [7]

>> ssk Спасибо!



Страницы: 1 вся ветка

Текущий архив: 2004.07.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.024 c
14-1088740087
Ozone
2004-07-02 07:48
2004.07.25
Красивый и функциональный DBGrid


1-1089665031
RedLord
2004-07-13 00:43
2004.07.25
из полного пути к файлу его имя


3-1088406454
denmin
2004-06-28 11:07
2004.07.25
Как узнать координаты ячейки грида?


3-1088626619
3APA3A
2004-07-01 00:16
2004.07.25
Как узнать VARCHAR длину


14-1088743781
MBo
2004-07-02 08:49
2004.07.25
Пятница - не сломай головы ;^)