transparent = true
end
object label5: tlabel
left = 16
top = 42
width = 132
height = 12
caption = 'alt+↓:打开下拉列表框'
transparent = true
end
object label6: tlabel
left = 16
top = 61
width = 108
height = 12
caption = 'ctrl+ins:插入一行'
transparent = true
end
object label7: tlabel
left = 16
top = 80
width = 120
height = 12
caption = 'ctrl+del:删除当前行'
transparent = true
end
object label8: tlabel
left = 174
top = 42
width = 138
height = 12
caption = 'ins:打开“工艺名称表”'
transparent = true
end
object label9: tlabel
left = 174
top = 61
width = 90
height = 12
caption = 'f11:插入“℃”'
transparent = true
end
object label10: tlabel
left = 174
top = 80
width = 90
height = 12
caption = 'f12:插入“′”'
transparent = true
end
object label11: tlabel
left = 0
top = 165
width = 343
height = 3
cursor = crsizens
align = albottom
autosize = false
transparent = true
onmousedown = label11mousedown
onmousemove = label11mousemove
end
object label12: tlabel
left = 0
top = 12
width = 3
height = 153
cursor = crsizewe
align = alleft
autosize = false
transparent = true
onmousedown = label12mousedown
end
object label13: tlabel
left = 340
top = 12
width = 3
height = 153
cursor = crsizewe
align = alright
autosize = false
transparent = true
onmousedown = label13mousedown
end
end
interface
uses
windows, messages, sysutils, variants, classes, graphics, controls, forms,
dialogs, extctrls, stdctrls, buttons;
{========================================================================
design by : 彭国辉
date: 2004-10-28
site: http://kacarton.yeah.net/
blog: http://blog.csdn.net/nhconch
- SaveComponentBy…
- 用程序实现压缩access(*…
- 如何在Delphi中用代码来完…
- 一个简单的,适应多种数据库之间…
- SQLServer2000的自…
- Borland的MIDAS技术…
- 几本我不喜欢的Delphi书籍…
- 在 Delphi 下自定义通用…
- 用Delphi开发Web Se…
- 从Oracle数据库到SQL …
- 动画显示窗体…
- Window画图程序中画曲线的…
- 用 Delphi 学设计模式(…
- qq魔法表情原理,解密及其他…
- Delphi.NET prev…
- Delphi中串口通信的实现…
- AXScript.pas,从官…
- Delphi 组件编写--扑克…
- InstallShield E…
- 查找某目录下的所有文件…