137 lines
2.8 KiB
Text
137 lines
2.8 KiB
Text
object main: Tmain
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'DBKonverter'
|
|
ClientHeight = 636
|
|
ClientWidth = 1143
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object sfl: TLabel
|
|
Left = 155
|
|
Top = 21
|
|
Width = 822
|
|
Height = 13
|
|
end
|
|
object JvDBStatusLabel1: TJvDBStatusLabel
|
|
Left = 1039
|
|
Top = 585
|
|
Width = 96
|
|
Height = 13
|
|
DataSource = DS
|
|
Style = lsRecordNo
|
|
Transparent = True
|
|
end
|
|
object BitBtn1: TBitBtn
|
|
Left = 8
|
|
Top = 16
|
|
Width = 133
|
|
Height = 25
|
|
Caption = 'Quelldatei w'#228'hlen'
|
|
TabOrder = 0
|
|
OnClick = BitBtn1Click
|
|
end
|
|
object JvDBGrid1: TJvDBGrid
|
|
Left = 8
|
|
Top = 47
|
|
Width = 1128
|
|
Height = 524
|
|
DataSource = DS
|
|
TabOrder = 1
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -11
|
|
TitleFont.Name = 'Tahoma'
|
|
TitleFont.Style = []
|
|
SelectColumnsDialogStrings.Caption = 'Select columns'
|
|
SelectColumnsDialogStrings.OK = '&OK'
|
|
SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
|
|
EditControls = <>
|
|
RowsHeight = 17
|
|
TitleRowHeight = 17
|
|
end
|
|
object BitBtn2: TBitBtn
|
|
Left = 1000
|
|
Top = 16
|
|
Width = 136
|
|
Height = 25
|
|
Caption = 'Konvertieren'
|
|
Enabled = False
|
|
TabOrder = 2
|
|
OnClick = BitBtn2Click
|
|
end
|
|
object ST: TStatusBar
|
|
Left = 0
|
|
Top = 604
|
|
Width = 1143
|
|
Height = 32
|
|
Panels = <>
|
|
SimplePanel = True
|
|
ExplicitWidth = 697
|
|
end
|
|
object JvDBNavigator1: TJvDBNavigator
|
|
Left = 8
|
|
Top = 577
|
|
Width = 1020
|
|
Height = 25
|
|
DataSource = DS
|
|
TabOrder = 4
|
|
end
|
|
object OD: TOpenDialog
|
|
DefaultExt = 'db'
|
|
Filter = 'Paradox Dateien|*.db'
|
|
Left = 20
|
|
Top = 56
|
|
end
|
|
object T1: TTable
|
|
TableType = ttParadox
|
|
Left = 56
|
|
Top = 56
|
|
end
|
|
object DS: TDataSource
|
|
DataSet = T1
|
|
Left = 92
|
|
Top = 56
|
|
end
|
|
object ZDB: TZConnection
|
|
ControlsCodePage = cCP_UTF16
|
|
Catalog = 'AUFTRAX'
|
|
Properties.Strings = (
|
|
'RawStringEncoding=DB_CP')
|
|
HostName = 'WIN10-TM\SELECTLINE'
|
|
Port = 0
|
|
Database =
|
|
'Provider=SQLNCLI11.1;Persist Security Info=False;User ID=sa;Init' +
|
|
'ial Catalog="";Data Source=WIN10-TM\SELECTLINE;Initial File Name' +
|
|
'="";Server SPN=""'
|
|
User = 'sa'
|
|
Password = 'Elfio2004'
|
|
Protocol = 'ado'
|
|
LibraryLocation = 'D:\Projekte\DBKonverter\Win32\Debug\ntwdblib.dll'
|
|
Left = 1068
|
|
Top = 60
|
|
end
|
|
object ZT1: TZTable
|
|
Connection = ZDB
|
|
TableName = 'AUFTRAX.dbo.adrbrief'
|
|
Left = 1068
|
|
Top = 108
|
|
end
|
|
object ZQ1: TZQuery
|
|
Connection = ZDB
|
|
Params = <>
|
|
Left = 1068
|
|
Top = 160
|
|
end
|
|
object AP: TAppPath
|
|
Left = 128
|
|
Top = 56
|
|
end
|
|
end
|