Форум: "Основная";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];
ВнизFullScreen Найти похожие ветки
← →
Natalia (2002-07-05 08:23) [0]Люди, помогите плизз...
Мне нужно чтобы по нажатию кнопки форма переходила в полноэкранный режим... Пробовала код из FAQ, но выдаётся куча непонятных мне ошибок...Заранее благодарю :)
← →
Ser_Kham1 (2002-07-05 08:53) [1]SendMessage(Form1.Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);
← →
Vap (2002-07-05 08:56) [2]procedure TForm1.Button1Click(Sender: TObject);
begin
WindowState:=wsMaximized;
end;
← →
tsarevep (2002-07-05 09:38) [3]Так вам что надо "Как в игрушках разворачивать,что б все перекрыла или просто развернуть?"
← →
gs (2002-07-05 10:01) [4]procedure TFooForm.ButtonFooClick(Sender: TObject);
begin
// Здесь можно сохранить значения всех изменяемых ниже
// свойств для их дальнейшего восстановления
FormStyle := fsStayOnTop;
Left := 0;
Top := 0;
Width := Screen.Width;
Height := Screen.Height;
end;
← →
ekiM (2002-07-05 10:20) [5]Развитие идеи господина gs ^ :
procedure TMainForm.BtnMaximizeClick(Sender: TObject);
const
Maximized: Boolean = False;
WinRect: TRect = (Left: 0; Top: 0; Right: 0; Bottom: 0);
SavedFormStyle: TFormStyle = fsNormal;
begin
Maximized := not Maximized;
if Maximized
then begin
GetWindowRect(Handle, WinRect);
SavedFormStyle := FormStyle;
FormStyle := fsStayOnTop;
Top := 0;
Left := 0;
Width := Screen.Width;
Height := Screen.Height;
end
else begin
Top := WinRect.Top;
Left := WinRect.Left;
Width := WinRect.Right - WinRect.Left;
Height := WinRect.Bottom - WinRect.Top;
FormStyle := SavedFormStyle;
end;
end;
← →
Rem (2002-07-05 13:45) [6]Попробуйте так:
WindowState := wsMaximized;
BorderStyle := bsNone;
← →
Севостьянов Игорь (2002-07-05 16:30) [7]Да нет же ребята полноэраннный режим это тебе не MaximizedWindow
Как сказал Ser_Kham1 (05.07.02 08:53)
SendMessage(Handle,WM_SYSCOMMAND,SC_MAXIMIZE,0);
← →
Anatoly Podgoretsky (2002-07-05 16:43) [8]Maximized разные бывают, и на полный экран и на часть
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c