📄 unit1.dfm
字号:
object Form1: TForm1
Left = 192
Top = 107
Width = 626
Height = 309
Caption = 'Agent'#21160#30011#20154#29289#28436#31034
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object MyAgent: TAgent
Left = 118
Top = 88
Width = 32
Height = 32
ControlData = {020200004F0300004F030000}
end
object Button10: TButton
Left = 222
Top = 96
Width = 75
Height = 25
Caption = #25171#24320
TabOrder = 1
OnClick = Button10Click
end
object Button11: TButton
Left = 342
Top = 96
Width = 75
Height = 25
Caption = #20851#38381
Enabled = False
TabOrder = 2
OnClick = Button11Click
end
object Panel1: TPanel
Left = 8
Top = 8
Width = 603
Height = 73
Enabled = False
TabOrder = 3
object Button1: TButton
Left = 8
Top = 8
Width = 75
Height = 25
Caption = #26174#31034
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 88
Top = 8
Width = 75
Height = 25
Caption = #38544#34255
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 168
Top = 8
Width = 75
Height = 25
Caption = #31227#21160
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 440
Top = 8
Width = 75
Height = 25
Caption = #21160#20316
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 520
Top = 8
Width = 75
Height = 25
Caption = #20572#27490#21160#20316
TabOrder = 4
OnClick = Button5Click
end
object ComboBox1: TComboBox
Left = 248
Top = 8
Width = 185
Height = 21
ItemHeight = 13
TabOrder = 5
Text = #25215#35748
Items.Strings = (
'Acknowledge '#25215#35748
'LookDown '#21521#19979#30475
'Sad '#24754#20260
'Alert '#35686#21578
'LookDownBlink '#21521#19979#30475#30504#30524' '
'Search '#23547#25214
'Announce '#22768#26126' '
'LookUp '#21521#19978#30475' '
'StartListening '#24320#22987#32838#21548
'Blink '#30504#30524' '
'LookUpBlink '#21521#19979#30475#30504#30524' '
'StopListening '#20572#27490#32838#21548
'Confused '#36855#24785' '
'LookLeft '#21521#24038#30475' '
'Suggest '#24314#35758
'Congratulate '#31069#36154' '
'LookLeftBlink '#21521#24038#30475#30504#30524' '
'Surprised '#21507#24778
'Decline '#25298#32477' '
'LookRight '#21521#21491#30475' '
'Think '#24605#32771
'DontRecognize '#19981#25215#35748' '
'LookRightBlink '#21521#21491#30475#30504#30524' '
'Wave '#25381#21160
'Explain '#35299#37322' '
'MoveDown '#21521#19979#31227#21160' '
'Write '#20070#20889
'GestureDown '#21521#19979#23039#21183' '
'MoveUp '#21521#19978#31227#21160' '
'Processing '#35745#31639#8230#8230
'GestureUp '#21521#19978#23039#21183' '
'MoveRight '#21521#21491#31227#21160' '
'Reading '#38405#35835#8230#8230
'GestureLeft '#21521#24038#23039#21183' '
'MoveLeft '#21521#24038#31227#21160' '
'Searching '#23547#25214#8230#8230
'GestureRight '#21521#21491#23039#21183' '
'Pleased '#39640#20852' '
'Writing '#20070#20889#8230#8230
'GetAttention '#33719#24471#27880#24847' '
'Read '#38405#35835' '
'Greet '#38382#20505' '
'RestPose '#24674#22797#21021#22987#29366#24577)
end
object Button6: TButton
Left = 8
Top = 40
Width = 75
Height = 25
Caption = #35828#35805
TabOrder = 6
OnClick = Button6Click
end
object Button7: TButton
Left = 88
Top = 40
Width = 75
Height = 25
Caption = #32553#23567
TabOrder = 7
OnClick = Button7Click
end
object Button8: TButton
Left = 168
Top = 40
Width = 75
Height = 25
Caption = #25918#22823
TabOrder = 8
OnClick = Button8Click
end
object Button9: TButton
Left = 248
Top = 40
Width = 75
Height = 25
Caption = #36824#21407
TabOrder = 9
OnClick = Button9Click
end
end
object Memo1: TMemo
Left = 123
Top = 137
Width = 394
Height = 137
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Lines.Strings = (
' Agent'#21160#30011#20154#29289#20351#29992#28436#31034
''
#23433#35013#65306'Agent'#26159#19968#31181'ActiveX'#25511#20214#65292#22312'Delphi IDE'#20013#36873#25321#33756#21333'Component'#65292
' Import ActiveX Control'#65292#36873#25321'Microsoft Agent Control 2.0'
' '#65288'Version 2.0'#65289#65292#28857'Install'#23433#35013#20415#21487#12290
#20854#23427#65306#35831#30452#25509#26597#30475#26412#31243#24207#28304#30721#21450#30456#20851#35774#32622#65292#31069#20320#24555#20048#65281#65281#65281
''
#22791#27880#65306#26159#36319#25454#12298#34081#33457#23453#20856'7'#12299#37324#30340#36164#26009#21046#20316#65292#20294#19981#30693#25991#31456#20316#32773#26159#35841#65292#22312#27492#35874
' '#36807#20102#65281
''
'Delphi'#29233#22909#32773#65306#26143#20116' Smallarmy@hotmail.com QQ593106 2004.7.18')
ParentCtl3D = False
ParentFont = False
TabOrder = 4
end
object OpenDialog1: TOpenDialog
Filter = #20195#29702#25991#20214'(*.ACS)|*.acs'
Title = #25171#24320#20195#29702#25991#20214
Left = 166
Top = 96
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -