求救几个基础问题

Question

１．Ｄelphi中怎么区分鼠标的左键还是右键被按下了？
２．定义了一个按钮数组　button: array[1..10] of TButton;
    怎样让这几个按钮在Form1中显示出来，直接button[1].show是不能显示的？

Answer 1

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if ssleft in Shift  then//鼠标左键
  Caption:='left' ;
end;---------
var
 button:array[0..9] of TButton;
beginbutton[0]:=tbutton.create(self);
button[0].parent:=self;
button[0].left:=20