请问一下,为什么这样不可以,,送分(200分)

  • 主题发起人 主题发起人 chatop
  • 开始时间 开始时间
C

chatop

Unregistered / Unconfirmed
GUEST, unregistred user!
我有几个窗口,
form1
form2
form3
.
.
.
在form1中写form2.show可以调用form2但在form2中写入
form2.close为什么不能关掉?有什么办法能关掉吗?
逮有,我想在form2中修改form1中的属性,为什么也不行?
如:form1.caption:='aa';
有什么办法能办到吗???
请大家帮帮我,谢谢!!
 
我在form1的uses中加过unit2,在form2的usrs中加了unit1
 
//也不行?
出错提示是什么?
 
在运行时debuger出现下面的错误信息
我用d5
[Error] Unit2.pas(46): Missing operator or semicolon
 
提示你缺少[red]分号[/red],最好把你的整个代码贴出来(应该不多吧),
这样更便于大家帮你找错。
 
贴上原码

procedure TForm2.Button1Click(Sender: TObject);
begin
btreg:=tregistry.create;
btreg.rootkey:=HKEY_LOCAL_MACHINE;
btreg.openkey('Software/CLASSES/chatopsoft/timesystem/biaoti',true);
btreg.WriteString('biaoti',edit1.text);
btreg.free;
messagebox(0,'下次重启软件自动生效','关闭',MB_iconquestion)
form1.caption:='ttt';
end;
 
你的
messagebox(0,'下次重启软件自动生效','关闭',MB_iconquestion)
这一句后面差个分号:)

 
不是分号的问题,我看过了,分号都对的,只要把上成的代码最后的form1.caption:-'ttt';删掉就可以了!!

不知道是怎么回事!!
 
关键时你在
messagebox(0,'下次重启软件自动生效','关闭',MB_iconquestion)
[red]后面加上分号后[/red],还出什么错误提示?

 
哦哦,呵呵,找到了找到了,谢谢呀!!
哈哈!!
晕死了……
送分
 
以后小心点,仔细点,浪费 200 分多可惜啊:)
 
呵呵,反正我分多,嘻嘻!!
谢谢你了!
我编程也是玩玩的,自己学习学习!
 
后退
顶部