制作从屏幕右下角逐渐弹出的消息提示框(2)

2008-04-10 02:56:51来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折


D900FFE7DC00FFE9DF00FFEBE200FFEDE500FFEEE600FFEFE800FFF0E900FFF2
EC00FFF4EF00FFF6F200FFF8F500FFE5D800FFE6D900FFE6DA00FFE7DB00FFE8
DC00FFE8DD00FFE9DE00FFEAE000FFEBE100FFECE300FFEDE400FFEFE700FFF1
EA00FFF3ED00FFF5F000FFF7F300FFF9F600FFFBF900FFFDFC00FFE9DD00FFEC
E200FFF2EB001B1B1B000F0F0F001C1C1C001D1D1D001D1D1D001E1E1E001E1E
1E00101010001F1F1F00202020002E2E2E002121210011111100222222002222
220023232300121212002F2F2F00242424002525250013131300141414001414
14002626260015151500161616000B0B0B002727270030303000171717002828
28000C0C0C001818180018181800292929000D0D0D0019191900070707002A2A
2A00080808001A1A1A001A1A1A002B2B2B0009090900040404000E0E0E000505
05002C2C2C0006060600060606000A0A0A000A0A0A00020202002D2D2D000303
030003030300}
Visible = False
end
object SpeedButton1: TSpeedButton
Left = 323
Top = 16
Width = 14
Height = 14
Anchors = [akTop, akRight]
Flat = True
Glyph.Data = {
8A000000424D8A00000000000000420000002800000009000000090000000100
04000000000048000000120B0000120B00000300000003000000BE604200FFFF
FF00000000001111111110000200100111001000111110001000100010011100
0001100010001110001110001100110000011000111010001000100011001001
1100100010001111111110001001}
OnClick = SpeedButton1Click
end
object Label1: TLabel
Left = 16
Top = 24
Width = 60
Height = 12
Caption =
''''快捷键提示''''
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name =
''''宋体''''
Font.Style = []
ParentFont = False
Transparent = True
end
object Label2: TLabel
Left = 16
Top = 99
Width = 294
Height = 12
Caption =
''''A:光标在“编号”列时,切换数据类型为“步骤类型”''''
Transparent = True
end
object Label3: TLabel
Left = 16
Top = 118
Width = 318
Height = 12
Caption =
''''B:光标在“编号”列时,切换数据类型为“工艺要求类型”''''
Transparent = True
end
object Label4: TLabel
Left = 16
Top = 138
Width = 294
Height = 12
Caption =
''''C:光标在“编号”列时,切换数据类型为“用料类型”''''
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

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:Delphi程序设计综合训练任务书

下一篇:自绘ListBox的两种效果