Delphi 中的分号

Delphi中分号表示一个语句的结束。我这个新手经常会出这样的错：

1.在一个条件判断语句中，中间使用了分号；

如下：

图中红色圆圈中的;,是没必要写的。如果写了分号，则后面的语句变成了 else if....

备注：以上代码可用下面的代码替代：

1. procedure TForm1.btn1MouseDown(Sender: TObject; Button: TMouseButton;
2. Shift: TShiftState; X, Y: Integer);
3. const s:array[0..2]of string=('按了左键','按了右键','按了中键');
4. begin
5. showmessage(s[ord(button)]);
6. mbleft;
7. end;
8. end.