我的代码是这样的,请大家帮我这个菜鸟看看,为什么在var声明变量changed就出错了??? private
{ Private declarations }
public
{ Public declarations }
changed:boolean;
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Save1Click(Sender: TObject);
begin
if changed then
begin
richedit1.Lines.SaveToFile(opendialog1.FileName);
label1.Caption:='you''ve saved the file';
end;
end;
{ Private declarations }
public
{ Public declarations }
changed:boolean;
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Save1Click(Sender: TObject);
begin
if changed then
begin
richedit1.Lines.SaveToFile(opendialog1.FileName);
label1.Caption:='you''ve saved the file';
end;
end;
解决方案 »
- 请问如何实现报表中隔开各列的竖线的打印?以及为什么我在QReport中,为什么控件老是会乱跑,修改一下就会跑到页面外的地方?
- 急求excel倒入数据到acess(要求:要能把excel指定字段数据导入到已经存在的acess数据库表中)
- 请教接口封装原则的问题
- 我想把一个文件从一台计算机传到局域网外的令一台计算机,请问应该怎么做?
- 向求助高手
- [游戏修改器]怎么判断一个数据到了一个值后做一样事?
- 为什么我用ADO连接ORACLE的时候总出错?
- delphi 之排队系统 重金收购方案及源码
- mfkzj来领分
- com的问题
- DELPHI自带的MIDAS程序,请问需要如何修改才可以正常在运行在服务器——客户机上。88悬赏
- 不用SQL如何进行数据查找、如何得到网页源码?(限制条件)
你在private中声明看看,应该不会错错了!
var changed:boolen=true;
换个别的名字,如MyChanged就行了