Delphi中動態生成的button調用onclick如何傳遞參數

代碼 //  自定義事件過程，過程名能夠任意取 procedure  TForm1.OnClick(Sender: TObject); begin    if  Sender  is  TButton  then    begin      if  TButton(Sender).Name  =   ' button1 '   then       .. .      else   if  TBu

>>阅读原文<<