各位前輩好: 請問我在程式裡 Buttonx[i] := TButton.Create(Form) ; 那我要寫 Buttonx[i] 的 Click 是要寫在哪呢?? p.s Buttonx[X] 是陣列的物件!! Buttonx : Array of TButton 初學者 Carter

Buttonx[i] := TButton.Create(Form); Buttonx[i].OnClick := MyClick; procedure TForm1.MyClick(Sender: TObject); begin end;

謝謝 william 版主 : 那再問一下 i := 0 ~ 10 那我怎知道是哪一個 Button 被 Click 呢 ? Carter

procedure TForm1.MyClick(Sender: TObject);
begin
    if Sender=Buttonx[0] then begin
    end;
    { or make use of properties }
    case TComponent(Sender).Tag of
        1:;
        2:;
    else
    end;
end;