Архив метки: close

Не показывать форму программы: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Application.ShowMainForm:=false; [/cc] Запретить кнопку Close [x] в заголовке окна: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Style := GetWindowLong(Handle, GWL_STYLE); SetWindowLong(Handle, GWL_STYLE, Style And Not WS_SYSMENU); // var Style: Longint; [/cc] Задание цвета формы: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Form1.Color:=RGB(255,130,10); // т.е. задаем значения Красного, Зеленого, Синего (0..255).… Читать далее »