假設有Label1~Label10 我想在程式中動態給值 譬如：Label5~Label10的Enable為False(每一次都不同Label) 不知應該怎麼寫???

您好: 我覺得您應該要敘述一下,為什麼必須要這麼做,敘述清楚一些,不然從字面上看起來,每一次都不固定的話,這樣應該是無解,只能手動自己一個一個填吧.

 
 for I:= 0 to FormMain.ComponentCount-1 do  // 取得所有 button 之物件
 begin
  if (FmMain.Components[I] is TButton) then
  begin
   // 加入你的判斷式
   oBt := LbBt.Items.Objects[j] as TButton;
   oBt.Caption := ...
  end;
 end;

我的Label1~Label10是已知的物件， 但是每一次要秀的個數不同， 類似下面的樣子： for i:=x to y do Label(i).Enable := FALSE; 不過這個"Label(i)"的寫法我不會， 不知道要如何才能隨著i的變動， 每次都抓到相對應的Label???

procedure TForm1.Button1Click(Sender: TObject);
var
  I:integer;
  FComponent : TComponent;
begin
  For I:=1 to 10 do
  begin
    FComponent := FindComponent('Label' inttostr(I));
    if Assigned(FComponent) and (FComponent is TLabel) then
    begin
      TLabel(FComponent).Caption:= 'TEST ....';
    end;
  end;
end;

我比較喜歡動態建立陣列物件。 參考參考

不清楚您想做什麼, 提供您語法範例 Label1.Caption :='您想設定的值'; Label1.Enabled :=True; Label1.Enabled :=False;

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！