object FontForm: TFontForm Left = 356 Top = 227 BorderStyle = bsNone BorderWidth = 2 Caption = '������ ����������' ClientHeight = 300 ClientWidth = 400 Color = clRed Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy OnDeactivate = FormDeactivate PixelsPerInch = 96 TextHeight = 13 object SWF: TShockwaveFlash Left = 0 Top = 0 Width = 400 Height = 300 Align = alClient TabOrder = 3 OnFSCommand = SWFFSCommand ControlData = { 675566550003000057290000021F0000080002000000000008000E0000005700 69006E0064006F007700000008000E000000570069006E0064006F0077000000 08000E000000570069006E0064006F00770000000B0000000B00000008000A00 00004800690067006800000008000200000000000B0000000800020000000000 08000E00000061006C0077006100790073000000080012000000450078006100 6300740046006900740000000B0000000B000000080002000000000008000200 00000000} end object CoolColor: TCoolComboBox Left = 70 Top = 135 Width = 228 Height = 30 ExtendedStyle = ctColorControl FileMask = '*.*' ListBoxWidth = 228 Options = [ocPaintWallpaper, ocBevelOnlyIfSel, ocFlatBorder] SelFont.Charset = DEFAULT_CHARSET SelFont.Color = clHighlightText SelFont.Height = -11 SelFont.Name = 'MS Sans Serif' SelFont.Style = [] ShadowSize = 0 DropDownCount = 6 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ItemHeight = 24 Items.Strings = ( 'clBlack' 'clMaroon' 'clGreen' 'clOlive' 'clNavy' 'clPurple' 'clTeal' 'clGray' 'clSilver' 'clRed' 'clLime' 'clYellow' 'clBlue' 'clFuchsia' 'clAqua' 'clWhite') ParentFont = False TabOrder = 0 end object CoolName: TCoolComboBox Left = 70 Top = 78 Width = 228 Height = 30 ExtendedStyle = ctFontControl FileMask = '*.*' ListBoxWidth = 228 Options = [ocPaintWallpaper, ocBevelOnlyIfSel, ocFlatBorder] SelFont.Charset = DEFAULT_CHARSET SelFont.Color = clHighlightText SelFont.Height = -11 SelFont.Name = 'MS Sans Serif' SelFont.Style = [] ShadowSize = 0 DropDownCount = 6 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ItemHeight = 24 Items.Strings = ( '@Arial Unicode MS' '@Batang' '@MS Mincho' '@SimSun' 'AFPalm' 'AFPalm .NET' 'AFSE UIQ Standard' 'Aharoni' 'ALW Cool Alhada.' 'ALW Cool Alsalam. ' 'ALW Cool Andalus.' 'ALW Cool Arafat. ' 'ALW Cool Electron.' 'ALW Cool Farisy.' 'ALW Cool Freedom. ' 'ALW Cool Hashimy.' 'ALW Cool Hijaz. ' 'ALW Cool Hijon.' 'ALW Cool Jeddah Slit. ' 'ALW Cool Khaybar. ' 'ALW Cool Mamloky.' 'ALW Cool Modern. ' 'ALW Cool pencil.' 'ALW Cool Shafa. ' 'ALW Cool Taif. ' 'ALW Cool Thaghr1. ' 'ALW Cool Tholoth. ' 'ALW Cool Tybah ' 'ALW Cool Wady. ' 'Andalus' 'Angsana New' 'AngsanaUPC' 'Arabic Transparent' 'Arial' 'Arial Black' 'Arial Narrow' 'Arial Unicode MS' 'AvantGarde Bk BT' 'AvantGarde Md BT' 'AYM FREEDOM S_N' 'AYM Alsalam S_U normal.' 'AYM Andalus S_U Normal.' 'AYM Arafat S_U mormal.' 'AYM Diwany 1 S_U normal.1' 'AYM Electron S_U normal.' 'AYM Farisy S_U normal.' 'AYM Haramain.' 'AYM Hashimy S_U normal.' 'AYM Hijaz S_U adorn.' 'AYM Hijaz S_U normal.' 'AYM Hijon S_U normal.' 'AYM Hor 8 S_U normal.' 'AYM Jeddah S_U normal.' 'AYM Jeddah Slit.' 'AYM Khaybar S_U normal.' 'AYM Madinah S_U normal.' 'AYM Mamloky S_U normal.' 'AYM Modern S_U normal.' 'AYM Nask S_U normal.' 'AYM Nask2 S_U normal.' 'AYM Opohor S_U normal.' 'AYM Pencil S_U normal.' 'AYM Rika S_U normal.' 'AYM Shafa S_U normal.' 'AYM Shurooq 03' 'AYM Shurooq 14' 'AYM Shurooq 20' 'AYM Shurooq 21' 'AYM Sonpoly' 'AYM Tabuk S_U normal. ' 'AYM Taif S_U normal.' 'AYM Taybah S_U normal.' 'AYM Thghr 1 S_U normal.' 'AYM Thghr 2 S_U normal.' 'AYM Thghr 3 S_U normal.' 'AYM Thghr 4 S_U normal.' 'AYM Thghr 5 S_U normal.' 'AYM Tholoth S_U normal.' 'AYM Wadiy S_U normal.' 'AZ Pincel U_S.' 'AZ Topaz' 'Batang' 'Book Antiqua' 'Bookman Old Style' 'Browallia New' 'BrowalliaUPC' 'Century' 'Century Gothic' 'Comic Sans MS' 'Cordia New' 'CordiaUPC' 'Courier' 'Courier New' 'David' 'David Transparent' 'Default' 'DilleniaUPC' 'Estrangelo Edessa' 'EucrosiaUPC' 'Fixed Miriam Transparent' 'Fixedsys' 'Franklin Gothic Medium' 'FrankRuehl' 'FreesiaUPC' 'Garamond' 'Gautami' 'Georgia' 'Haettenschweiler' 'Impact' 'IrisUPC' 'JasmineUPC' 'Kabir06 Normal' 'KodchiangUPC' 'Latha' 'Levenim MT' 'LilyUPC' 'Lucida Console' 'Lucida Sans Unicode' 'Mangal' 'Marlett' 'Microsoft Sans Serif' 'Miriam' 'Miriam Fixed' 'Miriam Transparent' 'Modern' 'Monotype Corsiva' 'MS Dialog' 'MS Dialog Light' 'MS Mincho' 'MS Outlook' 'MS Sans Serif' 'MS Serif' 'MS SystemEx' 'MT Extra' 'MV Boli' 'Narkisim' 'Palatino Linotype' 'Raavi' 'Rod' 'Rod Transparent' 'Roman' 'Script' 'Shruti' 'Shurooq 01' 'Shurooq 02' 'Shurooq 03' 'Shurooq 04' 'Shurooq 05' 'Shurooq 06' 'Shurooq 07' 'Shurooq 08' 'Shurooq 09' 'Shurooq 10' 'Shurooq 11' 'Shurooq 12' 'Shurooq 14' 'Shurooq 16' 'Shurooq 17' 'Shurooq 19' 'Shurooq 20' 'Shurooq 21' 'Shurooq 22' 'Shurooq 23' 'Shurooq 24' 'Shurooq 25' 'Shurooq 26' 'Shurooq 27' 'Shurooq 28' 'Shurooq 29' 'Simplified Arabic' 'Simplified Arabic Fixed' 'SimSun' 'Small Fonts' 'Sylfaen' 'Symbol' 'Symbol1' 'System' 'Tahoma' 'Terminal' 'Thaghr 1 Hor.' 'Thaghr 2 Hor.' 'Thaghr 3 Hor.' 'Thaghr 4 Hor.' 'Thaghr 5 Hor.' 'Times New Roman' 'Traditional Arabic' 'Trebuchet MS' 'Tunga' 'Verdana' 'Webdings' 'Wingdings' 'Wingdings 2' 'Wingdings 3' 'WinSoft Naskh' 'WinSoft Thuluth' 'WP Arabic Sihafa' 'WP ArabicScript Sihafa' 'WP BoxDrawing' 'WP CyrillicA' 'WP CyrillicB' 'WP Greek Century' 'WP Greek Courier' 'WP Greek Helve' 'WP Hebrew David' 'WP IconicSymbolsA' 'WP IconicSymbolsB' 'WP Japanese' 'WP MathA' 'WP MathB' 'WP MathExtendedA' 'WP MathExtendedB' 'WP MultinationalA Courier' 'WP MultinationalA Helve' 'WP MultinationalA Roman' 'WP MultinationalB Courier' 'WP MultinationalB Helve' 'WP MultinationalB Roman' 'WP Phonetic' 'WP TypographicSymbols' 'WST_Czec' 'WST_Engl' 'WST_Fren' 'WST_Germ' 'WST_Ital' 'WST_Span' 'WST_Swed') ParentFont = False TabOrder = 1 end object CoolSize: TCoolComboBox Left = 70 Top = 190 Width = 228 Height = 30 FileMask = '*.*' ListBoxWidth = 228 Options = [ocPaintWallpaper, ocBevelOnlyIfSel, ocFlatBorder] SelFont.Charset = DEFAULT_CHARSET SelFont.Color = clHighlightText SelFont.Height = -11 SelFont.Name = 'MS Sans Serif' SelFont.Style = [] ShadowSize = 0 DropDownCount = 6 Font.Charset = ARABIC_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 24 Items.Strings = ( '8' '9' '10' '11' '12' '14' '16' '18' '20' '22' '24' '26' '28' '36' '48' '72') ParentFont = False TabOrder = 2 end end