Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

К чему две кнопки привязать, чтобы они были внизу по центру?


Сержик ©   (2001-12-19 15:45:00) 

Форма растякивается и надо, чтобы OK и CANCEL были внизу по центру.


Dimka Maslov   (2001-12-19 17:21:00) [1]

function Center(Value:Integer; HiValue:Integer; LoValue:Integer=0):Integer;
asm
sub edx, ecx
sub edx, eax
shr edx, 1
add ecx, edx
mov eax, ecx
end;

procedure TForm1.FormResize(Sender: TObject);
begin
OkButton.Left:=Center(OkButton.Width+CancelButton.Width+8, ClientWidth);
CancelButton.Left:=OkButton.Left+OkButton.Width+8;
OkButton.Top:=ClientHeight-OkButton.Height-8;
CancelButton.Top:=OkButton.Top;
end;


Jony   (2001-12-19 16:49:00) [2]

В Anchors кнопок оставить True только в akTop или в akBottom.


v-o-y-a-g-e-r   (2001-12-19 16:03:00) [3]

а можно кинуть панель , на нее кнопки, у панели выставить размеры и алигмент...


Юрий Зотов   (2001-12-19 15:52:00) [4]

Напишите код выравнивания кнопок в обработчике OnResize.


Наверх

Титульная страница Поиск, карта сайта Написать письмо