2008年7月20日

摘要: 表示关闭的有 hide close free release destroy terminate freeandnil() halt free:先判断不为空再destroy。释放对象,对于窗体来说,只会释放对象,而不将窗体对象的指针指向nil,所以free后用assigned函数来判断还是返回true.只有freeandnil或free后再将指针指向nil. destroy:不判断直接释放。如... 阅读全文

posted @ 2008-07-20 14:42 白兴科技 阅读(392) 评论(0) 推荐(0) 编辑

摘要: 具体制作步骤: 1、制作随机数字 新建一400px*300px的flash文档,背景为黑色。按CTRL+F8建一MC,在此MC中建一动态文本,变量名为num, 500)this.width=500"> 在其帧上加上AS num=random(10); 这样动态文本就能显示从0到9的数字。 ... 阅读全文

posted @ 2008-07-20 12:44 白兴科技 阅读(445) 评论(0) 推荐(0) 编辑

摘要: procedure TForm1.Button1Click(Sender: TObject); var a,b:integer; begin a:=strtoint(self.Edit1.text); b:=strtoint(self.Edit2.Text); a:=a xor b; b:=b xor a; a:=a xor b; self.Edit1.Text:=in... 阅读全文

posted @ 2008-07-20 12:40 白兴科技 阅读(356) 评论(0) 推荐(0) 编辑


Copyright © 2024 白兴科技
Powered by .NET 8.0 on Kubernetes