Werkzeug um Belege zu scannen, Texterkennung durchzuführen und Belege sortiert abzulegen
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

199 lines
3.8 KiB

object ScanForm: TScanForm
Left = 2222
Height = 880
Top = 198
Width = 1188
Caption = 'Belegscanner'
ClientHeight = 880
ClientWidth = 1188
OnCreate = FormCreate
LCLVersion = '1.8.2.0'
object TypeSelector: TComboBox
Left = 904
Height = 28
Top = 208
Width = 276
Anchors = [akTop, akRight]
Enabled = False
ItemHeight = 0
OnChange = TypeSelectorChange
TabOrder = 1
Text = 'Select Type'
end
object Origin: TComboBox
Left = 904
Height = 28
Top = 240
Width = 272
Anchors = [akTop, akRight]
Enabled = False
ItemHeight = 0
OnChange = OriginChange
TabOrder = 3
Text = 'Start'
end
object Destination: TComboBox
Left = 904
Height = 28
Top = 304
Width = 272
Anchors = [akTop, akRight]
Enabled = False
ItemHeight = 0
OnChange = DestinationChange
TabOrder = 5
Text = 'Ziel'
end
object FolderName: TLabel
Left = 8
Height = 19
Top = 840
Width = 103
Anchors = [akLeft, akBottom]
Caption = 'Ordnername'
Font.Height = -16
Font.Name = 'Sans'
ParentColor = False
ParentFont = False
end
object Product: TComboBox
Left = 904
Height = 28
Top = 240
Width = 276
Anchors = [akTop, akRight]
Enabled = False
ItemHeight = 0
OnChange = ProductChange
TabOrder = 2
Text = 'Produkt'
Visible = False
end
object ScanButton: TButton
Left = 904
Height = 49
Top = 400
Width = 272
Anchors = [akTop, akRight]
Caption = 'scannen!'
Enabled = False
OnClick = ScanButtonClick
TabOrder = 8
end
object Resolution: TComboBox
Left = 904
Height = 28
Top = 368
Width = 72
Anchors = [akTop, akRight]
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'150'
'300'
)
TabOrder = 7
Text = '150'
end
object DPI: TLabel
Left = 984
Height = 16
Top = 376
Width = 19
Anchors = [akTop, akRight]
Caption = 'dpi'
ParentColor = False
end
object BaseFolder: TLabel
Left = 8
Height = 19
Top = 816
Width = 88
Anchors = [akLeft, akBottom]
Caption = 'BaseFolder'
Font.Height = -16
Font.Name = 'Sans'
ParentColor = False
ParentFont = False
OnClick = BaseFolderClick
end
object Stop: TComboBox
Left = 904
Height = 28
Top = 272
Width = 272
Anchors = [akTop, akRight]
Enabled = False
ItemHeight = 0
OnChange = StopChange
TabOrder = 4
Text = 'Zwischenhalt'
end
object Preview: TImage
Left = 8
Height = 800
Top = 8
Width = 880
Anchors = [akTop, akLeft, akRight, akBottom]
Center = True
Proportional = True
end
object Calendar: TCalendar
Left = 904
Height = 190
Top = 8
Width = 276
Anchors = [akTop, akRight]
DateTime = 0
OnChange = CalendarChange
TabOrder = 0
end
object PicSize: TComboBox
Left = 904
Height = 28
Top = 336
Width = 272
Anchors = [akTop, akRight]
ItemHeight = 0
TabOrder = 6
Text = '209 x 297 mm'
end
object DropButton: TButton
Left = 904
Height = 32
Top = 776
Width = 276
Anchors = [akRight, akBottom]
Caption = 'Löschen'
Enabled = False
OnClick = DropButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 9
end
object Swap: TButton
Left = 1048
Height = 30
Top = 368
Width = 128
Anchors = [akTop, akRight]
Caption = 'Start/Ziel tauschen'
OnClick = SwapClick
TabOrder = 10
end
object extButton: TButton
Left = 904
Height = 49
Top = 456
Width = 272
Anchors = [akTop, akRight]
Caption = 'extern öffnen'
Enabled = False
OnClick = extButtonClick
TabOrder = 11
end
object BaseFolderDialog: TSelectDirectoryDialog
left = 520
top = 128
end
end