第一次用delphi...

Question

可以通过设置Tag属性，比如0,1,2,3...，然后通过识别Tag属性来区分具体是哪个控件，这是常用的办法。比如：
假设你有三个Button控件，将它们的Tag属性分别设置为0,1,2
procedure Form1.Button1OnClick(Sender: TObject);
begin
  case TEdit(Sender).Tag of
    0:ShowMessage('这是第一个Button');
    1:ShowMessage('这是第一个Button');
    2:ShowMessage('这是第一个Button');
  end;
end;将Button2和Button3的OnClick事件指向Button1OnClcik就可以了

Answer 1

没有象VB 里的直接控件数组，
间接的方法很多靠你自行发挥,
通过TForm的属性间接访问:
   Form1.ComponentCount;  { 所有控件总数 }
   Form1.Components[i];   { 每一控件 }
核对每一控件类名；   Edit1,Edit2,Edit3  访问到后就知道，这是一群TEdit控件不象VB 那样方便，有点勉强!

Answer 2

抱歉，程序有点错误，上面的应该是：
procedure Form1.Button1OnClick(Sender: TObject);
begin
  case TEdit(Sender).Tag of
    0:ShowMessage('这是第一个Button');
    1:ShowMessage('这是第二个Button');
    2:ShowMessage('这是第三个Button');
  end;
end;

Answer 3

举个例子吧,有100个按钮,对应100个edit.当按下某一个按钮时,对应的edit显示固定的一段话.这个用vb很容易实现吧,用delphi很难吗?