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

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

Наследование форм и Parent контрола [D7, WinXP]


samz ©   (2008-10-02 03:19:00) 

Здравствуйте.
Ситуация такая:
Форма B - наследник формы A этого же проекта.
На форме A имеется некий контрол.
Как в design-time на форме B поменять у этого контрола свойство Parent (например переместить с одной панели на другую)?
Спасибо.


Vlad Oshin   (2008-10-02 15:31:00) [1]

и как это сделать в
> design-time


?


Jeer   (2008-10-02 15:14:00) [2]


>
> ООП рулит - у наследника можно переопределить, но не удалить
> поле...


Неужели сам дошел ? :)


samz   (2008-10-02 11:48:00) [3]

>tytus
Ctrl+X(на первой форме)


ООП рулит - у наследника можно переопределить, но не удалить поле...


Плохиш   (2008-10-02 10:18:00) [4]


> samz   (02.10.08 03:19)  

Форма B не имеет таких прав на этот контрол.


Jeer   (2008-10-02 10:05:00) [5]

потому, что будете получать вот это:
http://slil.ru/26198289


tytus   (2008-10-02 09:54:00) [6]

Если
(например переместить с одной панели на другую)?
и панели находятся на разных формах - то переместитьконтрол можно Ctrl+X(на первой форме) потом CTRL+V(на другой)
Или я что-то не так понял?


Vlad Oshin   (2008-10-02 09:47:00) [7]

может я тупой, но это как ?

type
 TForm1 = class(TForm)
   Panel1: TPanel;
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show;
end;
//====================
type
 TForm2 = class(TForm1)
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form2: TForm2;

implementation

{$R *.dfm}
//=============

пустая форма, чего там дизайнить?


Jeer   (2008-10-02 09:43:00) [8]

Вопрос:
У меня мама - крокодил, я крокодиленок, хвост растет сзади, есс-но.
Я хочу братика, но чтобы хвост у него рос между лопаток.
Как мне сделать это ?

Ответ:
Поменять маму.


Наверх

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