Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2004.01.09;
Скачать: [xml.tar.bz2];

Вниз

Убрать кнопку максимизации!   Найти похожие ветки 

 
Дремучий   (2003-11-05 22:19) [0]

форма имеет кнопку закрыть и минимизировать. Тем не менее кнопка максимизации тоже присутствует, хотя и не доступна. Как ее убрать?
Пробовал вот так:

procedure TfmMain.CreateParams(var Params: TCreateParams);
begin
with Params do Style:= Style and not WS_MAXIMIZEBOX;
inherited CreateParams(Params);
end;


не получается... :((


 
Дремучий   (2003-11-05 22:51) [1]

меню убирается без проблем...

procedure TfmMain.WMNCCreate(var Message: TWMNCCreate);
var
SysMenu: HMENU;
begin
inherited;
SysMenu := GetSystemMenu(Handle, False);
DeleteMenu(SysMenu, SC_MAXIMIZE, MF_BYCOMMAND);
end;

а кпнопка...


 
Игорь Шевченко   (2003-11-05 23:55) [2]

А кнопка остается. By design


 
Дремучий   (2003-11-06 00:04) [3]


> Игорь Шевченко ©

:))

ну а по сабжу? как убрать-то?


 
OlegGashev   (2003-11-06 03:02) [4]

procedure TForm1.FormCreate(Sender: TObject);
begin
BorderIcons:=[];
end;


 
Игорь Шевченко   (2003-11-06 10:45) [5]

Дремучий © (06.11.03 00:04)

1) Рисовать Caption своими руками
2) Смириться с тем, что есть



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

Форум: "WinAPI";
Текущий архив: 2004.01.09;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
14-25601
Soft
2003-12-12 02:42
2004.01.09
---|Ветка была без названия|---


3-25262
LinOS
2003-12-08 13:48
2004.01.09
Мигает DBGrid


1-25436
EugenCFG
2003-12-23 18:25
2004.01.09
Здраствуйте... ! Кто-нибудь знает как определить координаты...


6-25493
May
2003-11-10 15:42
2004.01.09
Копирование файлов


3-25184
Sirus
2003-12-13 07:46
2004.01.09
Backup / Restore влияет на ORDER BY???





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский