Форум: "Основная";
Текущий архив: 2003.06.30;
Скачать: [xml.tar.bz2];
ВнизЗаголовок формы Найти похожие ветки
← →
Far (2003-06-17 14:05) [0]А можно ли убрать верхнюю часть формы с заголовком и кнопками управления окном?
← →
dataMaster (2003-06-17 14:09) [1]BorderStyle
← →
dataMaster (2003-06-17 14:13) [2]Но мне лично больше нравится так:
procedure TForm1.FormCreate(Sender: TObject);
var
FSizeCaption: Integer;
begin
with Form1 do
begin
FSizeCaption := GetSystemMetrics(SM_CYCAPTION);
SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_Style) and not WS_Caption);
Height:=Height - FSizeCaption;
end;
end;
Форма без заголовка, но имеет объем.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.06.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c