Программирование

← →
ruslan_r (2002-02-08 06:29) [0]

Я только начал учиться программировать на Дельфи.
У меня такой вопрос
Как можно скрыть пол Формы

← →
gek (2002-02-08 07:15) [1]

procedure TFormEdit.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_NEXT then
if Height = 90 then
while Height < 202 do
Height:=Height + 2
else
else if Key = VK_PRIOR then
while Height <> 90 do
Height:=Height - 2
else if Key = VK_ESCAPE then
Close;
end;

← →
DarkDv © (2002-02-08 08:43) [2]

или при нажатии кнопки bt1 сделай
form1.height := (половина от числа которое у тебя сейчас стоит в height)

← →
Sergey13 © (2002-02-08 09:55) [3]

У меня другая идея. Брось на скрываемую половину формы Panel, а уже на нее накидай что у тебя там есть. После этого меняй видимость этой панели с тру на фэлс и наслаждайся результатом. Что бы не нарушалась "красота" поиграйся со свойстваим Align и AutoSize формы и компонентов. Кстати, на остаюшуюся часть формы лучше тоже бросить Panel, тогда воплотить предыдущий совет будет намного проще.

это забивается в FormCreate вкладка(Events)
form1.height:=(form1.clientwidth div 2);

Программирование Найти похожие ветки