object MailOrderForm: TMailOrderForm Left = 6 Top = 23 Width = 622 Height = 361 Caption = 'Mail order' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 OnCreate = FormCreate OnDestroy = FormDestroy TextHeight = 13 object Gauge1: TGauge Left = 10 Top = 29 Width = 199 Height = 13 BorderStyle = bsNone ForeColor = clOlive BackColor = clBtnFace Progress = 0 end object Gauge2: TGauge Left = 220 Top = 29 Width = 264 Height = 13 BorderStyle = bsNone ForeColor = clGray BackColor = clBtnFace Progress = 0 end object DBMultiImage1: TPDBMultiImage Left = 5 Top = 0 Width = 591 Height = 29 ImageReadRes = Color256 ImageWriteRes = Color256 JPegSaveQuality = 25 JPegSaveSmooth = 0 ImageDither = True UpdateAsJPG = False UpdateAsBMP = False UpdateAsGIF = False UpdateAsPCX = False UpdateAsPNG = True DataField = 'Scroll' DataSource = DataSource1 TabOrder = 0 end object DBMultiMedia1: TPDBMultiMedia Left = 8 Top = 45 Width = 204 Height = 148 ImageReadRes = Color256 ImageWriteRes = Color256 ImageDither = True JPegSaveQuality = 25 JPegSaveSmooth = 0 UpdateAsJPG = False UpdateAsBMP = False UpdateAsGIF = False UpdateAsPCX = False UpdateAsPNG = True AutoPlayMultiMedia = True AutoRePlayMultiMedia = True AutoHideMediaPlayer = True PathForTempFile = 'C:\' BorderStyle = bsNone Color = clNavy DataField = 'Multimedia' DataSource = DataSource1 MediaPlayer = DBMediaPlayer1 TabOrder = 1 TempMov = '$$$.MOV' TempAVI = '$$$.AVI' TempWAV = '$$$.WAV' TempMID = '$$$.MID' TempRMI = '$$$.RMI' end object DBMemo1: TDBMemo Left = 499 Top = 46 Width = 108 Height = 137 Color = clNavy DataField = 'Memo' DataSource = DataSource1 Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object DBMultiImage2: TPDBMultiImage Left = 222 Top = 45 Width = 261 Height = 201 ImageReadRes = Color256 ImageWriteRes = Color256 JPegSaveQuality = 25 JPegSaveSmooth = 0 ImageDither = True UpdateAsJPG = False UpdateAsBMP = False UpdateAsGIF = False UpdateAsPCX = False UpdateAsPNG = True DataField = 'Image' DataSource = DataSource1 TabOrder = 3 end object AddMM: TBitBtn Left = 42 Top = 289 Width = 119 Height = 33 Caption = 'Add MM' TabOrder = 4 OnClick = AddMMClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000 00007777777777777777933393303933337073F37F37F73F3377393393303393 379037FF7F37F37FF777379793303379793037777337F3777737339933303339 93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399 999037777337F377777793993330333393307377FF37F3337FF7333993303333 993033377F37F33377F7333993303333993033377337F3337737333333303333 33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303 03037F7F7F7F7F7F7F7F000000000000000077777777777777770000} NumGlyphs = 2 Style = bsNew end object AddImage: TBitBtn Left = 226 Top = 289 Width = 89 Height = 33 Caption = 'Add Image' TabOrder = 5 OnClick = AddImageClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF 77F07F773FFFFFFF77F70FFF7700000000007F337777777777770FFFFF0BBBBB BBB07F333F7F3FF33FF70FFF700B00BB00B07F3F777F77F377370F707F0BB0B0 0BB07F77337F37F77337007EEE0BB0B0BBB077FFFF7F37F7F3370777770EE000 EEE07777777F3777F3F7307EEE0E0E00E0E03773FF7F7377F73733707F0EE000 0EE03337737F377773373333700EEE00EEE03333377F3377FF373333330EEEE0 0EE03333337F33377F373333330EEEE00EE03333337F333773373333330EEEEE EEE03333337FFFFFFFF7333333000000000033333377777777770000} NumGlyphs = 2 Style = bsNew end object AddMsg: TBitBtn Left = 322 Top = 289 Width = 89 Height = 33 Caption = 'Add Msg' TabOrder = 6 OnClick = AddMsgClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3 333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0 C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0 F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF 00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333 3333333373FF7333333333333000333333333333377733333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 Style = bsNew end object BitBtn6: TBitBtn Left = 507 Top = 289 Width = 89 Height = 33 TabOrder = 7 Kind = bkClose Style = bsNew end object DBEdit1: TDBEdit Left = 491 Top = 202 Width = 121 Height = 20 DataField = 'Text' DataSource = DataSource1 MaxLength = 0 TabOrder = 8 end object DBEdit2: TDBEdit Left = 491 Top = 226 Width = 121 Height = 20 DataField = 'Price' DataSource = DataSource1 MaxLength = 0 TabOrder = 9 end object DBMediaPlayer1: TPDBMediaPlayer Left = 12 Top = 193 Width = 197 Height = 27 VisibleButtons = [btPlay, btPause, btStop, btNext, btPrev, btStep, btBack] Display = DBMultiMedia1 TabOrder = 11 end object SpinButton1: TSpinButton Left = 596 Top = 0 Width = 17 Height = 29 DownGlyph.Data = { 7E040000424D7E04000000000000360400002800000009000000060000000100 0800000000004800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030000000303030300030303030000000303030000000303030000000303 0000000000030300000003000000000000000300000003030303030303030300 0000} TabOrder = 10 UpGlyph.Data = { 7E040000424D7E04000000000000360400002800000009000000060000000100 0800000000004800000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030000000300000000000000030000000303000000000003030000000303 0300000003030300000003030303000303030300000003030303030303030300 0000} OnDownClick = SpinButton1DownClick OnUpClick = SpinButton1UpClick end object DBNavigator1: TDBNavigator Left = 232 Top = 248 Width = 241 Height = 25 DataSource = DataSource1 TabOrder = 12 end object BitBtn1: TBitBtn Left = 42 Top = 257 Width = 119 Height = 33 Caption = 'Credit Message' TabOrder = 13 OnClick = BitBtn1Click Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333 333333333337FF3333333333330003333333333333777F333333333333080333 3333333333777F3333333333330003333333333333777F3333333333330F0333 33333333337F7F3333333333330F033333333333337373F33333333330F7F033 333333333737F73F333333330FF7FF03333333337F37F37F333333330FF7FF03 333333337F37337F333333330FFFFF033333333373F333733333333330FFF033 33333333373FF733333333333300033333333333337773333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 Style = bsNew end object DataSource1: TDataSource DataSet = Table1 OnDataChange = DataSource1DataChange Left = 11 Top = 47 end object Table1: TTable DatabaseName = 'c:\imagevcl' TableName = 'MAIL_ORD.DB' Left = 48 Top = 47 end object OpenDialog1: TOpenDialog Filter = 'All Images|*.jpg;*.bmp;*.gif;*.pcx;*.png|Jpeg|*.jpg|BitMap|*.bmp' + '|Gif|*.gif|Pcx|*.pcx|Png|*.png' Left = 85 Top = 47 end end