home *** CD-ROM | disk | FTP | other *** search
- object ReorgData: TReorgData
- Left = 163
- Top = 184
- BorderStyle = bsDialog
- Caption = 'Reorganize database...'
- ClientHeight = 158
- ClientWidth = 335
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 71
- Top = 43
- Width = 252
- Height = 83
- AutoSize = False
- Caption =
- 'This option will reorganize your database, removing occupied spa' +
- 'ce of deleted messages and corrupted datablocks...'#13#10'This can tak' +
- 'e a potentially long time, depending on number of of messages, u' +
- 'sers, folders and related info...'
- Transparent = True
- WordWrap = True
- end
- object LMDLabelFill1: TLMDLabelFill
- Left = 8
- Top = -2
- Width = 220
- Height = 28
- FillObject.Style = sfGradient
- FillObject.Gradient.Color = clActiveCaption
- FillObject.Gradient.Style = gstHorizontal
- Caption = 'Reorganize database...'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- FontFx.Style = tdRaisedShadow
- ParentFont = False
- end
- object pBar: TLMDProgressFill
- Left = 10
- Top = 24
- Width = 314
- Height = 15
- Bevel.StyleOuter = bvLowered
- Bevel.Mode = bmCustom
- Bevel.StandardStyle = lsSingleLowered
- FillObject.Style = sfGradient
- FillObject.Gradient.Color = clSilver
- FillObject.Gradient.ColorCount = 31
- FillObject.Gradient.Style = gstHorizontal
- FillObject.Gradient.EndColor = clActiveCaption
- Visible = False
- end
- object Button1: TButton
- Left = 162
- Top = 129
- Width = 75
- Height = 25
- Caption = 'Start!'
- Default = True
- TabOrder = 0
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 242
- Top = 129
- Width = 75
- Height = 25
- Caption = 'Cancel'
- TabOrder = 1
- OnClick = Button2Click
- end
- object Animate1: TAnimate
- Left = 10
- Top = 57
- Width = 48
- Height = 50
- Active = False
- CommonAVI = aviFindFile
- StopFrame = 23
- Visible = False
- end
- object MultiLang1: TMultiLang
- Languages = 2
- Words.Strings = (
- '%Form%'
- 'Reorganize database...'
- 'Emndurbyggja gagnagrunn...'
- 'Label1'
-
- 'This option will reorganize your database, removing occupied spa' +
- 'ce of deleted messages and corrupted datablocks...'#13#10'This can tak' +
- 'e a potentially long time, depending on number of of messages, u' +
- 'sers, folders and related info...'
-
- '�essi vinnsla mun endurbyggja gagnagrunn forritsins og �ar me� e' +
- 'ndurn�ta pl�ss sem teki� er af eyddum p�sti og ��rum eyddum g�gn' +
- 'um.'#13#10'�etta getur teki� langan t�ma. T�malengd veltur � fj�lda p�' +
- 'sta, notenda og mappa.'
- 'Button1'
- 'Start!'
- 'Byrja!'
- 'Button2'
- 'Cancel'
- 'H�tta vi�'
- 'LMDLabelFill1'
- 'Reorganize database...'
- 'Endurbyggja gagnagrunn...'
- 'pBar'
- ''
- ''
- 'idFinished'
- 'Finished reorganizing the database!'
- 'Endurbyggingu gagna loki�!'
- 'idUsers'
- 'Users && their properties...'
- 'Notendur...'
- 'idAccounts'
- 'Accounts && their properties...'
- 'P�sth�lf...'
- 'idFolders'
- 'Folders && their properties...'
- 'M�ppur...'
- 'idMessages'
- 'Messages && their properties...'
- 'P�stur...')
- Left = 248
- Top = 8
- end
- end
-