Dynamisk oprettelse af komponenter. (HowTo)

under Private/Public på den form du vil ha' knappen på, men du kan også lave en var i en alm. unit

/Martin

Okay. Men så er det jo heller ikke helt dynamisk! Jeg mener hvis jeg manuelt skal erklære 'et loft' af komponeter som jeg muligvis skal bruge.
Private
    MyButton : TButton;

Hvad nu hvis jeg f.eks har en form, hvor der kan være brug for 10 labels,-  måske 50! Så skal jeg da ikke under private oprette 50 linier med
Label1 : TLabel;
Label2 : TLabel;
..
..
Label50 : TLabel;

Måske bliver der kun brug for 10 men jeg har erklæret 50 på forhånd hvis nu.
Eller endnu værre.- hvad så hvis jeg pludselig skal bruge 51 labels? Så går det ned! Kan jeg ikke også gøre det automatisk på en eller anden måde?
Forstår du hvad jeg mener?

100% dynamisk !!!


VAR
  MyButtonArr : array of TButton;
  Cnt : Integer;

begin
  SetLength(MyButtonArr,117);
  for Cnt := Low(MyButtonArr) to High(MyButtonArr) do
    MyButtonArr[Cnt] := TButton.Create(NIL);

// Eller :

  with TButton.Create(NIL) do
  begin
      Caption := 'Knap uden VAR';
      Parent := Application;
  end;

end;



/Martin