infdj.com/imprimirTicket
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
imprimirTicket/imprimirTicket_main.~dfm
jdg 30ccf458a0 first commit (2008-08-30)
2021-09-01 17:59:47 +02:00

406 lines
12 KiB
Plaintext
Raw Permalink Blame History

object Form1: TForm1
Left = 649
Top = 575
AutoScroll = False
Caption = 'www.infdj.com :: JDsoft ::'
ClientHeight = 434
ClientWidth = 316
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {
0000010001001010000001000800680500001600000028000000100000002000
0000010008000000000040010000000000000000000000010000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000606
0600121212001F1F1F002C2C2C003939390045454500525252005F5F5F006C6C
6C007878780085858500929292009F9F9F00ABABAB00B8B8B800C5C5C500D2D2
D200DEDEDE00EBEBEB00F8F8F800F0FBFF00A4A0A000C0DCC000F0CAA6000000
3E0000005D0000007C0000009B000000BA000000D9000000F0002424FF004848
FF006C6CFF009090FF00B4B4FF0000143E00001E5D0000287C0000329B00003C
BA000046D9000055F000246DFF004885FF006C9DFF0090B5FF00B4CDFF00002A
3E00003F5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2
FF006CCEFF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BA
BA0000D9D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E
2A00005D3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FF
C2006CFFCE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA
3C0000D9460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E
0000005D0000007C0000009B000000BA000000D9000000F0000024FF240048FF
48006CFF6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA
000046D9000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E
00003F5D0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF
4800CEFF6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA
0000D9D90000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A
00005D3F00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC2
4800FFCE6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C
0000D9460000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E00
00005D0000007C0000009B000000BA000000D9000000F0000000FF242400FF48
4800FF6C6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA00
3C00D9004600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E00
2A005D003F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48
C200FF6CCE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00
BA00D900D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A00
3E003F005D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248
FF00CE6CFF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00
BA004600D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF000000
00000000000000101010101010100000000000000000001F1F1F1F1F1F100000
000000000000001F101A1A101F100000000000000000001F1F1F1F1F1F100000
000000000000001F101A1A101F100505050505050505001F1F1F1F1F1F100505
0505030B0305001F1F1F1F1F1F100505030B0B0B0B0B001F0E0E0E0E1F100505
0B0B05050503001F0E0E0E0E1F1005030B0305050505001F1F1F1F1F1F10050B
0B0B0B0B0305000000000000000005030B030505050505050000000000000505
0B0B0505050B03050000000000000505030B0B0B0B0B05050000000000000505
0505030B0305050500000000000000050505050505050505000000000000FF80
FFFFFF80FFFFFF80FFFFFF80FFFFFF80FFFF0080FFFF0080FFFF0080FFFF0080
FFFF0080FFFF00FFFFFF003FFFFF003FFFFF003FFFFF003FFFFF803FFFFF}
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnDestroy = FormDestroy
OnKeyPress = FormKeyPress
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 316
Height = 434
ActivePage = TabSheet1
Align = alClient
Style = tsFlatButtons
TabIndex = 0
TabOrder = 0
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = 'B'#225'sico'
object lcd: TLabel
Left = 8
Top = 48
Width = 273
Height = 53
Alignment = taRightJustify
AutoSize = False
Caption = '0.0 '#8364
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -48
Font.Name = 'Courier New'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object stepLb: TLabel
Left = 8
Top = 8
Width = 152
Height = 36
Caption = 'Importe:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -32
Font.Name = 'Courier New'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label1: TLabel
Left = 96
Top = 393
Width = 96
Height = 13
Caption = 'Dise'#241'ado por JDsoft'
end
object Button1: TButton
Left = 8
Top = 112
Width = 57
Height = 57
Caption = '7'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 80
Top = 112
Width = 57
Height = 57
Caption = '8'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 152
Top = 112
Width = 57
Height = 57
Caption = '9'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 224
Top = 112
Width = 57
Height = 129
Caption = 'C'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 8
Top = 184
Width = 57
Height = 57
Caption = '4'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = Button5Click
end
object Button6: TButton
Left = 80
Top = 184
Width = 57
Height = 57
Caption = '5'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = Button6Click
end
object Button7: TButton
Left = 152
Top = 184
Width = 57
Height = 57
Caption = '6'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = Button7Click
end
object Button9: TButton
Left = 8
Top = 256
Width = 57
Height = 57
Caption = '1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = Button9Click
end
object Button10: TButton
Left = 80
Top = 256
Width = 57
Height = 57
Caption = '2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = Button10Click
end
object Button11: TButton
Left = 152
Top = 256
Width = 57
Height = 57
Caption = '3'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = Button11Click
end
object btIntro: TButton
Left = 224
Top = 256
Width = 57
Height = 129
Caption = 'Intro'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
OnClick = btIntroClick
end
object Button13: TButton
Left = 8
Top = 328
Width = 129
Height = 57
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
OnClick = Button13Click
end
object Button14: TButton
Left = 152
Top = 328
Width = 57
Height = 57
Caption = '.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
OnClick = Button14Click
end
end
object TabSheet2: TTabSheet
Caption = 'Avanzado'
ImageIndex = 1
object Memo1: TMemo
Left = 0
Top = 0
Width = 308
Height = 169
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
Lines.Strings = (
' /'
' . Inform'#225'tica D.J. '
' / \ http://www.infdj.com'
' _|_ \ '
' / \_|_'
' | D | \ Murillo 11 - 41500'
' \___/ J | Alcala de Gdra. (Sevilla)'
' \___/ T:955.615.854 F:955.614.913'
''
'{fecha} . {hora} Ticket: {id}'
''
'')
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
end
object Memo2: TMemo
Left = 0
Top = 336
Width = 308
Height = 40
Align = alBottom
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
Lines.Strings = (
''
' Gracias por su visita')
ParentFont = False
ScrollBars = ssVertical
TabOrder = 1
end
object sg: TStringGrid
Left = 0
Top = 169
Width = 308
Height = 167
Align = alClient
ColCount = 3
FixedCols = 0
RowCount = 7
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 2
OnKeyPress = sgKeyPress
ColWidths = (
190
31
64)
end
object Panel1: TPanel
Left = 0
Top = 376
Width = 308
Height = 27
Align = alBottom
BevelOuter = bvLowered
TabOrder = 3
object SpeedButton1: TSpeedButton
Left = 88
Top = 2
Width = 137
Height = 22
Caption = 'Imprimir el Ticket'
Flat = True
OnClick = SpeedButton1Click
end
end
end
end
end
Reference in New Issue View Git Blame Copy Permalink