📄 unit1.~dfm
字号:
object Prin: TPrin
Left = 196
Top = 115
Width = 698
Height = 500
Caption = 'G'#233'stion des Capteurs'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 690
Height = 33
Align = alTop
TabOrder = 0
end
object StatusBar1: TStatusBar
Left = 0
Top = 427
Width = 690
Height = 19
Panels = <
item
Width = 400
end
item
Width = 50
end>
SimplePanel = False
end
object MainMenu1: TMainMenu
Left = 432
Top = 48
object Table1: TMenuItem
Bitmap.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
C8807FF7777777777FF700000000000000007777777777777777333333333333
3333333333333333333333333333333333333333333333333333}
Caption = '&Table'
object Capteur1: TMenuItem
Caption = 'Capteur'
ShortCut = 16449
OnClick = Capteur1Click
end
object N1: TMenuItem
Caption = '-'
end
object Cible1: TMenuItem
Caption = 'Cible'
ShortCut = 16450
OnClick = Cible1Click
end
object N2: TMenuItem
Caption = '-'
end
object ParametresReseau1: TMenuItem
Caption = 'Parametre Reseau'
ShortCut = 16464
OnClick = ParametresReseau1Click
end
object N3: TMenuItem
Caption = '-'
end
object Quitter1: TMenuItem
Caption = 'Quitter'
ShortCut = 113
OnClick = Quitter1Click
end
end
object LesListes1: TMenuItem
Bitmap.Data = {
E6000000424DE60000000000000076000000280000000E0000000E0000000100
0400000000007000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
330033333333333333003300000000033300330FFFFFFF033300330F00000F03
3300330FFFFFFF033300330F00000F033300330FFFFFFF033300330F000FFF03
3300330FFFFF00033300330F00FF0F033300330FFFFF00333300330000000333
33003333333333333300}
Caption = '&Les Listes'
object Capteur2: TMenuItem
Caption = 'Capteur'
OnClick = Capteur2Click
end
object N4: TMenuItem
Caption = '-'
end
object Cible2: TMenuItem
Caption = 'Cible'
OnClick = Cible2Click
end
object N5: TMenuItem
Caption = '-'
end
object ParametreReseau1: TMenuItem
Caption = 'Parametre Reseau'
OnClick = ParametreReseau1Click
end
end
object Consqultation1: TMenuItem
Bitmap.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333FFFFFFFFF333333300000000
0333333777777777F33333330888888803333337FFFFFFF7F333333307777777
0333333777777777F33333330FFFFFFF03333337F3F3FFF7F33333330F9F000F
03333337F7377737F33333330FFFFFFF03333337F3333337F33333330FFFFFFF
03333337F3FFFFF7F33333330F40004F03333337F77777F7F33333330F00000F
03333337F7F337F7F33333330F00000F03333337F7FFF7F7F33333330F40004F
03333337F7777737F33333330FFFFFFF03333337FFFFFFF7F333333300000000
0333333777777777333333333333333333333333333333333333}
Caption = '&Consultation'
object CapteursConnects1: TMenuItem
Caption = 'Capteurs Connect'#233's'
end
object N6: TMenuItem
Caption = '-'
end
object CiblesCouvrs1: TMenuItem
Caption = 'Cibles Couvr'#233's'
end
end
object APropos1: TMenuItem
Bitmap.Data = {
E6000000424DE60000000000000076000000280000000E0000000E0000000100
0400000000007000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33003333333333333300300000000333330000B7B7B7B03333000B0B7B7B7B03
33000BB0B7B7B7B033000FBB0000000033000BFB0B0B0B0333000FBFBFBFB003
33000BFBFBF00033330030BFBF03333333003800008333333300333333333333
33003333333333333300}
Caption = 'A &Propos'
object Voir1: TMenuItem
Caption = 'Voir'
end
end
end
object capteur: TTable
Active = True
AutoRefresh = True
DatabaseName = 'bdd'
TableName = 'capteur.DB'
Left = 304
Top = 47
end
object cible: TTable
Active = True
AutoRefresh = True
DatabaseName = 'bdd'
TableName = 'cible.DB'
Left = 348
Top = 47
end
object parametre: TTable
Active = True
AutoRefresh = True
DatabaseName = 'bdd'
TableName = 'parametre.db'
Left = 392
Top = 47
end
object dscap: TDataSource
DataSet = capteur
Left = 305
Top = 84
end
object dscib: TDataSource
DataSet = cible
Left = 349
Top = 84
end
object dspara: TDataSource
DataSet = parametre
Left = 393
Top = 85
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -