Вниз
Скачать: CL | DM;

Button1 i Button2   Найти похожие ветки 

← →
roma ©   (2004-09-30 17:02) [0]

Zdravstvuyte.Mojet vopros prostoy no dlya mne slojniy.
Na form1 samom verxu na levoy storone vervstavlyzyu button1 vipolnyayu i najimaju knopku razvernut na ves ekran form1 uvilicivaetsya na ves ekran i button1 s formoy vmeste podnimaetsya na verx v levoy uqol (eto normalno). Teper na form1 samom verxu na pravoy storone vervstavlyzyu button2 vipolnyayu i najimaju (knopku razvernut na ves ekran) form1 uvilicivaetsya no button2 ne uxodit na pravoy storoni forrm1. Kak mojno sdelat tak ctobi pri uvilicenii i umensenii form1 button2 okazalas naverxu i na pravon krayu formi?
Zaranie blaqadaryu Vsem.


← →
awp ©   (2004-09-30 17:46) [1]

procedure TForm1.FormResize(Sender: TObject);
begin
 Button2.Left:= Form1.Width - Button2.Width;
 Button2.Top:= 0;
// not edit or delete
 MessageBox("I"m Lamos",mtInformation,[mbOk],0);
end;


← →
Serrrrg   (2004-09-30 17:48) [2]

Разметси кнопку на panel-и, у panel-и поставь Align = alRight


← →
roma ©   (2004-09-30 18:31) [3]

Ya bloqadaren Vam oboem

awp © [1]
Vas kod (pravilniy otvet) rabotaet no koda vipolnyayetsya button2 cliskom tesno sjimaetsya na praviy kray i po etomu vinizu polucaetcya scpollinq Kak mojno zdelzt ctobi button1 ne prilipalas na rpaviy kray a cut-cut bilo v levo.

Serrrrg [2]

Vas sovet toje ne ploxo no  у panel-и поставь Align = alRight
toqda panel ne zapolnyayet ves formu a eto ne ustraibaet a koqda Align = alClient to opyat button na meste.

Blaqodaren vsem


← →
roma ©   (2004-10-01 08:45) [4]

Resil problemu

procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
 NewHeight: Integer; var Resize: Boolean);

begin
Button2.Left:= Form1.Width -8-Button2.Width;
Button2.Top:= 0;
end;

Sposibo vsem


← →
Skeptik   (2004-10-01 10:21) [5]

> roma
посмотри на свойство Anchors у кнопки и установи
Anchors := [akTop, akRight];
можно прямо в инспекторе


← →
roma ©   (2004-10-03 16:30) [6]

Skeptik   (01.10.04 10:21) [5]
Sposibo za otvet.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
1-1096882766
pipll
2004-10-04 13:39
2004.10.17
Копирование каталога целиком (с файлами и подкаталогами)


1-1096559582
Никита
2004-09-30 19:53
2004.10.17
Ввод текста в Image


14-1095931164
Vetal
2004-09-23 13:19
2004.10.17
Посоветуйте красивые визуальные компоненты.


14-1096360517
YurikGL
2004-09-28 12:35
2004.10.17
Штраф через мирового судью...


3-1095595954
Muchacho
2004-09-19 16:12
2004.10.17
Unicode в Paradox




   Наверх