- 博客(4)
- 收藏
- 关注
原创 Delphi学习笔记(四)
Delphi中的消息对话框 (一)showmessage() 只有一个OK按钮,括号中填入希望提示的字符串 例:showmessage(‘除数不能为0!!’); (二)messageBox() 1、函数原型及参数 function MessageBox(hWnd: HWND, Text, Caption, Type: Word): Integer; hWnd:对话框父
2016-08-14 20:58:32 544
原创 Delphi学习笔记(三)
字体与窗口位置的随机变化 1.在system栏中选择时间控件加到form中 2.对时间控件设置(label标签字体大小随机变化,form窗口位置随机变化,颜色随机变化) 3.设置label标签大小随字体大小变化而变化 4.设置窗口大小随标签大小变化而变化 选择结构if else举例 1.产生两个随机数,计算它们的值并验证
2016-08-10 19:59:31 452
原创 Delphi学习笔记(二)
数学类函数 (1)绝对值函数:abs(x) 例:x:=abs(-2); (2)取整函数: ① Trunc(x):Int(64); 返回实型数据x的整数部分,类型为Int(64) ② Round(x):Int(64); 返回实型数据x的小数部分四舍五入后的整数部分 ③ Int(x):Extended; 返回实型数据x的整数部分,类型为Extended (3)取小
2016-08-09 21:55:00 595
原创 Delphi学习笔记(一)
(一)鼠标点击显示和清除文本框内容 1.将文本框和按钮布局好后,在Object Inspector窗体中找到Text和Visible 2.Text的内容即文本框要显示的内容 3.Visible初始值设置为False,不可见 4.双击显示按钮,在代码中写入 Edit1.Visible:=true; 即点击后使文本框可见,‘:=’为赋值 5.双击清除按钮,在代码中写入
2016-08-08 21:29:28 573
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人