Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Button1 i Button2 [D6, WinXP]

roma © (2004-09-30 17:02:00)
Zdravstvuyte.Mojet vopros prostoy no dlya mne slojniy.
Na form1 samom verxu na levoy storone vervstavlyzyu button1 vipolnyayu i najimaju knopku razvernut na ves ekranform1 uvilicivaetsya na ves ekran i button1 s formoy vmeste podnimaetsya na verx v levoy uqol (eto normalno). Teperna 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.

roma (2004-10-03 16:30:00) [1]
Skeptik (01.10.04 10:21) [5]
Sposibo za otvet.

Skeptik (2004-10-01 10:21:00) [2]
> roma
посмотри на свойство Anchors у кнопки и установи
Anchors := [akTop, akRight];
можно прямо в инспекторе

roma (2004-10-01 08:45:00) [3]
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

roma (2004-09-30 18:31:00) [4]
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

Serrrrg (2004-09-30 17:48:00) [5]
Разметси кнопку на panel-и, у panel-и поставь Align = alRight

awp (2004-09-30 17:46:00) [6]
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;

Наверх

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