home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 25
/
Chip25.iso
/
Sharewar
/
BackupX
/
_SETUP.1
/
BackupX.de
/
0
/
RCDATA
/
TFRMMAINBX
/
TFRMMAINBX.txt
< prev
Wrap
Text File
|
1999-09-25
|
50KB
|
1,748 lines
object frmMainBX: TfrmMainBX
Left = 195
Top = 265
HelpContext = 1
AutoScroll = False
Caption = 'BackupXpress Pro'
ClientHeight = 347
ClientWidth = 616
Color = clBtnFace
Constraints.MaxHeight = 605
Constraints.MaxWidth = 800
Constraints.MinHeight = 360
Constraints.MinWidth = 612
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
Menu = MainMenu
OldCreateOrder = True
ShowHint = True
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyUp = FormKeyUp
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 0
Width = 616
Height = 1
Align = alTop
Shape = bsTopLine
Style = bsRaised
end
object Panel1: TPanel
Left = 0
Top = 1
Width = 616
Height = 346
Align = alClient
BevelOuter = bvNone
BorderWidth = 4
TabOrder = 0
object grpGruppen: TGroupBox
Left = 4
Top = 4
Width = 608
Height = 277
Align = alClient
Caption = 'Gruppen'
Constraints.MinHeight = 250
Constraints.MinWidth = 604
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object ImgZip: TImage
Left = 169
Top = 10
Width = 16
Height = 15
AutoSize = True
Picture.Data = {<image000.bmp>}
Visible = False
end
object ImgZipSelected: TImage
Left = 189
Top = 10
Width = 16
Height = 15
AutoSize = True
Picture.Data = {<image001.bmp>}
Visible = False
end
object SplitterH: TSplitter
Left = 232
Top = 15
Width = 3
Height = 260
Cursor = crHSplit
ResizeStyle = rsUpdate
OnMoved = SplitterHMoved
end
object paGroups: TPanel
Left = 2
Top = 15
Width = 230
Height = 260
Align = alLeft
BevelOuter = bvNone
Caption = 'paGroups'
Constraints.MaxWidth = 300
Constraints.MinHeight = 150
Constraints.MinWidth = 180
TabOrder = 0
object lbxGruppen: TRxCheckListBox
Left = 6
Top = 1
Width = 221
Height = 253
AutoScroll = False
Enabled = False
Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 15
MultiSelect = True
PopupMenu = pmGroups
Style = lbOwnerDrawFixed
TabOrder = 0
OnClickCheck = lbxGruppenClickCheck
OnClick = lbxGruppenClick
OnDrawItem = lbxGruppenDrawItem
OnKeyUp = lbxGruppenKeyUp
OnMouseDown = lbxGruppenMouseDown
InternalVersion = 202
Strings = (
'Test1'
1
True
'Test2'
2
True
'Test3'
0
True
'Test4'
0
True)
end
end
object Panel3: TPanel
Left = 235
Top = 15
Width = 371
Height = 260
Align = alClient
BevelOuter = bvNone
Caption = 'Panel3'
Constraints.MinWidth = 200
TabOrder = 1
object PageControl1: TPageControl
Left = 2
Top = 224
Width = 364
Height = 30
Anchors = [akLeft, akRight, akBottom]
Constraints.MinWidth = 360
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Panel2: TPanel
Left = 14
Top = 228
Width = 349
Height = 22
Anchors = [akLeft, akRight, akBottom]
BevelOuter = bvNone
Constraints.MinWidth = 344
Ctl3D = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
object lbFilesLabel: TLabel
Left = 0
Top = 5
Width = 24
Height = 13
Caption = 'Dateien:'
end
object btnShowfiles: TSpeedButton
Left = 281
Top = 3
Width = 65
Height = 19
AllowAllUp = True
GroupIndex = 1
Caption = '&Dateien'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = btnShowfilesClick
end
object lbSizeLabel: TLabel
Left = 95
Top = 6
Width = 23
Height = 13
Caption = 'Gr��e:'
end
object lbFreeLabel: TLabel
Left = 193
Top = 6
Width = 24
Height = 13
Caption = 'Frei:'
end
object lbAnzahl: TStaticText
Left = 41
Top = 4
Width = 49
Height = 17
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
TabOrder = 0
end
object lbSize: TStaticText
Left = 130
Top = 4
Width = 59
Height = 17
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
TabOrder = 1
end
object lbFree: TStaticText
Left = 219
Top = 4
Width = 58
Height = 17
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
TabOrder = 2
end
end
object pcInfo: TPageControl
Left = 2
Top = 1
Width = 364
Height = 223
ActivePage = tsProperties
Anchors = [akLeft, akTop, akRight, akBottom]
Constraints.MinHeight = 223
Constraints.MinWidth = 360
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
RaggedRight = True
TabOrder = 0
object tsProperties: TTabSheet
Caption = 'Allgem.'
object lbQuelle: TLabel
Left = 10
Top = 15
Width = 58
Height = 13
Caption = '&Quellpfad:'
Enabled = False
FocusControl = edQuelle
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object lbZiel: TLabel
Left = 10
Top = 40
Width = 49
Height = 13
Caption = 'Zie&lpfad:'
Enabled = False
FocusControl = edZiel
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 11
Top = 72
Width = 38
Height = 13
Caption = '&Include:'
Enabled = False
FocusControl = edDateien
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 11
Top = 97
Width = 41
Height = 13
Caption = 'E&xclude:'
Enabled = False
FocusControl = edExclude
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object btnQuelle: TSpeedButton
Left = 328
Top = 11
Width = 22
Height = 20
Anchors = [akTop, akRight]
Enabled = False
Glyph.Data = {
E6000000424DE60000000000000076000000280000000E0000000E0000000100
0400000000007000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
88008000000000088800800777777770880080F077777777080080FF07777777
700080FFF0000000000080FFFFFFFF08880080FFF00000088800880008888888
8800888888888800080088888888888008008888880888080800888888800088
88008888888888888800}
OnClick = btnQuelleClick
end
object btnZiel: TSpeedButton
Left = 328
Top = 37
Width = 22
Height = 20
Anchors = [akTop, akRight]
Enabled = False
Glyph.Data = {
E6000000424DE60000000000000076000000280000000E0000000E0000000100
0400000000007000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
88008000000000088800800777777770880080F077777777080080FF07777777
700080FFF0000000000080FFFFFFFF08880080FFF00000088800880008888888
8800888888888800080088888888888008008888880888080800888888800088
88008888888888888800}
OnClick = btnZielClick
end
object Label5: TLabel
Left = 10
Top = 164
Width = 63
Height = 13
Caption = 'Letztes Backup:'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object btnFilter: TButton
Left = 308
Top = 67
Width = 42
Height = 46
Hint = 'Filter-Manager'
Anchors = [akTop, akRight]
Caption = '&Filter'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = btnFilterClick
end
object edDateien: TEdit
Tag = 3
Left = 78
Top = 67
Width = 227
Height = 21
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 2
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object edExclude: TEdit
Tag = 4
Left = 78
Top = 92
Width = 227
Height = 21
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 3
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object edQuelle: TEdit
Tag = 1
Left = 78
Top = 10
Width = 249
Height = 21
Anchors = [akLeft, akTop, akRight]
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object edZiel: TEdit
Tag = 2
Left = 78
Top = 36
Width = 249
Height = 21
Anchors = [akLeft, akTop, akRight]
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 1
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object lbLetztesBackup: TStaticText
Left = 90
Top = 162
Width = 258
Height = 18
Alignment = taCenter
Anchors = [akLeft, akTop, akRight]
AutoSize = False
BorderStyle = sbsSunken
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PopupMenu = pmDate
TabOrder = 7
end
object chkbxDirectories: TCheckBox
Tag = 10
Left = 52
Top = 131
Width = 141
Height = 17
Hint = 'Unterverzeichnisse einschliessen'
Caption = '&Unterverz. einschliessen'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object chkbxCopyToZip: TCheckBox
Tag = 12
Left = 196
Top = 131
Width = 141
Height = 17
Hint = 'Dateien in ein Zip-Archiv kopieren'
Caption = '&Zip-Archiv erstellen'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = chkbxCopyToZipClick
OnExit = edQuelleExit
end
end
object tsOptions: TTabSheet
Caption = 'Optionen'
ImageIndex = 6
object Label1: TLabel
Left = 15
Top = 12
Width = 124
Height = 13
Caption = 'Zielverzeichnis l�schen:'
end
object chkbxClearDirectory: TRadioButton
Tag = 61
Left = 15
Top = 50
Width = 280
Height = 17
Hint = 'Alle Dateien im Zielverz. l�schen vor dem Kopieren'
Caption = '&Immer vor dem Kopieren der Dateien'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
TabStop = True
OnClick = chkbxClearDirectoryClick
OnExit = edQuelleExit
end
object chkbxClearDirectorySuccess: TRadioButton
Tag = 62
Left = 15
Top = 70
Width = 280
Height = 17
Hint = 'Verzeichnis nur l�schen, falls das Backup erfolgreich war.'
Caption = '&Nur bei erfolgreichem Backup'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
TabStop = True
OnClick = chkbxClearDirectoryClick
OnExit = edQuelleExit
end
object chkbxClearDirectoryDont: TRadioButton
Tag = 60
Left = 15
Top = 30
Width = 280
Height = 17
Caption = 'Nie'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
TabStop = True
OnClick = chkbxClearDirectoryClick
OnExit = edQuelleExit
end
end
object tsZip: TTabSheet
Caption = 'Zip'
object lbStripPathFromZip: TLabel
Left = 20
Top = 84
Width = 87
Height = 13
Caption = 'Pfad ab&schneiden:'
FocusControl = cbStripPathFromZip
end
object lbPassword: TLabel
Left = 20
Top = 122
Width = 49
Height = 13
Hint = 'Passwort f�r das Verschl�sseln'
Caption = 'Pass&wort:'
FocusControl = edPassword
end
object Label4: TLabel
Left = 238
Top = 160
Width = 22
Height = 13
Caption = 'Tage'
end
object Label10: TLabel
Left = 267
Top = 11
Width = 16
Height = 13
Caption = 'MB'
end
object Shape1: TShape
Left = 2
Top = 34
Width = 351
Height = 1
Anchors = [akLeft, akTop, akRight]
Pen.Color = clGray
end
object Shape2: TShape
Left = 2
Top = 71
Width = 351
Height = 1
Anchors = [akLeft, akTop, akRight]
Pen.Color = clGray
end
object Shape3: TShape
Left = 2
Top = 110
Width = 351
Height = 1
Anchors = [akLeft, akTop, akRight]
Pen.Color = clGray
end
object Shape4: TShape
Left = 2
Top = 148
Width = 351
Height = 1
Anchors = [akLeft, akTop, akRight]
Pen.Color = clGray
end
object chkbxDiskSpanningFixedSize: TCheckBox
Tag = 40
Left = 138
Top = 9
Width = 82
Height = 17
Hint = 'Feste Gr��e f�r Disketten verwenden'
Caption = 'Feste Gr��e'
TabOrder = 1
OnClick = chkbxDeleteZipClick
OnExit = edQuelleExit
end
object chkbxDeleteZip: TCheckBox
Tag = 13
Left = 21
Top = 44
Width = 276
Height = 17
Hint = 'Bestehendes Zip-Archiv l�schen vor dem kopieren'
Caption = 'Zip &l�schen vor dem Kopieren'
TabOrder = 3
OnClick = chkbxDeleteZipClick
OnExit = edQuelleExit
end
object cbStripPathFromZip: TComboBox
Tag = 14
Left = 116
Top = 81
Width = 227
Height = 21
Hint = 'Dieser Teil des Pfades wird nicht in die Zip-Datei �bernommen'
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
Ctl3D = True
DropDownCount = 12
ItemHeight = 0
ParentCtl3D = False
TabOrder = 4
OnClick = cbStripPathFromZipClick
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object edPassword: TEdit
Tag = 17
Left = 76
Top = 119
Width = 146
Height = 21
Hint = 'Zip-Archiv verschl�sseln'
Anchors = [akLeft, akTop, akRight]
MaxLength = 20
PasswordChar = '*'
TabOrder = 5
OnExit = edQuelleExit
end
object chkBxMaskPassword: TCheckBox
Left = 232
Top = 122
Width = 119
Height = 17
Hint = 'Passwort sichtbar/unsichtbar'
Anchors = [akTop, akRight]
Caption = '&Verstecken'
Checked = True
State = cbChecked
TabOrder = 6
OnClick = chkBxMaskPasswordClick
end
object chkbxDeleteFiles: TCheckBox
Tag = 18
Left = 20
Top = 159
Width = 208
Height = 17
Hint = 'Alle Zip-Archive im Zielverz. l�schen die �lter als x Tage sind'
Caption = 'Zip-Archive l�schen &�lter als'
TabOrder = 7
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object edDeleteFilesDays: TEdit
Tag = 18
Left = 185
Top = 157
Width = 31
Height = 21
Hint = 'Alle Zip-Archive im Zielverz. l�schen die �lter als x Tage sind'
MaxLength = 3
TabOrder = 8
Text = '1'
OnExit = edQuelleExit
end
object udDeleteFilesDays: TUpDown
Tag = 18
Left = 216
Top = 157
Width = 15
Height = 21
Hint = 'Alle Zip-Archive im Zielverz. l�schen die �lter als x Tage sind'
Associate = edDeleteFilesDays
Min = 1
Max = 999
Position = 1
TabOrder = 9
TabStop = True
Thousands = False
Wrap = False
OnClick = udDatefilterDaysClick
OnExit = edQuelleExit
end
object chkbxUseDiskSpanning: TCheckBox
Tag = 42
Left = 21
Top = 9
Width = 111
Height = 17
Hint = 'Zip-Archiv �ber mehrere Disketten verteilen'
Caption = '&Mehrere Disketten'
TabOrder = 0
OnClick = chkbxDeleteZipClick
OnExit = edQuelleExit
end
object seDiskSpanningSize: TEdit
Tag = 41
Left = 221
Top = 7
Width = 41
Height = 21
Hint = 'Gr��e der Diskette'
TabOrder = 2
Text = '0,00'
OnExit = edQuelleExit
end
end
object tsMarkBackup: TTabSheet
Caption = 'Archivieren'
object Label7: TLabel
Left = 15
Top = 137
Width = 41
Height = 13
Caption = 'Vorschau:'
end
object Label9: TLabel
Left = 16
Top = 8
Width = 66
Height = 13
Caption = 'Backup markieren:'
end
object lbFileversion: TLabel
Left = 15
Top = 90
Width = 53
Height = 13
Hint = 'Versions-Information von dieser Datei holen'
Caption = 'Dateiversion:'
end
object rbtnMark_dont: TRadioButton
Tag = 15
Left = 15
Top = 26
Width = 113
Height = 17
Caption = 'nicht'
TabOrder = 0
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbtnMark_append_date: TRadioButton
Tag = 15
Left = 15
Top = 44
Width = 134
Height = 17
Caption = 'Datum/Zeit anh�ngen'
TabOrder = 1
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbtnMark_preceed_date: TRadioButton
Tag = 15
Left = 15
Top = 62
Width = 135
Height = 17
Caption = 'Datum/Zeit voranstellen'
TabOrder = 2
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbtnMark_append_version: TRadioButton
Tag = 15
Left = 156
Top = 44
Width = 137
Height = 17
Caption = 'Version anh�ngen'
TabOrder = 3
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbtnMark_preceed_version: TRadioButton
Tag = 15
Left = 156
Top = 62
Width = 149
Height = 17
Caption = 'Version voranstellen'
TabOrder = 4
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object lbDirPreview: TPanel
Left = 15
Top = 153
Width = 330
Height = 21
Alignment = taLeftJustify
Anchors = [akLeft, akTop, akRight]
BevelOuter = bvLowered
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
end
object edFileversion: TFilenameEdit
Tag = 16
Left = 14
Top = 106
Width = 332
Height = 20
Hint = 'Versions-Information von dieser Datei holen'
AcceptFiles = True
OnAfterDialog = edFileversionAfterDialog
DefaultExt = '.exe'
Filter = 'Executables (*.exe;*.dll)|*.exe;*.dll|All files (*.*)|*.*'
DialogTitle =
'W�hlen Sie eine Datei von der Sie die Versions-Info holen wollen' +
'.'
Anchors = [akLeft, akTop, akRight]
NumGlyphs = 1
TabOrder = 5
OnExit = edFileversionExit
end
end
object tsDateFilter: TTabSheet
Caption = 'Datum'
object Label8: TLabel
Left = 161
Top = 112
Width = 22
Height = 13
Caption = 'Tage'
end
object Shape5: TShape
Left = 2
Top = 143
Width = 349
Height = 1
Anchors = [akLeft, akTop, akRight]
Pen.Color = clGray
end
object rbSinceLastBackup: TRadioButton
Tag = 30
Left = 16
Top = 31
Width = 274
Height = 17
Caption = 'Seit dem letztem Backup'
TabOrder = 1
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbToday: TRadioButton
Tag = 30
Left = 16
Top = 51
Width = 278
Height = 17
Caption = 'Heute'
TabOrder = 2
TabStop = True
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbYoungerThen: TRadioButton
Tag = 30
Left = 16
Top = 111
Width = 89
Height = 17
Caption = 'Nicht �lter als'
TabOrder = 5
TabStop = True
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object edDatefilterDays: TEdit
Tag = 30
Left = 107
Top = 109
Width = 31
Height = 21
MaxLength = 3
TabOrder = 6
Text = '0'
OnExit = edQuelleExit
end
object udDatefilterDays: TUpDown
Tag = 30
Left = 138
Top = 109
Width = 15
Height = 21
Associate = edDatefilterDays
Min = 0
Max = 999
Position = 0
TabOrder = 7
TabStop = True
Wrap = False
OnClick = udDatefilterDaysClick
OnExit = edQuelleExit
end
object rbNone: TRadioButton
Tag = 30
Left = 16
Top = 12
Width = 137
Height = 17
Caption = 'Kein Filter'
Checked = True
TabOrder = 0
TabStop = True
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbThisWeek: TRadioButton
Tag = 30
Left = 16
Top = 71
Width = 278
Height = 17
Caption = 'Diese Woche'
TabOrder = 3
TabStop = True
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object rbThisMonth: TRadioButton
Tag = 30
Left = 16
Top = 91
Width = 278
Height = 17
Caption = 'Diesen Monat'
TabOrder = 4
TabStop = True
OnClick = chkbxDirectoriesClick
OnExit = edQuelleExit
end
object chkbxNewerfilesOnly: TCheckBox
Tag = 11
Left = 17
Top = 153
Width = 296
Height = 20
Hint = 'Datumsvergleich mit Zieldatei'
Caption = 'Dateien nur einschlie�en falls &neuer als Zieldatei'
TabOrder = 8
OnClick = chkbxCopyToZipClick
OnExit = edQuelleExit
end
end
object tsSendto: TTabSheet
Caption = 'Versenden'
object Label11: TLabel
Left = 13
Top = 37
Width = 48
Height = 13
Caption = 'Empf�nger:'
FocusControl = cbEmail
end
object Label12: TLabel
Left = 12
Top = 124
Width = 39
Height = 13
Caption = 'Ftp-&Site:'
FocusControl = cbEmail
end
object Label13: TLabel
Left = 12
Top = 150
Width = 51
Height = 13
Caption = '&Username:'
end
object Label14: TLabel
Left = 173
Top = 150
Width = 21
Height = 13
Caption = '&PW:'
end
object Label15: TLabel
Left = 12
Top = 174
Width = 39
Height = 13
Caption = '&Hostdir.:'
end
object Shape6: TShape
Left = 2
Top = 86
Width = 351
Height = 1
Anchors = [akLeft, akTop, akRight]
Pen.Color = clGray
end
object Label16: TLabel
Left = 13
Top = 61
Width = 39
Height = 13
Caption = 'Betreff:'
FocusControl = cbSubject
end
object cbEmail: TComboBox
Tag = 46
Left = 71
Top = 34
Width = 273
Height = 21
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 0
TabOrder = 1
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object cbFtp: TComboBox
Tag = 48
Left = 69
Top = 122
Width = 274
Height = 21
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 0
TabOrder = 4
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object chkbxEmail: TCheckBox
Tag = 45
Left = 12
Top = 12
Width = 97
Height = 17
Caption = '&Email'
Enabled = False
TabOrder = 0
OnClick = chkbxEmailClick
OnExit = edQuelleExit
end
object chkbxFtp: TCheckBox
Tag = 47
Left = 12
Top = 101
Width = 97
Height = 17
Caption = '&Ftp'
Enabled = False
TabOrder = 3
OnClick = chkbxEmailClick
OnExit = edQuelleExit
end
object edFtp_Username: TEdit
Tag = 49
Left = 69
Top = 147
Width = 90
Height = 20
AutoSize = False
Enabled = False
ParentShowHint = False
ShowHint = False
TabOrder = 5
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object edFtp_Password: TEdit
Tag = 50
Left = 201
Top = 147
Width = 141
Height = 20
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Enabled = False
ParentShowHint = False
PasswordChar = '*'
ShowHint = False
TabOrder = 6
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object edFtp_Hostdir: TEdit
Tag = 51
Left = 69
Top = 171
Width = 274
Height = 20
Anchors = [akLeft, akTop, akRight]
AutoSize = False
Enabled = False
ParentShowHint = False
ShowHint = False
TabOrder = 7
OnChange = edQuelleChange
OnEnter = edZielEnter
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
object cbSubject: TComboBox
Tag = 52
Left = 71
Top = 58
Width = 273
Height = 21
Anchors = [akLeft, akTop, akRight]
Enabled = False
ItemHeight = 0
TabOrder = 2
OnExit = edQuelleExit
OnKeyPress = edQuelleKeyPress
end
end
object tsHistory: TTabSheet
Caption = 'Historie'
object memHistory: TMemo
Left = 4
Top = 4
Width = 343
Height = 179
Anchors = [akLeft, akTop, akRight, akBottom]
PopupMenu = pmHistory
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
end
end
end
end
object grpProjektinformation: TGroupBox
Left = 4
Top = 281
Width = 608
Height = 61
Align = alBottom
Caption = 'Projekt-Beschreibung'
Constraints.MinWidth = 604
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
object memProjektinfo: TMemo
Left = 8
Top = 16
Width = 591
Height = 36
TabStop = False
Anchors = [akLeft, akTop, akRight, akBottom]
TabOrder = 0
OnExit = memProjektinfoExit
OnKeyUp = memProjektinfoKeyUp
end
end
end
object MainMenu: TMainMenu
Left = 136
Top = 116
object Projekt1: TMenuItem
Caption = '&Projekt'
object Neu1: TMenuItem
Caption = '&Neu'
ShortCut = 16462
OnClick = Neu1Click
end
object ffnen1: TMenuItem
Caption = '&�ffnen ...'
ShortCut = 16463
OnClick = ffnen1Click
end
object Speichern: TMenuItem
Caption = '&Speichern'
Enabled = False
ShortCut = 16467
OnClick = SpeichernClick
end
object Speichern1: TMenuItem
Caption = 'Speichern &als ...'
Enabled = False
OnClick = Speichern1Click
end
object N12: TMenuItem
Caption = '-'
end
object Options1: TMenuItem
Caption = 'Projekt O&ptionen'
Enabled = False
OnClick = Options1Click
end
object N22: TMenuItem
Caption = '-'
end
object Library1: TMenuItem
Caption = '&Schnellzugriff ...'
ShortCut = 16460
OnClick = Library1Click
end
object LetztesProjekt1: TMenuItem
Caption = 'Letzte Projekte'
Enabled = False
end
object N3: TMenuItem
Caption = '-'
end
object Beenden1: TMenuItem
Caption = 'Be&enden'
OnClick = Beenden1Click
end
end
object Bearbeiten1: TMenuItem
Caption = '&Bearbeiten'
object Add1: TMenuItem
Action = acAddGroup
ShortCut = 16455
end
object Delete1: TMenuItem
Action = acDeleteGroup
end
object N2: TMenuItem
Caption = '-'
end
object Allesmarkieren2: TMenuItem
Action = acSelectAll
end
object Allesdemarkieren2: TMenuItem
Action = acUnselectAll
end
object N6: TMenuItem
Caption = '-'
end
object Umbenennen2: TMenuItem
Action = acRename
end
object Duplicate2: TMenuItem
Action = acDuplicate
end
object N14: TMenuItem
Caption = '-'
end
object DAtumrcksetzen1: TMenuItem
Action = acResetDate
end
object Setdatetonow1: TMenuItem
Action = acSetDate
end
object N7: TMenuItem
Caption = '-'
end
object Einstellungen1: TMenuItem
Caption = '&Konfiguration'
OnClick = Einstellungen1Click
end
end
object View1: TMenuItem
Caption = '&Ansicht'
object Showprojectdescription2: TMenuItem
Action = acShowDescription
end
object N9: TMenuItem
Caption = '-'
end
object Explorer1: TMenuItem
Action = acExploreSource
end
object Viewdestdir1: TMenuItem
Action = acExploreDest
end
object N8: TMenuItem
Caption = '-'
end
object Viewlogfile1: TMenuItem
Caption = '&Logbuch'
object View2: TMenuItem
Action = acViewLog
end
object Clear2: TMenuItem
Action = acClearLog
end
end
object N19: TMenuItem
Caption = '-'
end
object Refresh1: TMenuItem
Action = acRefreshSingleGroup
end
object Autoscan1: TMenuItem
Action = acAutorefresh
end
end
object Scheduler1: TMenuItem
Caption = 'Zei&t-Planer'
object SchedulerActive1: TMenuItem
Caption = '&Aktiv'
ShortCut = 115
OnClick = SchedulerActive1Click
end
object N21: TMenuItem
Caption = '-'
end
object Configure1: TMenuItem
Caption = '&Konfigurieren'
OnClick = Configure1Click
end
end
object Aktion1: TMenuItem
Caption = 'A&ktion'
object Starten: TMenuItem
Caption = '&Backup starten'
Default = True
ShortCut = 16450
OnClick = StartenClick
end
object Restorebackup1: TMenuItem
Caption = '&Zip-Archiv R�cksichern'
ShortCut = 16466
OnClick = Restorebackup1Click
end
object N20: TMenuItem
Caption = '-'
end
object Laufwerkeprfen1: TMenuItem
Caption = 'Laufwerke pr�fen'
ShortCut = 123
OnClick = Laufwerkeprfen1Click
end
end
object Hilfe1: TMenuItem
Caption = '&?'
object Hilfe2: TMenuItem
Caption = '&Hilfe'
OnClick = Hilfe2Click
end
object Tutorial1: TMenuItem
Caption = '&Tutorial'
OnClick = Tutorial1Click
end
object TipoftheDay1: TMenuItem
Caption = 'Tip des Tages'
OnClick = TipoftheDay1Click
end
object N5: TMenuItem
Caption = '-'
end
object OrderBackupXpress1: TMenuItem
Caption = 'BackupXpress &Bestellen'
OnClick = OrderBackupXpress1Click
end
object OrderOnline1: TMenuItem
Caption = '&Online Bestellen'
OnClick = OrderOnline1Click
end
object N16: TMenuItem
Caption = '-'
end
object Homepage1: TMenuItem
Caption = '&Web page'
OnClick = Homepage1Click
end
object Emailme1: TMenuItem
Caption = '&Email'
OnClick = Emailme1Click
end
object N17: TMenuItem
Caption = '-'
end
object Info1: TMenuItem
Caption = '&Info ...'
OnClick = Info1Click
end
end
end
object OpenDialog: TOpenDialog
DefaultExt = '*.bpr'
Filter = 'BackupX project (*.bpr)|*.bpr|All files (*.*)|*.*'
Title = 'Projekt �ffnen'
Left = 143
Top = 31
end
object SaveDialog: TSaveDialog
DefaultExt = '*.bpr'
Filter = 'BackupX project (*.bpr)|*.bpr|All files (*.*)|*.*'
Title = 'Projekt speichern'
Left = 151
Top = 40
end
object MRUManager: TMRUManager
Capacity = 5
IniStorage = FormPlacement
RecentMenu = LetztesProjekt1
OnClick = MRUManagerClick
Left = 167
Top = 113
end
object AutoStartTimer: TTimer
Enabled = False
Interval = 50
OnTimer = AutoStartTimerTimer
Left = 41
Top = 51
end
object pmGroups: TPopupMenu
OnPopup = pmGroupsPopup
Left = 145
Top = 124
object Addgroup1: TMenuItem
Action = acAddGroup
end
object Deletegroup1: TMenuItem
Action = acDeleteGroup
end
object N1: TMenuItem
Caption = '-'
end
object Allesmarkieren: TMenuItem
Action = acSelectAll
end
object Allesdemarkieren: TMenuItem
Action = acUnselectAll
end
object N4: TMenuItem
Caption = '-'
end
object Moveup1: TMenuItem
Caption = 'Nach Oben'
ShortCut = 16469
OnClick = Moveup1Click
end
object Movedown1: TMenuItem
Caption = 'Nach Unten'
ShortCut = 16471
OnClick = Movedown1Click
end
object N15: TMenuItem
Caption = '-'
end
object Umbenennen: TMenuItem
Action = acRename
end
object Duplicate: TMenuItem
Action = acDuplicate
end
object N13: TMenuItem
Caption = '-'
end
object Datumrcksetzen: TMenuItem
Action = acResetDate
end
object Setdatetonow: TMenuItem
Action = acSetDate
end
end
object CheckDrivesTimer: TTimer
Enabled = False
Interval = 2000
OnTimer = CheckDrivesTimerTimer
Left = 52
Top = 61
end
object StartupTimer: TTimer
Enabled = False
Interval = 50
OnTimer = StartupTimerTimer
Left = 61
Top = 70
end
object RxTrayIcon1: TRxTrayIcon
Active = False
Hint = 'BackupXpress'
Icon.Data = {<image002.ico>}
PopupMenu = pmTraybar
OnClick = RxTrayIcon1Click
Left = 49
Top = 115
end
object pmHistory: TPopupMenu
Left = 538
Top = 73
object Clear1: TMenuItem
Caption = '&L�schen'
OnClick = Clear1Click
end
end
object FormPlacement: TFormPlacement
Options = [fpPosition]
UseRegistry = True
Left = 95
Top = 145
end
object pmTraybar: TPopupMenu
OnPopup = pmTraybarPopup
Left = 59
Top = 125
object Startbackup1: TMenuItem
Caption = '&Backup starten'
OnClick = Startbackup1Click
end
object N18: TMenuItem
Caption = '-'
end
object Library2: TMenuItem
Caption = '&Schnellzugriff ...'
OnClick = Library2Click
end
object N10: TMenuItem
Caption = '-'
end
object Info2: TMenuItem
Caption = '&Info'
OnClick = Info1Click
end
object N11: TMenuItem
Caption = '-'
end
object Quit1: TMenuItem
Caption = '&Beenden'
OnClick = Beenden1Click
end
end
object CloseTimer: TTimer
Enabled = False
Interval = 50
OnTimer = CloseTimerTimer
Left = 72
Top = 76
end
object ActionList: TActionList
Left = 207
Top = 29
object acAddGroup: TAction
Category = 'Gruppen'
Caption = 'Neue &Gruppe'
OnExecute = acAddGroupExecute
end
object acDeleteGroup: TAction
Category = 'Gruppen'
Caption = 'Gruppe &l�schen'
OnExecute = acDeleteGroupExecute
end
object acSelectAll: TAction
Category = 'Gruppen'
Caption = '&Alles ausw�hlen'
Enabled = False
ShortCut = 16449
OnExecute = acSelectAllExecute
end
object acUnselectAll: TAction
Category = 'Gruppen'
Caption = '&Nichts ausw�hlen'
Enabled = False
ShortCut = 16452
OnExecute = acUnselectAllExecute
end
object acRename: TAction
Category = 'Gruppen'
Caption = '&Umbenennen'
Enabled = False
OnExecute = acRenameExecute
end
object acDuplicate: TAction
Category = 'Gruppen'
Caption = 'Du&plizieren'
Enabled = False
OnExecute = acDuplicateExecute
end
object acResetDate: TAction
Category = 'Gruppen'
Caption = '&Datum R�cksetzen'
Enabled = False
OnExecute = acResetDateExecute
end
object acSetDate: TAction
Category = 'Gruppen'
Caption = 'Da&tum Setzen'
Enabled = False
OnExecute = acSetDateExecute
end
object acShowDescription: TAction
Category = 'View'
Caption = '&Beschreibung anzeigen'
Checked = True
OnExecute = acShowDescriptionExecute
end
object acExploreSource: TAction
Category = 'View'
Caption = '&Quellverzeichnis ansehen'
OnExecute = acExploreSourceExecute
end
object acExploreDest: TAction
Category = 'View'
Caption = '&Zielverzeichnis ansehen'
OnExecute = acExploreDestExecute
end
object acViewLog: TAction
Category = 'View'
Caption = '&Anzeigen'
OnExecute = acViewLogExecute
end
object acClearLog: TAction
Category = 'View'
Caption = '&L�schen'
OnExecute = acClearLogExecute
end
object acAutorefresh: TAction
Category = 'View'
Caption = 'Auto&refresh'
ShortCut = 117
OnExecute = acAutorefreshExecute
end
object acRefresh: TAction
Category = 'View'
Caption = 'Alle Gruppen aktuallisieren'
ShortCut = 8308
OnExecute = acRefreshExecute
end
object acRefreshSingleGroup: TAction
Category = 'View'
Caption = '&Aktuallisieren'
ShortCut = 116
OnExecute = acRefreshSingleGroupExecute
end
end
object pmDate: TPopupMenu
Left = 448
Top = 196
object ResetDate1: TMenuItem
Action = acResetDate
end
object SetDatetoToday1: TMenuItem
Action = acSetDate
end
end
end