Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Вниз

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

← →
Dimka Maslov   (2001-12-19 17:21) [4]

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;

---

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

Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.008 c