xhxlt0820 发表于 2013-11-16 22:11:16

学鱼C记事本时exit;这句总报错？？？

本帖最后由 xhxlt0820 于 2013-11-16 22:13 编辑

procedure TForm1.FontClick(Sender: TObject);
begin
If FontDialog1.Execute Then
Memo1.Font:=FontDialog1.Font
Else
exit;
end;
这类代码，只要If开头的句子，Else后面的exit;这句总出错，保存控件，打开控件后面都一样，分明是照小甲鱼做的，为什么我的这句会报错呢？

xhxlt0820 发表于 2013-11-20 14:40:40

为什么没有人愿意帮助新手，郁闷中……

沉默的风采 发表于 2013-11-21 08:09:38

begin
if dlgFont1.Execute then
mmo1.Font:=dlgFont1.Font
else
Exit;
end;我试了一下，没问题啊，是不是你的控件名称和代码里不一样呢？
页: [1]
查看完整版本: 学鱼C记事本时exit;这句总报错？？？