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