if button1.Caption='播放' then
animate1.play(1,31,5);
button1.Caption:='停止'   ;
else

animate1.Stop;
button1.Caption:='播放' ;
按钮开始是播放  按下去变停止
按停止 变播放

这个代码有没有问题啊

if button1.Caption = '播放' then
begin
  animate1.play(1, 31, 5);
  button1.Caption := '停止';
end
else
begin
  animate1.Stop;
  button1.Caption := '播放';
end;

还是不行啊

else上边那个end后边的分号要去掉！楼主最好在复习一下选择语句的用法，语法规则！
if ..then
begin
复合句
end(后边不能加分号)
else

end;

[ 本帖最后由 你先说 于 2013-10-26 23:12 编辑 ]

可以啦！！！  真是感谢你了，是该回去看看这些基本语法啊