📄 unit2.~dfm
字号:
object Capteurf: TCapteurf
Left = 195
Top = 110
Width = 797
Height = 603
Caption = 'Capteur'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Image2: TImage
Left = 8
Top = 3
Width = 537
Height = 542
end
object Panel1: TPanel
Left = 560
Top = 0
Width = 229
Height = 549
Align = alRight
Color = clFuchsia
TabOrder = 0
object Image1: TImage
Left = 10
Top = 30
Width = 209
Height = 59
Center = True
Proportional = True
end
object SpeedButton1: TSpeedButton
Left = 56
Top = 256
Width = 113
Height = 17
Caption = 'Nombre de Capteur'
Flat = True
OnClick = SpeedButton1Click
end
object DBNavigator1: TDBNavigator
Left = 49
Top = 107
Width = 104
Height = 18
DataSource = Prin.dscap
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
TabOrder = 0
end
object GroupBox1: TGroupBox
Left = 10
Top = 128
Width = 209
Height = 110
Caption = 'Capteurs'
Color = 33023
ParentColor = False
TabOrder = 1
object Label1: TLabel
Left = 11
Top = 16
Width = 65
Height = 13
Caption = 'Code Capteur'
end
object Label2: TLabel
Left = 11
Top = 40
Width = 47
Height = 13
Caption = 'Position X'
end
object Label3: TLabel
Left = 11
Top = 64
Width = 47
Height = 13
Caption = 'Position Y'
end
object Label4: TLabel
Left = 11
Top = 86
Width = 36
Height = 13
Caption = 'Energie'
end
object DBEdit1: TDBEdit
Left = 80
Top = 11
Width = 121
Height = 24
Color = 33023
DataField = 'Codecapt'
DataSource = Prin.dscap
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 80
Top = 34
Width = 121
Height = 24
Color = 33023
DataField = 'Posxca'
DataSource = Prin.dscap
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 80
Top = 57
Width = 121
Height = 24
Color = 33023
DataField = 'Posyca'
DataSource = Prin.dscap
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 80
Top = 80
Width = 121
Height = 24
Color = 33023
DataField = 'Energie'
DataSource = Prin.dscap
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
end
object Edit1: TEdit
Left = 80
Top = 280
Width = 57
Height = 24
Color = 16744703
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object Panel2: TPanel
Left = 47
Top = 311
Width = 133
Height = 202
BorderStyle = bsSingle
Color = 33023
TabOrder = 3
object SpeedButton2: TSpeedButton
Left = 4
Top = 4
Width = 121
Height = 22
Caption = 'Ajouter'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 4
Top = 28
Width = 121
Height = 22
Caption = 'Modifier'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 4
Top = 52
Width = 121
Height = 22
Caption = 'Supprimer'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton5: TSpeedButton
Left = 4
Top = 76
Width = 121
Height = 22
Caption = 'Enregistrer'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton6: TSpeedButton
Left = 4
Top = 100
Width = 121
Height = 22
Caption = 'Rechercher'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton7: TSpeedButton
Left = 4
Top = 124
Width = 121
Height = 22
Caption = 'Annuler'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton8: TSpeedButton
Left = 4
Top = 147
Width = 121
Height = 22
Caption = 'Effacer L'#39'ecran'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton9: TSpeedButton
Left = 4
Top = 171
Width = 121
Height = 22
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
ParentFont = False
end
end
object Button1: TButton
Left = 55
Top = 520
Width = 121
Height = 25
Cancel = True
Caption = 'Fermer'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
end
object MainMenu1: TMainMenu
Left = 728
Top = 104
object Voir1: TMenuItem
Caption = 'Voir'
object Table1: TMenuItem
Caption = 'Table'
object Capteur1: TMenuItem
Caption = 'Cible'
OnClick = Capteur1Click
end
object N4: TMenuItem
Caption = '-'
end
object ParametresRseau1: TMenuItem
Caption = 'Parametres R'#233'seau'
OnClick = ParametresRseau1Click
end
end
object N1: TMenuItem
Caption = '-'
end
object Graph1: TMenuItem
Caption = 'Graph'
object Connextion1: TMenuItem
Caption = 'Connextion'
OnClick = Connextion1Click
end
object N5: TMenuItem
Caption = '-'
end
object Couverture1: TMenuItem
Caption = 'Couverture'
end
object N6: TMenuItem
Caption = '-'
end
object CapteurParCible1: TMenuItem
Bitmap.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300030003
0003333377737773777333333333333333333FFFFFFFFFFFFFFF770000000000
0000777777777777777733039993BBB3CCC3337F737F737F737F37039993BBB3
CCC3377F737F737F737F33039993BBB3CCC33F7F737F737F737F77079997BBB7
CCC77777737773777377330399930003CCC3337F737F7773737F370399933333
CCC3377F737F3333737F330399933333CCC33F7F737FFFFF737F770700077777
CCC77777777777777377330333333333CCC3337F33333333737F370333333333
0003377F33333333777333033333333333333F7FFFFFFFFFFFFF770777777777
7777777777777777777733333333333333333333333333333333}
Caption = 'Capteur Par Cible'
end
end
object N2: TMenuItem
Caption = '-'
end
object Deploiement1: TMenuItem
Caption = 'Deploiement'
object Capteur2: TMenuItem
Caption = 'Capteur'
end
object N7: TMenuItem
Caption = '-'
end
object Cible1: TMenuItem
Caption = 'Cible'
end
end
object N3: TMenuItem
Caption = '-'
end
object Quitter1: TMenuItem
Caption = 'Quitter'
OnClick = Quitter1Click
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -