if then问题
我想在点击窗体5次后出现MSGBOX
下面的代码有什么问题?]

procedure TForm1.FormClick(Sender: TObject);
var i: integer;
begin
if i:=5 then
begin
showmessage('123');
end;
end;

end.


[解决办法]
if i:=5 then
错误的，要改为 if i=5 then