home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Freelog 11
/
Freelog011.iso
/
BestOf
/
PhoenixMail
/
Source
/
langkit
/
Main.dfm
/
Main.txt
Wrap
Text File
|
1999-02-10
|
14KB
|
433 lines
object MainForm: TMainForm
Left = 193
Top = 121
Width = 640
Height = 468
Caption = 'MainForm'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
Position = poScreenCenter
ShowHint = True
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object StatusBar1: TStatusBar
Left = 0
Top = 403
Width = 632
Height = 19
Panels = <>
SimplePanel = False
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 632
Height = 33
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object Bevel1: TBevel
Left = 0
Top = 0
Width = 632
Height = 5
Align = alTop
Shape = bsTopLine
end
object SpeedButton3: TSpeedButton
Left = 4
Top = 4
Width = 25
Height = 25
Hint = 'New file'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDD00000000000DDDDD0FFFFFFFFF0DDDDD0FFFFFFFFF
0DDDDD0FFFFFFFFF0DDDDD0FFFFFFFFF0DDDDD0FFFFFFFFF0DDDDD0FFFFFFFFF
0DDDDD0FFFFFFFFF0DDDDD0FFFFFFFFF0DDDDD0FFFFFF0000DDDDD0FFFFFF0F0
DDDDDD0FFFFFF00DDDDDDD00000000DDDDDDDDDDDDDDDDDDDDDD}
OnClick = SpeedButton3Click
end
object SpeedButton1: TSpeedButton
Left = 28
Top = 4
Width = 25
Height = 25
Hint = 'Open file'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDD00000000000DDDDD003333333330DDDD0B03333333330DDD0FB033333333
30DD0BFB03333333330D0FBFB000000000000BFBFBFBFB0DDDDD0FBFBFBFBF0D
DDDD0BFB0000000DDDDDD000DDDDDDDD000DDDDDDDDDDDDDD00DDDDDDDDD0DDD
0D0DDDDDDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 52
Top = 4
Width = 25
Height = 25
Hint = 'Save file'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000D80E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDD0000000000000DD03300000077030DD03300000077030DD03300000077
030DD03300000000030DD03333333333330DD03300000000330DD03077777777
030DD03077777777030DD03077777777030DD03077777777030DD03077777777
000DD03077777777070DD00000000000000DDDDDDDDDDDDDDDDD}
OnClick = SpeedButton2Click
end
object SpeedButton4: TSpeedButton
Left = 76
Top = 4
Width = 25
Height = 25
Hint = 'Save file as'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000CE0E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222200000000002222203300007030222220330000703000222033000000303
0222033333333303000203300000330303020307777703030302030777770303
0302030777770003030203077777070303020000000000000302220307777707
0302220000000000000222220307777707022222000000000002}
OnClick = SpeedButton4Click
end
object SpeedButton6: TSpeedButton
Left = 170
Top = 4
Width = 25
Height = 25
Hint = 'Exit'
Glyph.Data = {
CA010000424DCA01000000000000760000002800000022000000110000000100
04000000000054010000CE0E0000CE0E00001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDD000901DDDDDDDDDDDDDDDDDDDDFDDDDDDDDDDFDD01
0901DD0DDDDDDDDDD0DDDDD7FFDDDDDDDD7DDD026202D000DDDDDDDDDDDDDD77
7FFDDDDDDDFDDD000200D0000DDDDDDD0DDDDD7777FDDDDDD7DDDD000F01DD00
0DDDDDD0DDDDDDD777FFDDDD7FDDDD00C600DDD000DDDD00DDDDDDDD777FFDD7
7DDDDD014D01DDDD000DD00DDDDDDDDDD777FF77DDDDDD015001DDDDD00000DD
DDDDDDDDDD77777DDDDDDD006202DDDDDD000DDDDDDDDDDDDDD777FFDDDDDD00
0800DDDDD00000DDDDDDDDDDDD77777FFDDDDD026202DDDD000DD00DDDDDDDDD
F777DD77FFDDDD026202DD0000DDDD00DDDDDDD7777DDDD77FFDDD000200D000
0DDDDDD00DDDDD7777DDDDDD77DFDD3AB081D000DDDDDDDDD0DDDD777DDDDDDD
DD7DDD000400DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000200DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDD002003}
NumGlyphs = 2
OnClick = SpeedButton6Click
end
object SpeedButton7: TSpeedButton
Left = 139
Top = 4
Width = 25
Height = 25
Hint = 'Help'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000C40E0000C40E00001000000000000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222000222222
2222220555000000000222050055555555022205F000877FF5022055F07F8000
F502055FF07FFFB8F50205FFF07FBFF8F50205FFF07FFFB8F50205FFF07FBFF8
F50205FFF07FFFB8F50205FFF07FBFF8F50205FF788FFFB8002205FF82288FF8
222205F782222888222228782222222222222282222222222222}
OnClick = SpeedButton7Click
end
object SpeedButton8: TSpeedButton
Left = 108
Top = 4
Width = 25
Height = 25
Hint = 'Search text'
Glyph.Data = {
CA010000424DCA01000000000000760000002800000022000000110000000100
04000000000054010000C40E0000C40E00001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDDDFFFFFDDDDDFFFFF00
0000D00000DDDDD00000DD77777FDDDD77777F000000D0F000DDDDD0F000DD7F
777FDDDD7F777F000000D0F000DDDDD0F000DD7F777FFFDF7F777F000000D000
0000D0000000DD7777777F7777777F000000D00F000000F00000DD77F777777F
77777F000000D00F000D00F00000DD77F777F77F77777F000000D00F000D00F0
0000DD77F777F77F77777D000000DD0000000000000DDDD7777777777777DD00
0000DDD0F000D0F000DDDDDD7F777F7F777FDD000000DDD00000D00000DDDDDD
77777D77777DDD000000DDDD000DDD000DDDDDDDD777FDD777FDDD000000DDDD
0F0DDD0F0DDDDDDDD7F7FDD7F7FDDD000000DDDD000DDD000DDDDDDDD777DDD7
77DDDD000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDD000000}
NumGlyphs = 2
OnClick = Search1Click
end
end
object PageControl1: TPageControl
Left = 0
Top = 33
Width = 632
Height = 370
ActivePage = TabSheet1
Align = alClient
TabOrder = 3
object TabSheet1: TTabSheet
Caption = ' Strings '
object StringGrid1: TStringGrid
Left = 0
Top = 0
Width = 624
Height = 342
Align = alClient
ColCount = 3
DefaultColWidth = 200
DefaultRowHeight = 18
FixedCols = 0
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goTabs, goAlwaysShowEditor]
TabOrder = 0
OnSelectCell = StringGrid1SelectCell
OnSetEditText = StringGrid1SetEditText
RowHeights = (
18
18)
end
end
object TabSheet4: TTabSheet
Caption = ' Author '
object ScrollBox1: TScrollBox
Left = 0
Top = 0
Width = 624
Height = 342
Align = alClient
TabOrder = 0
object GroupBox1: TGroupBox
Left = 8
Top = 4
Width = 277
Height = 113
Caption = 'Information about the author'
TabOrder = 0
object Label3: TLabel
Left = 24
Top = 28
Width = 31
Height = 13
Caption = 'N&ame:'
FocusControl = Edit2
end
object Label4: TLabel
Left = 24
Top = 84
Width = 40
Height = 13
Caption = 'Created:'
end
object Label5: TLabel
Left = 76
Top = 84
Width = 23
Height = 13
Caption = 'Date'
end
object Label6: TLabel
Left = 24
Top = 56
Width = 47
Height = 13
Caption = '&Comment:'
FocusControl = Edit3
end
object Edit2: TEdit
Left = 76
Top = 24
Width = 177
Height = 21
MaxLength = 30
TabOrder = 0
end
object Edit3: TEdit
Left = 76
Top = 52
Width = 177
Height = 21
MaxLength = 50
TabOrder = 1
end
end
object GroupBox2: TGroupBox
Left = 8
Top = 128
Width = 277
Height = 89
Caption = 'Information about the language'
TabOrder = 1
object Label7: TLabel
Left = 24
Top = 28
Width = 65
Height = 13
Caption = '&Native Name:'
FocusControl = Edit4
end
object Label8: TLabel
Left = 24
Top = 56
Width = 68
Height = 13
Caption = '&English Name:'
FocusControl = Edit5
end
object Edit4: TEdit
Left = 104
Top = 24
Width = 149
Height = 21
MaxLength = 20
TabOrder = 0
end
object Edit5: TEdit
Left = 104
Top = 52
Width = 149
Height = 21
MaxLength = 20
TabOrder = 1
end
end
end
end
object TabSheet5: TTabSheet
Caption = 'About'
object Memo5: TMemo
Left = 0
Top = 0
Width = 624
Height = 342
Align = alClient
Color = clBtnFace
Lines.Strings = (
'Phoenix Mail Language Kit'
'Copyright � 1998-99 Michael Haller'
'All Rights Reserved.'
''
'This program is free software; you can redistribute it and/or '
'modify it under the terms of the GNU General Public License '
'as published by the Free Software Foundation; either version '
'2 of the License, or (at your option) any later version.'
''
'This program is distributed in the hope that it will be useful, '
'but WITHOUT ANY WARRANTY; without even the implied '
'warranty of MERCHANTABILITY or FITNESS FOR A '
'PARTICULAR PURPOSE. See the GNU General Public '
'License for more details.'
''
'You should have received a copy of the GNU General Public '
'License along with this program; if not, write to the Free '
'Software Foundation, Inc., 59 Temple Place - Suite 330, '
'Boston, MA 02111-1307, USA.'
''
''
'The source is available for free at'
'http://www.discountdrive.com/sunrise/')
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
WantTabs = True
WordWrap = False
end
end
end
object ListBox1: TListBox
Left = 392
Top = 204
Width = 165
Height = 121
ItemHeight = 13
TabOrder = 0
Visible = False
end
object OpenDialog1: TOpenDialog
Filter = 'Language (*.lng)|*.lng'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
Title = 'Open File'
Left = 484
Top = 224
end
object SaveDialog1: TSaveDialog
DefaultExt = 'lng'
Filter = 'Language (*.lng)|*.lng'
Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
Title = 'Save File'
Left = 484
Top = 272
end
object MainMenu1: TMainMenu
Left = 416
Top = 224
object File1: TMenuItem
Caption = '&File'
object New1: TMenuItem
Caption = '&New'
ShortCut = 16462
OnClick = SpeedButton3Click
end
object Open1: TMenuItem
Caption = '&Open...'
ShortCut = 16463
OnClick = SpeedButton1Click
end
object Save1: TMenuItem
Caption = '&Save'
ShortCut = 16467
OnClick = SpeedButton2Click
end
object SaveAs1: TMenuItem
Caption = 'Save &As...'
OnClick = SpeedButton4Click
end
object N1: TMenuItem
Caption = '-'
end
object Exit1: TMenuItem
Caption = '&Exit'
OnClick = SpeedButton6Click
end
end
object Edit1: TMenuItem
Caption = '&Edit'
object Search1: TMenuItem
Caption = '&Search...'
OnClick = Search1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
object Readme1: TMenuItem
Caption = '&Readme...'
OnClick = SpeedButton7Click
end
end
end
object FindDialog1: TFindDialog
Options = [frDown, frHideMatchCase, frHideWholeWord, frHideUpDown]
OnFind = FindDialog1Find
Left = 416
Top = 272
end
end