?? unid_principal.dfm
字號:
FF00FF00FF00FF00FF00FF00FF00FF00FF000000000000000000000000000000
000000FFFF00008080000080800000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000FF00FF000000000080808000808080000000
000000000000008080000080800000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF000000000000000000FF00FF000000000080808000808080000000
0000FFFFFF00000000000080800000000000FF00FF00FF00FF00FF00FF00FF00
FF00000000000080000000000000FF00FF000000000080808000808080000000
000000000000008080000080800000000000FF00FF00FF00FF00FF00FF000000
00000080000000FF000000000000000000000000000000000000000000000000
000000FFFF00008080000080800000000000FF00FF00FF00FF00000000000080
000000FF000000FF000000FF000000FF000000FF000000FF000000FF00000000
000000FFFF00008080000080800000000000FF00FF00FF00FF00FF00FF000000
000000FF000000FF000000000000000000000000000000000000000000000000
000000FFFF00008080000080800000000000FF00FF00FF00FF00FF00FF00FF00
FF000000000000FF000000000000FF00FF000000000080808000808080000000
000000FFFF00008080000080800000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF000000000000000000FF00FF000000000080808000808080000000
000000FFFF0000FFFF000080800000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000FF00FF000000000080808000808080008080
80000000000000FFFF0000FFFF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF000000000080808000808080008080
8000808080000000000000FFFF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF000000000000000000000000000000
000000000000000000000000000000000000FF00FF00FF00FF00}
end
object Panel1: TPanel
Left = 16
Top = 420
Width = 90
Height = 25
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'F2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object Panel2: TPanel
Left = 130
Top = 420
Width = 90
Height = 25
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'F3'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object Panel3: TPanel
Left = 244
Top = 420
Width = 90
Height = 25
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'F4'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
end
object Panel4: TPanel
Left = 358
Top = 420
Width = 90
Height = 25
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'F5'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
end
object Panel5: TPanel
Left = 472
Top = 420
Width = 90
Height = 25
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'F6'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
end
object Panel6: TPanel
Left = 586
Top = 420
Width = 90
Height = 25
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'ESC'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
end
object DBGrid1: TDBGrid
Left = 16
Top = 16
Width = 660
Height = 348
DataSource = DSC_Recibo
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
TabOrder = 12
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnTitleClick = DBGrid1TitleClick
Columns = <
item
Alignment = taRightJustify
Expanded = False
FieldName = 'LOC_CPF'
Title.Alignment = taCenter
Title.Caption = 'N'#250'mero CPF'
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = [fsBold]
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'LOC_NOME'
Title.Alignment = taCenter
Title.Caption = 'Nome do Locat'#225'rio'
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = [fsBold]
Width = 290
Visible = True
end
item
Expanded = False
FieldName = 'REC_NUM'
Title.Alignment = taCenter
Title.Caption = 'Recibo'
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = [fsBold]
Width = 70
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'REC_DTA_EMIS'
Title.Alignment = taCenter
Title.Caption = 'Data'
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = [fsBold]
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'REC_VALOR'
Title.Alignment = taCenter
Title.Caption = 'Valor'
Title.Font.Charset = DEFAULT_CHARSET
Title.Font.Color = clNavy
Title.Font.Height = -13
Title.Font.Name = 'MS Sans Serif'
Title.Font.Style = [fsBold]
Width = 82
Visible = True
end>
end
object ACL_Principal: TActionList
Images = IMG_Principal
Left = 544
Top = 192
object ACT_Novo: TAction
Category = 'Geral'
Caption = '&Novo'
Hint = 'Emite Novo Recibo'
ImageIndex = 3
ShortCut = 113
OnExecute = ACT_NovoExecute
end
object ACT_Excluir: TAction
Category = 'Geral'
Caption = '&Excluir'
Hint = 'Excluir o Recibo Atual'
ImageIndex = 1
ShortCut = 114
OnExecute = ACT_ExcluirExecute
end
object ACT_Duplicar: TAction
Category = 'Geral'
Caption = '&Duplicar'
Hint = 'Duplica o Recibo Atual para o Per'#237'odo Seguinte'
ImageIndex = 11
ShortCut = 115
OnExecute = ACT_DuplicarExecute
end
object ACT_Localizar: TAction
Category = 'Geral'
Caption = '&Localizar'
Hint = 'Localiza Um Recibo'
ImageIndex = 6
ShortCut = 116
OnExecute = ACT_LocalizarExecute
end
object ACT_Imprimir: TAction
Category = 'Geral'
Caption = '&Imprimir'
Hint = 'Imprimir o Recibo Atual'
ImageIndex = 5
ShortCut = 117
OnExecute = ACT_ImprimirExecute
end
object ACT_Sair: TAction
Category = 'Geral'
Caption = '&Sair'
Hint = 'Retornar '#224' Op'#231#227'o Anterior - Sair'
ImageIndex = 9
ShortCut = 27
OnExecute = ACT_SairExecute
end
end
object IMG_Principal: TImageList
Left = 512
Top = 192
Bitmap = {
494C01010D000E00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000004000000001002000000000000040
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000007F7F7F007F7F7F007F7F7F007F7F7F007F7F7F007F7F
7F007F7F7F007F7F7F007F7F7F007F7F7F000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -