object Form4: TForm4 Left = 271 Top = 145 BorderStyle = bsDialog Caption = 'PowerDREAM registration' ClientHeight = 351 ClientWidth = 421 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 259 Width = 421 Height = 92 Align = alBottom BevelOuter = bvNone TabOrder = 0 object Label1: TLabel Left = 18 Top = 12 Width = 159 Height = 13 Caption = 'Enter your name exactly as given:' end object Label2: TLabel Left = 68 Top = 41 Width = 109 Height = 13 Caption = 'Enter registration code:' end object Edit1: TEdit Left = 184 Top = 6 Width = 225 Height = 21 TabOrder = 0 end object Edit2: TEdit Left = 184 Top = 35 Width = 225 Height = 21 TabOrder = 1 end object OK: TButton Left = 336 Top = 64 Width = 75 Height = 25 Caption = 'OK' TabOrder = 2 OnClick = OKClick end object Cancel: TButton Left = 256 Top = 64 Width = 75 Height = 25 Caption = 'Cancel' TabOrder = 3 OnClick = CancelClick end end object PageControl1: TPageControl Left = 0 Top = 0 Width = 421 Height = 259 ActivePage = TabSheet7 Align = alClient Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabHeight = 20 TabOrder = 1 object TabSheet7: TTabSheet Caption = 'Online' object Memo13: TMemo Left = 16 Top = 0 Width = 385 Height = 233 TabStop = False BorderStyle = bsNone Color = clBtnFace Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '' 'This program can be registered online directly with HACE through' + ' a secure ' 'server for 130 Nkr (approx 20 USD or 13 GBP). Go to' '' ' http://www.swregnet.com/542p.htm < Click to g' + 'o there' '' 'and enter the required details in the form.' '' 'MasterCard / EuroCard and Visa accepted.') ParentFont = False ReadOnly = True TabOrder = 0 end object Panel8: TPanel Left = 295 Top = 168 Width = 113 Height = 57 BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel6' TabOrder = 1 object Memo14: TMemo Left = 8 Top = 8 Width = 97 Height = 41 BorderStyle = bsNone Color = clBtnFace Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Please e-mail, fax or' 'call for site licenses ' 'and discounts.') ParentFont = False TabOrder = 0 end end object Button2: TButton Left = 15 Top = 48 Width = 226 Height = 27 Caption = 'https://www.futurefx.com/hace.us/register/' TabOrder = 2 OnClick = Button2Click end end object TabSheet5: TTabSheet Caption = 'RegNet' object Memo3: TMemo Left = 16 Top = 0 Width = 385 Height = 233 TabStop = False BorderStyle = bsNone Color = clBtnFace Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '' 'This program can be registered online for 24.50 USD through RegN' + 'et at: ' '' ' http://www.swregnet.com/542p.htm < Click to go there' '' 'or by calling 1 800 WWW2REG (1 800 999-2734) or (805) 288-1827.' '' 'All major credit cards accepted. PowerDREAM has the' + ' RegNet #: 542' '' 'Cash, checks or money orders are also accepted through RegNet. T' + 'hey must ' 'be in U.S. dollars (drawn on a U.S. bank) and made payable to Wi' + 'ntronix, Inc. ' 'The mailing address is:' '' 'RegNet (Wintronix, Inc.)' '21200 Trumpet Drive #201' 'Santa Clarita, CA 91321-4441') ParentFont = False ReadOnly = True TabOrder = 0 end object Panel6: TPanel Left = 295 Top = 168 Width = 113 Height = 57 BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel6' TabOrder = 1 object Memo7: TMemo Left = 8 Top = 8 Width = 97 Height = 41 BorderStyle = bsNone Color = clBtnFace Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Please e-mail, fax or' 'call for site licenses ' 'and discounts.') ParentFont = False TabOrder = 0 end end object Button1: TButton Left = 15 Top = 35 Width = 202 Height = 27 Caption = ' http://www.swregnet.com/542p.htm' TabOrder = 2 OnClick = Button1Click end object Panel7: TPanel Left = 10 Top = 125 Width = 331 Height = 17 Alignment = taRightJustify BevelOuter = bvNone Caption = 'Cash, checks or money orders are also accepted through RegNet. ' Font.Color = clPurple Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 end end object TabSheet1: TTabSheet Caption = 'E-mail' object Memo1: TMemo Left = 16 Top = 0 Width = 385 Height = 233 TabStop = False BorderStyle = bsNone Color = clBtnFace Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '' 'Credit card registrations may be sent by e-mail to the address b' + 'elow. The ' 'amount of 130 NKr (approx 20 USD or 13 GBP) will then be charged' + ' to your ' 'card for each of the copies you want registered. Registration de' + 'tails will then ' 'be returned to you as soon as possible.' '' 'MasterCard / EuroCard and Visa accepted.' '' 'Card details should include:' ' Name as seen on card' ' Credit card number' ' Expiration date of card' '' '' '' 'e-mail address: eirhanse@online.no') ParentFont = False ReadOnly = True TabOrder = 0 end object Panel2: TPanel Left = 295 Top = 168 Width = 113 Height = 57 BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel2' TabOrder = 1 object Memo9: TMemo Left = 8 Top = 8 Width = 97 Height = 41 BorderStyle = bsNone Color = clBtnFace Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Please e-mail, fax or' 'call for site licenses ' 'and discounts.') ParentFont = False TabOrder = 0 end end end object TabSheet2: TTabSheet Caption = 'Fax/Phone' object Memo2: TMemo Left = 16 Top = 0 Width = 385 Height = 233 TabStop = False BorderStyle = bsNone Color = clBtnFace Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '' 'Credit card registrations can be faxed to the number below. The ' + 'amount of 130 ' 'NKr (approx 20 USD or 13 GPB) will then be charged to your card ' + 'for each of ' 'the copies you want registered. Registration details will then b' + 'e returned to ' 'you as soon as possible.' '' 'MasterCard / EuroCard and Visa accepted.' '' 'Card details should include:' ' Name as seen on card' ' Credit card number' ' Expiration date of card' ' Signature of card holder' '' '' 'Fax/Phone: +47 769 42700 (Fax is a 24 hour service)') ParentFont = False ReadOnly = True TabOrder = 0 end object Panel3: TPanel Left = 295 Top = 168 Width = 113 Height = 57 BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel3' TabOrder = 1 object Memo4: TMemo Left = 8 Top = 8 Width = 97 Height = 41 BorderStyle = bsNone Color = clBtnFace Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Please e-mail, fax or' 'call for site licenses ' 'and discounts.') ParentFont = False TabOrder = 0 end end end object TabSheet3: TTabSheet Caption = 'SWIFT' object Memo8: TMemo Left = 16 Top = 1 Width = 385 Height = 225 TabStop = False BorderStyle = bsNone Color = clBtnFace Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '' 'You can register by means of the bank-to-bank SWIFT method. Have' + ' your ' 'bank transfer the amount of 130 Norwegian Kroner (approx 20 USD ' + 'or 13 ' 'GBP) to the account below for each copy you want registered. Use' + ' the ' 'following information:' '' 'Norlandsbanken NOBANO22' 'Acc: 8987 10 48275' ' HACE / Eirik Hansen' ' Industrivn.12' ' 8500 Narvik' ' Norway' '' 'When my bank informs me of the transaction I will ' 'send you registration details as soon as I can by ' 'e-mail if possible, or ordinary post.') ParentFont = False ReadOnly = True TabOrder = 1 end object Panel4: TPanel Left = 295 Top = 168 Width = 113 Height = 57 BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel4' TabOrder = 0 object Memo5: TMemo Left = 8 Top = 8 Width = 97 Height = 41 BorderStyle = bsNone Color = clBtnFace Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Please e-mail, fax or' 'call for site licenses ' 'and discounts.') ParentFont = False TabOrder = 0 end end end object TabSheet4: TTabSheet Caption = 'Purchase Order' object Memo10: TMemo Left = 16 Top = 0 Width = 385 Height = 233 TabStop = False BorderStyle = bsNone Color = clBtnFace Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '' 'Purchase orders are available to larger companies. They can be e' + '-mailed, ' 'faxed of phoned. Please use the order-form provided in the file ' + 'Order.txt. ' 'Remember to include a purchase order number.' '' 'E-mail: eirhanse@online.no' '' 'Fax/Phone: (+47) 769 42700') ParentFont = False ReadOnly = True TabOrder = 1 end object Panel5: TPanel Left = 295 Top = 168 Width = 113 Height = 57 BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel5' TabOrder = 0 object Memo6: TMemo Left = 8 Top = 8 Width = 97 Height = 41 BorderStyle = bsNone Color = clBtnFace Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Please e-mail, fax or' 'call for site licenses ' 'and discounts.') ParentFont = False TabOrder = 0 end end end end end