home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC-Online 1998 February
/
PCOnline_02_1998.iso
/
filesbbs
/
win95
/
wonline.exe
/
PROLOG.EX_
/
0
/
RCDATA
/
TGENAUFORM
/
TGENAUFORM.txt
Wrap
Text File
|
1996-05-21
|
3KB
|
156 lines
object genauform: Tgenauform
Left = 201
Top = 100
BorderStyle = bsDialog
Caption = 'Genaue Abrechnung'
ClientHeight = 391
ClientWidth = 424
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'System'
Font.Style = []
PixelsPerInch = 120
TextHeight = 20
object Label1: TLabel
Left = 10
Top = 334
Width = 66
Height = 25
Caption = 'Label1'
Visible = False
end
object Panel1: TPanel
Left = 7
Top = 11
Width = 409
Height = 373
BevelOuter = bvLowered
TabOrder = 6
end
object GroupBox1: TGroupBox
Left = 13
Top = 20
Width = 397
Height = 67
Caption = ' Geben Sie den Abrechnungsstart ein '
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 0
object MaskEdit1: TMaskEdit
Left = 20
Top = 30
Width = 51
Height = 30
EditMask = '!90/90;0;_'
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
MaxLength = 5
ParentFont = False
TabOrder = 0
Text = '0101'
end
end
object GroupBox2: TGroupBox
Left = 13
Top = 96
Width = 397
Height = 69
Caption = ' Geben Sie den Abrechnungsschlu� ein '
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
object MaskEdit2: TMaskEdit
Tag = 1
Left = 20
Top = 30
Width = 51
Height = 30
EditMask = '!90/90;0;_'
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
MaxLength = 5
ParentFont = False
TabOrder = 0
Text = '3112'
end
end
object GroupBox3: TGroupBox
Left = 13
Top = 172
Width = 397
Height = 69
Caption = ' Geben Sie hier eine Grundgeb�hr ein '
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 2
object MaskEdit3: TMaskEdit
Left = 20
Top = 30
Width = 51
Height = 30
EditMask = '!90:00;0;_'
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
MaxLength = 5
ParentFont = False
TabOrder = 0
Text = '0000'
end
end
object GroupBox4: TGroupBox
Left = 13
Top = 248
Width = 397
Height = 69
Caption = ' Geben Sie hier einen eventuellen Freibetrag ein '
Font.Color = clBlack
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 3
object MaskEdit4: TMaskEdit
Left = 20
Top = 30
Width = 51
Height = 30
EditMask = '!90:00;0;_'
MaxLength = 5
TabOrder = 0
Text = '0000'
end
end
object KostenTabelle: TStringGrid
Left = 290
Top = 328
Width = 400
Height = 150
TabOrder = 4
Visible = False
end
object BitBtn1: TBitBtn
Left = 157
Top = 334
Width = 111
Height = 41
TabOrder = 5
OnClick = BitBtn1Click
Kind = bkOK
end
end