Как сделать класс или объект.

← →
vegarulez (2015-09-10 10:22) [0]

Добрый день мастера!
Вопрос такой - мне надо сделать свой класс или объект не знаю как правильно это назвать. Объясню что я хочу - нужена панель в которой будут лэйблы, картинки и кнопка , и соотвественно я хочу формировать этот объект в основе тпанел в котором будут лэйблы и картинки и кнопка динамически. ну грбуо говоря MyClass.Create("название лэбла 1", "caption буттона", и т.д. - все остальные параметры которые я хочу передавать при создании).

Поделитесь ссылкой где это почитать? И как это правильно называется?

← →
vegarulez (2015-09-10 10:25) [1]

*Объясню что я хочу - нужен Тпанел в котором...

← →
DVM © (2015-09-10 10:29) [2]

Вероятно тебе нужно сделать наследника от TPanel

← →
sniknik © (2015-09-10 12:49) [3]

File-> New->Frame

Это называется "Динамическое создание компонент" и выглядит примерно так
TMyPanel = class(TPanel) private Labels: array of TLabel; public constructor Create(AOwner: TComponent; Data: array of string); reintroduce; end; constructor TMyPanel.Create(AOwner: TComponent; Data: array of string); var i: integer; begin inherited Create(AOwner); SetLength(Labels,Length(Data)); for i := 0 to High(Data) do begin Labels[i] := TLabel.Create(self); Labels[i].Parent := self; Labels[i].Caption := Data[i]; Labels[i].Top := i * 20; end; end;

Теперь пробуем создать
procedure TForm1.FormCreate(Sender: TObject); begin with TMyPanel.Create(self,["Метка №1","Метка №2","Метка №3","Метка №4"]) do begin Parent := self; Height := 200; Left := 100; end; end;

Как сделать класс или объект. Найти похожие ветки