object Form_registration: TForm_registration Left = 451 Top = 117 BorderStyle = bsDialog Caption = 'Dr. Hardware Bestell- und Registrier-Assistent' ClientHeight = 368 ClientWidth = 520 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 10 Top = 316 Width = 501 Height = 2 end object DBText2: TDBText Left = 254 Top = 26 Width = 29 Height = 17 DataField = 'PRICE_DM_STD' DataSource = MainForm.DS_REGDATA end object DBText3: TDBText Left = 298 Top = 26 Width = 31 Height = 17 DataField = 'PRICE_EURO_STD' DataSource = MainForm.DS_REGDATA end object Label55: TLabel Left = 286 Top = 26 Width = 5 Height = 13 Caption = '/' end object BitBtn_reg_back: TBitBtn Left = 262 Top = 328 Width = 77 Height = 25 Caption = '<< &Zur�ck' Enabled = False TabOrder = 0 OnClick = BitBtn_reg_backClick end object BitBtn_reg_forward: TBitBtn Left = 342 Top = 328 Width = 77 Height = 25 Caption = '&Weiter >>' TabOrder = 1 OnClick = BitBtn_reg_forwardClick end object BitBtn_reg_cancel: TBitBtn Left = 118 Top = 328 Width = 97 Height = 25 Caption = '&Abbrechen' TabOrder = 2 OnClick = BitBtn_reg_cancelClick Kind = bkCancel end object BitBtn_reg_finish: TBitBtn Left = 434 Top = 328 Width = 77 Height = 25 Caption = '&Fertigstellen' Enabled = False TabOrder = 3 OnClick = BitBtn_reg_finishClick end object ExtPageControl_regform: TPageControl Left = 10 Top = 6 Width = 503 Height = 305 ActivePage = TabSheet_reg_options TabOrder = 4 OnChange = ExtPageControl_regformChange object TabSheet_reg_sel: TTabSheet Caption = 'Select' object LabelRegSelectTitle: TLabel Left = 12 Top = 12 Width = 280 Height = 24 Caption = 'Bitte w�hlen Sie eine Option' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object RadioGroup_reg_sel: TRadioGroup Left = 16 Top = 52 Width = 455 Height = 61 Caption = 'Optionen' ItemIndex = 0 Items.Strings = ( 'Bestellung aufgeben' 'Freischalten der Sharewareversion mit erworbenem Zahlenschl�ssel') TabOrder = 0 OnClick = RadioGroup_reg_selClick end object PanelRegTrialHint: TPanel Left = 16 Top = 130 Width = 455 Height = 95 BevelOuter = bvNone TabOrder = 1 Visible = False object LabelRegTrialOver: TLabel Left = 12 Top = 6 Width = 427 Height = 26 Caption = 'Ihre Pr�f-vor-Kauf-Frist ist abgelaufen. Um das Programm weitern' + 'utzen zu k�nnen, m�ssen Sie die Vollversion erwerben. Der Assist' + 'ent hilft Ihnen jetzt beim Aufgeben der Bestellung.' WordWrap = True end object LabelRegTrialHint: TLabel Left = 12 Top = 50 Width = 429 Height = 39 AutoSize = False Caption = 'Hinweis: Da die Testphase um mehr als 10 Tage �berschritten wurd' + 'e, sind die Analysen jetzt gesperrt. Nach erfolgter Freischaltu' + 'ng werden die Analysen sofort wieder freigegeben!' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end end end object TabSheet_reg_unlock: TTabSheet Caption = 'Freisch.' TabVisible = False object LabelRegUnlockTitle: TLabel Left = 12 Top = 12 Width = 124 Height = 24 Caption = 'Freischalten' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegUnlockEnterKey: TLabel Left = 58 Top = 60 Width = 405 Height = 13 Caption = 'Geben Sie bitte Ihren Registrier- und ggf. zus�tzlich den Mehrpl' + 'atzlizenz-Schl�ssel ein:' end object LabelRegUnlockHint: TLabel Left = 16 Top = 102 Width = 435 Height = 23 AutoSize = False Caption = 'Geben Sie den/die Schl�ssel linksb�ndig ein - f�hrende Leerstell' + 'en sind nicht erlaubt.' WordWrap = True end object Image3: TImage Left = 16 Top = 48 Width = 37 Height = 25 Picture.Data = {} end object LabelRegUnlockOldKeyHint: TLabel Left = 18 Top = 224 Width = 451 Height = 47 AutoSize = False Caption = 'Ggf. k�nnen Sie diese Version mit dem Registrierschl�ssel aus ei' + 'ner fr�heren Voll-Version freischalten. Rufen Sie dazu den Freis' + 'chalten-Dialog der fr�heren Version auf und �bertragen Sie den S' + 'chl�ssel in obiges Feld. ' WordWrap = True end object DBEditRegKey: TDBEdit Left = 16 Top = 78 Width = 237 Height = 21 DataField = 'REGKEY' DataSource = MainForm.DS_REGKEY MaxLength = 14 TabOrder = 0 end object PanelRegKeySuccess: TPanel Left = 12 Top = 126 Width = 465 Height = 99 BevelOuter = bvNone TabOrder = 2 Visible = False object LabelRegUnlockSuccess: TLabel Left = 4 Top = 4 Width = 221 Height = 13 Caption = 'Freischaltung erfolgreich durchgef�hrt!' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object LabelRegUnlockSaveKey: TLabel Left = 34 Top = 24 Width = 411 Height = 27 AutoSize = False Caption = 'Heben Sie diesen Schl�ssel gut auf. Sie k�nnen damit auch eine R' + 'eihe von Folgeupdates freischalten. N�heres in der Programmhilfe' + '.' WordWrap = True end object Image7: TImage Left = 6 Top = 28 Width = 19 Height = 17 Picture.Data = {} Transparent = True end object LabelRegUnlockRestart: TLabel Left = 34 Top = 54 Width = 411 Height = 45 AutoSize = False Caption = 'Hinweis: Die komplette Initialisierung aller Vollversions-Featur' + 'es erfolgt nach dem n�chsten Programmstart. Sie sollten das Pro' + 'gramm daher jetzt beenden und danach neu starten.' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end end object BtnRegUnlock: TButton Left = 386 Top = 78 Width = 77 Height = 21 Caption = 'F&reischalten!' TabOrder = 1 OnClick = BtnRegUnlockClick end object DBEditRegKeySite: TDBEdit Left = 260 Top = 78 Width = 117 Height = 21 DataField = 'REGKEYSITE' DataSource = MainForm.DS_REGKEY MaxLength = 14 TabOrder = 3 end end object TabSheet_reg_orderinfo: TTabSheet Caption = 'Info' TabVisible = False object LabelRegInfoThanks: TLabel Left = 10 Top = 48 Width = 459 Height = 41 AutoSize = False Caption = 'Vielen Dank f�r Ihren Entschluss, das Programm Dr. Hardware zu ' + 'registrieren. Sie ben�tigen hierf�r lediglich einen Zahlenschl�s' + 'sel, mit dem Sie diese Sharewareversion freischalten, d.h. in ei' + 'ne Vollversion umwandeln k�nnen.' WordWrap = True end object LabelRegInfoTitle: TLabel Left = 12 Top = 12 Width = 115 Height = 24 Caption = 'Information' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegInfoPrice: TLabel Left = 10 Top = 90 Width = 121 Height = 13 Caption = 'Preis: ab 19,95 Euro!' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object BevelRegInfoCDV: TBevel Left = 6 Top = 154 Width = 479 Height = 2 end object Image5: TImage Left = 10 Top = 112 Width = 19 Height = 17 Picture.Data = {} Transparent = True end object LabelRegInfoUpdates: TLabel Left = 34 Top = 110 Width = 411 Height = 27 AutoSize = False Caption = 'Mit Ihrem Registrierschl�ssel k�nnen Sie �brigens auch eine Reih' + 'e zuk�nftiger Programmupdates kostenlos freischalten! Ein Grund ' + 'mehr, jetzt zu bestellen!' WordWrap = True end object GroupBoxRegInfoCDV: TGroupBox Left = 10 Top = 170 Width = 469 Height = 97 Caption = 'Dr. Hardware auf CD-ROM' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Label2: TLabel Left = 38 Top = 14 Width = 429 Height = 17 AutoSize = False Caption = 'Die Standardversion (f�r Windows 95/98/Me/XP Home Ed.) gibt�s au' + 'ch auf CD-ROM bei:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Image4: TImage Left = 8 Top = 16 Width = 19 Height = 17 Picture.Data = {} Transparent = True end object Label3: TLabel Left = 256 Top = 78 Width = 125 Height = 13 Caption = '(Artikelnummer: CDR7059)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 256 Top = 60 Width = 60 Height = 13 Cursor = crHandPoint Alignment = taRightJustify Caption = 'www.cdv.de' Font.Charset = DEFAULT_CHARSET Font.Color = clGreen Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False OnClick = Label4Click end object Memo1: TMemo Left = 50 Top = 34 Width = 163 Height = 41 BorderStyle = bsNone Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'CDV Software Entertainment AG' 'Neureuter Str. 37b' '76185 Karlsruhe') ParentColor = True ParentFont = False TabOrder = 0 end object Memo2: TMemo Left = 254 Top = 32 Width = 201 Height = 31 BorderStyle = bsNone Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Tel/Fax : 0721-97224-0 / 0721-97224-24' 'eMail : mail@cdv.de' 'Internet : www.cdv.de') ParentColor = True ParentFont = False TabOrder = 1 end end end object TabSheet_reg_options: TTabSheet Caption = 'Options' TabVisible = False object LabelRegOrderwayTitle: TLabel Left = 8 Top = 12 Width = 271 Height = 24 Caption = 'W�hlen Sie den Bestellweg' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegOrderwayOptions: TLabel Left = 8 Top = 44 Width = 471 Height = 45 AutoSize = False Caption = 'Bestellen Sie nach Belieben entweder direkt online im Internet o' + 'der aber per Post, telefonisch oder per Fax. Zahlen Sie bequem p' + 'er Kreditkarte, Verrechnungsscheck oder Voraus�berweisung. Konze' + 'rne und Beh�rden werden auch gegen Rechnung beliefert.' WordWrap = True end object LabelRegOrderwayShareit: TLabel Left = 130 Top = 88 Width = 343 Height = 53 AutoSize = False Caption = 'Ihre Bestellung richten Sie je nach Zahlweise/Bestellweg entwede' + 'r direkt an Gebhard Sofware oder an die Firma ShareIt!, den nati' + 'onal und international t�tigen professionellen Registrierservice' + '. Der Bestellassistent w�hlt automatisch die korrekte Adresse!' WordWrap = True end object ImageRegShareit: TImage Left = 7 Top = 91 Width = 111 Height = 38 Picture.Data = {} end object LabelRegOrderwaySiteLicence: TLabel Left = 54 Top = 150 Width = 414 Height = 27 AutoSize = False Caption = 'Mengenlizenz-Bestellungen (ab 5 Lizenzen) richten Sie unabh�ngig' + ' von der Zahlweise stets direkt an Gebhard Software. ' WordWrap = True end object LabelRegOrderwayException: TLabel Left = 8 Top = 150 Width = 40 Height = 13 Caption = 'Hinweis:' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LabelRegOptionsRegSoft: TLabel Left = 6 Top = 94 Width = 120 Height = 24 Caption = 'RegSoft.com' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False end object RadioGroup_reg_orderoptions: TRadioGroup Left = 8 Top = 186 Width = 457 Height = 73 Caption = 'W�hlen Sie eine Bestelloption... ' ItemIndex = 0 Items.Strings = ( 'Online-Bestellung im Internet auf der Webseite von ShareIt! bzw.' + ' Gebhard Software' 'schriftliche Bestellung (Post/Fax - Bestellformular auf der n�' + 'chsten Seite)' 'telefonisch bei ShareIt! (nicht bei Mengenlizenzbestellungen ab ' + '5 St�ck)') TabOrder = 0 end end object TabSheet_reg_ordonline: TTabSheet Caption = 'Internet' TabVisible = False object LabelRegInternetTitle: TLabel Left = 8 Top = 12 Width = 206 Height = 24 Caption = 'Bestellen im Internet' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegInternetHint: TLabel Left = 8 Top = 56 Width = 461 Height = 49 AutoSize = False Caption = 'Ein Klick auf die Schaltfl�che unterhalb dieses Textes startet I' + 'hren Internet-Browser und f�hrt Sie zu den Bestelloptionen auf u' + 'nserer Homepage! Von dort aus k�nnen Sie direkt zu den ShareIt!-' + 'Bestellseiten weitersurfen.' WordWrap = True end object LabelRegInternetURL: TLabel Left = 10 Top = 172 Width = 191 Height = 13 Caption = 'http://www.drhardware.de/pghgbstl.htm' end object BitBtnRegInternet: TBitBtn Left = 10 Top = 120 Width = 269 Height = 45 Caption = 'Internet-Verbindung aufbauen!' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ModalResult = 6 ParentFont = False TabOrder = 0 OnClick = BitBtnRegInternetClick NumGlyphs = 2 end end object TabSheet_reg_form: TTabSheet Caption = 'Formular' TabVisible = False object LabelRegFormTitle: TLabel Left = 8 Top = 12 Width = 216 Height = 24 Caption = 'Pers�nliche Angaben' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegFormEnterData: TLabel Left = 8 Top = 50 Width = 211 Height = 13 Caption = 'Tragen Sie bitte Ihre pers�nlichen Daten ein!' end object Panel1: TPanel Left = 12 Top = 78 Width = 475 Height = 185 BevelOuter = bvLowered TabOrder = 0 object Label_reg_form_name: TLabel Left = 52 Top = 20 Width = 58 Height = 13 Alignment = taRightJustify Caption = 'Name/Firma' FocusControl = DBEditRegFormName end object Label_reg_form_co: TLabel Left = 10 Top = 48 Width = 99 Height = 13 Alignment = taRightJustify Caption = 'ggf. Ansprechpartner' FocusControl = DBEditRegFormName_co end object Label_reg_form_street: TLabel Left = 30 Top = 74 Width = 78 Height = 13 Alignment = taRightJustify Caption = 'Stra�e/Postfach' FocusControl = DBEditRegFormStreetPobox end object Label_reg_form_city: TLabel Left = 16 Top = 100 Width = 95 Height = 13 Alignment = taRightJustify Caption = 'Land/PLZ/Wohnort' FocusControl = DBEditRegFormCountry end object Label_reg_form_telfax: TLabel Left = 50 Top = 126 Width = 58 Height = 13 Alignment = taRightJustify Caption = 'Telefon/Fax' FocusControl = DBEditRegFormTel end object Label_reg_form_email: TLabel Left = 42 Top = 152 Width = 66 Height = 13 Alignment = taRightJustify Caption = 'eMail-Adresse' FocusControl = DBEditRegFormEmail end object DBEditRegFormName: TDBEdit Left = 116 Top = 18 Width = 353 Height = 21 DataField = 'NAME' DataSource = MainForm.DS_REGDATA TabOrder = 0 end object DBEditRegFormName_co: TDBEdit Left = 116 Top = 44 Width = 353 Height = 21 DataField = 'NAME_CO' DataSource = MainForm.DS_REGDATA TabOrder = 1 end object DBEditRegFormStreetPobox: TDBEdit Left = 116 Top = 70 Width = 353 Height = 21 DataField = 'STREET_POBOX' DataSource = MainForm.DS_REGDATA TabOrder = 2 end object DBEditRegFormPostalcode: TDBEdit Left = 142 Top = 96 Width = 59 Height = 21 DataField = 'POSTALCODE' DataSource = MainForm.DS_REGDATA TabOrder = 4 end object DBEditRegFormCity: TDBEdit Left = 204 Top = 96 Width = 265 Height = 21 DataField = 'CITY' DataSource = MainForm.DS_REGDATA TabOrder = 5 end object DBEditRegFormCountry: TDBEdit Left = 116 Top = 96 Width = 23 Height = 21 DataField = 'COUNTRY' DataSource = MainForm.DS_REGDATA TabOrder = 3 end object DBEditRegFormTel: TDBEdit Left = 116 Top = 122 Width = 169 Height = 21 DataField = 'TEL' DataSource = MainForm.DS_REGDATA TabOrder = 6 end object DBEditRegFormFax: TDBEdit Left = 290 Top = 122 Width = 179 Height = 21 DataField = 'FAX' DataSource = MainForm.DS_REGDATA TabOrder = 7 end object DBEditRegFormEmail: TDBEdit Left = 116 Top = 148 Width = 353 Height = 21 DataField = 'EMAIL' DataSource = MainForm.DS_REGDATA TabOrder = 8 end end end object TabSheet_reg_ordphone: TTabSheet Caption = 'telef.' TabVisible = False object LabelRegTelHint: TLabel Left = 18 Top = 52 Width = 452 Height = 13 Caption = 'Bestellen Sie Ihren Registrierschl�ssel bei ShareIt! telefonisch' + ' bitte unter der folgenden Nummer:' end object Image2: TImage Left = 52 Top = 84 Width = 37 Height = 41 Picture.Data = {} end object LabelRegTelNumber: TLabel Left = 108 Top = 92 Width = 165 Height = 26 Caption = '0221-31088-20 ' Font.Charset = DEFAULT_CHARSET Font.Color = clGreen Font.Height = -23 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Bevel2: TBevel Left = 14 Top = 136 Width = 467 Height = 137 end object LabelRegTelPrognumbers: TLabel Left = 20 Top = 148 Width = 363 Height = 13 Caption = 'Beziehen Sie sich bei Ihrer Bestellung bitte auf folgende Progra' + 'mm-Nummern:' end object LabelRegTelTitle: TLabel Left = 12 Top = 12 Width = 242 Height = 24 Caption = 'Telefonische Bestellung' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object TLabel Left = 76 Top = 196 Width = 300 Height = 13 Caption = 'Dr. Hardware 2002 Professional f. Win 9x/Me/XP Home Edition' end object Label26: TLabel Left = 76 Top = 220 Width = 307 Height = 13 Caption = 'Dr. Hardware 2002 Professional f. Win NT/2000/XP Prof. Edition' end object Label76: TLabel Left = 76 Top = 244 Width = 346 Height = 13 Caption = 'Dr. Hardware 2002 Premium f. Win 9x/NT/2000/XP Home + Prof. Edit' + 'ion' end object Label77: TLabel Left = 76 Top = 172 Width = 286 Height = 13 Caption = 'Dr. Hardware 2002 Standard f. Win 9x/Me/XP Home Edition' end object DBEditRegShareitNoStd: TDBEdit Left = 20 Top = 168 Width = 53 Height = 21 Color = clBtnFace DataField = 'SHAREITNO_STD' DataSource = MainForm.DS_REGDATA TabOrder = 0 end object DBEditRegShareitNoPro9x: TDBEdit Left = 20 Top = 192 Width = 53 Height = 21 Color = clBtnFace DataField = 'SHAREITNO_PRO9X' DataSource = MainForm.DS_REGDATA TabOrder = 1 end object DBEditRegShareitNoProNT: TDBEdit Left = 20 Top = 216 Width = 53 Height = 21 Color = clBtnFace DataField = 'SHAREITNO_PRONT' DataSource = MainForm.DS_REGDATA TabOrder = 2 end object DBEditRegShareitNoPremium: TDBEdit Left = 20 Top = 240 Width = 53 Height = 21 Color = clBtnFace DataField = 'SHAREITNO_PREMIUM' DataSource = MainForm.DS_REGDATA TabOrder = 3 end object PanelRegTelUS: TPanel Left = 296 Top = 68 Width = 185 Height = 61 TabOrder = 4 object LabelRegTelUS: TLabel Left = 6 Top = 2 Width = 145 Height = 28 Caption = 'For US/Canada customers only! Toll free number:' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False WordWrap = True end object Label1: TLabel Left = 5 Top = 29 Width = 110 Height = 28 Caption = '1-877-RegSoft.com or 1-877-734-7638' Font.Charset = ANSI_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False WordWrap = True end end end object TabSheet_reg_done: TTabSheet Caption = 'Schluss' TabVisible = False object LabelRegFinalTitle: TLabel Left = 12 Top = 12 Width = 224 Height = 24 Caption = 'Hinweise zum Schluss' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegFinalUnlockHint: TLabel Left = 12 Top = 50 Width = 457 Height = 45 AutoSize = False Caption = 'Haben Sie Ihren Schl�ssel erhalten, starten Sie diesen Assistent' + 'en erneut und verzweigen dieses mal auf die Freischaltseite. Dor' + 't tragen Sie den Nummerncode ein, die Version ist damit freigesc' + 'haltet.' WordWrap = True end object LabelRegFinalSaveKey: TLabel Left = 10 Top = 104 Width = 454 Height = 39 Caption = 'Bewahren Sie Ihren Registrierschl�ssel f�r neue Versionen gut a' + 'uf. Die jeweils neueste Sharewareversion erhalten Sie von unsere' + 'r Homepage, aus der Mailbox oder von der Begleit-CD eines PC-Mag' + 'azins.' WordWrap = True end object LabelRegFinalQuerySurf: TLabel Left = 152 Top = 180 Width = 315 Height = 29 AutoSize = False Caption = 'Wollen Sie jetzt sofort zu unserer Homepage surfen? Dann klicken' + ' Sie auf die Schaltfl�che.' WordWrap = True end object LabelRegFinalURL: TLabel Left = 152 Top = 208 Width = 212 Height = 13 Caption = 'Internet-Adresse: http://www.drhardware.de' Font.Charset = DEFAULT_CHARSET Font.Color = clGreen Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object BitBtnRegFinalHomepage: TBitBtn Left = 12 Top = 180 Width = 125 Height = 29 Caption = 'Zur Homepage' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = BitBtnRegFinalHomepageClick end end object TabSheet_reg_formales: TTabSheet Caption = 'Formales' TabVisible = False object LabelRegFormalesTitle: TLabel Left = 8 Top = 12 Width = 188 Height = 24 Caption = 'Bestellformalit�ten' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegFormalesRechnungHint: TLabel Left = 8 Top = 198 Width = 185 Height = 71 AutoSize = False Caption = 'Lieferung gegen Rechnung erfolgt nur an Beh�rden, �ffentl. Insti' + 'tutionen und Grossfirmen. Offizielle Bestellung mit Angabe des A' + 'nsprechpartners und Firmen/Beh�rdenstempel erforderlich! ' WordWrap = True end object LabelRegFormalesRechnungHintTitle: TLabel Left = 8 Top = 186 Width = 40 Height = 13 Caption = 'Hinweis!' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object GroupBoxRegFormalesCreditCard: TGroupBox Left = 200 Top = 48 Width = 291 Height = 129 Caption = 'Angaben zur Kreditkarte' TabOrder = 1 object LabelRegFormalesCCardOwner: TLabel Left = 12 Top = 44 Width = 66 Height = 13 Caption = 'Karteninhaber' end object LabelRegFormalesCCardNumber: TLabel Left = 12 Top = 68 Width = 48 Height = 13 Caption = 'Karten-Nr.' end object LabelRegFormalesCCardValid: TLabel Left = 12 Top = 92 Width = 43 Height = 13 Caption = 'G�ltig bis' end object LabelRegFormalesCCardName: TLabel Left = 12 Top = 20 Width = 57 Height = 13 Caption = 'Kartenname' end object DBComboBoxRegCcardSel: TDBComboBox Left = 92 Top = 16 Width = 191 Height = 21 DataField = 'CCARD_NAME' DataSource = MainForm.DS_REGDATA ItemHeight = 13 Items.Strings = ( 'Eurocard/Mastercard' 'VISA' 'American Express' 'Diners Club') TabOrder = 0 end object DBEditRegCCardOwner: TDBEdit Left = 92 Top = 40 Width = 191 Height = 21 DataField = 'CCARD_OWNER' DataSource = MainForm.DS_REGDATA TabOrder = 1 end object DBEditRegCCardNumber: TDBEdit Left = 92 Top = 64 Width = 191 Height = 21 DataField = 'CCARD_NUMBER' DataSource = MainForm.DS_REGDATA TabOrder = 2 end object DBEditRegCCardValid: TDBEdit Left = 92 Top = 88 Width = 191 Height = 21 DataField = 'CCARD_VALID' DataSource = MainForm.DS_REGDATA TabOrder = 3 end end object DBRadioGroupRegFormalesPayway: TDBRadioGroup Left = 6 Top = 48 Width = 187 Height = 129 Caption = 'Zahlweise' DataField = 'PAYBY' DataSource = MainForm.DS_REGDATA Items.Strings = ( 'Kreditkarte' 'Verrechnungsscheck anbei' 'Voraus�berweisung' 'Bargeld anbei' 'Rechnung (Konzerne, Beh�rden)') TabOrder = 0 end object GroupBoxRegFormalesKeySendway: TGroupBox Left = 200 Top = 186 Width = 291 Height = 81 Caption = 'Wie wollen Sie Ihren Reg.-Schl�ssel erhalten?' TabOrder = 2 object DBComboBoxRegSendWay: TDBComboBox Left = 94 Top = 28 Width = 187 Height = 21 DataField = 'SENDWAY' DataSource = MainForm.DS_REGDATA ItemHeight = 13 Items.Strings = ( 'per eMail' 'per Post' 'per Fax') TabOrder = 0 end end end object TabSheet_reg_realtimeorder: TTabSheet Caption = 'Echtzeit' ImageIndex = 10 TabVisible = False object LabelRegRealTimeTitle: TLabel Left = 8 Top = 12 Width = 164 Height = 24 Caption = 'Real-Time-Order' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegFormalesRealtimeHint: TLabel Left = 62 Top = 56 Width = 401 Height = 47 AutoSize = False Caption = 'Echtzeit ist "in"! Sie k�nnen jetzt im Internet per Kreditkarte ' + 'bestellen und erhalten die Ware - m.a.W. Ihren Registrierschl�ss' + 'el - sofort anschlie�end per eMail zugestellt!!' WordWrap = True end object Image6: TImage Left = 16 Top = 58 Width = 31 Height = 30 Picture.Data = {} end object LabelRegFormalesRealtime2Min: TLabel Left = 60 Top = 102 Width = 395 Height = 43 AutoSize = False Caption = 'Dank Echtzeit-Autorisierung Ihrer Daten dauert es - wenn nichts ' + 'schiefgeht - dann meistens nur 2-3 Minuten, bis der Registriersc' + 'hl�ssel per eMail an Sie auf die Reise geht!' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object LabelRegFormalesRealtimeOnlyCCard: TLabel Left = 60 Top = 176 Width = 395 Height = 47 AutoSize = False Caption = 'Wichtig! Dieser Service kann nur bei Internet-Bestellung mit Kre' + 'ditkarte in Anspruch genommen werden. Klicken Sie jetzt bitte au' + 'f . Der Assistent f�hrt Sie zu den Bestelloptionen...' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Bevel5: TBevel Left = 60 Top = 160 Width = 397 Height = 2 end end object TabSheet_reg_pieces: TTabSheet Caption = 'Was' ImageIndex = 12 object LabelRegOrderwhatTitle: TLabel Left = 8 Top = 6 Width = 156 Height = 24 Caption = 'Bestellangaben' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object LabelRegOrderwhatHint: TLabel Left = 8 Top = 36 Width = 477 Height = 19 AutoSize = False Caption = 'Bitte tragen Sie nun ein, f�r welches Produkt Sie einen Registri' + 'erschl�ssel bestellen m�chten. ' WordWrap = True end object LabelRegUpdateOrder: TLabel Left = 9 Top = 58 Width = 468 Height = 17 AutoSize = False Caption = 'Preisvorteil !! U.a. Preise sind reduziert, da Sie als Nutzer ei' + 'ner Vollversion updateberechtigt sind!' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object GroupBoxRegOrderwhatFillout: TGroupBox Left = 6 Top = 80 Width = 385 Height = 193 Caption = 'Bitte ausf�llen' TabOrder = 0 object TLabel Left = 16 Top = 76 Width = 213 Height = 13 Caption = 'Professional . f. Win 9x/Me/XP Home Edition' end object Label49: TLabel Left = 16 Top = 100 Width = 214 Height = 13 Caption = 'Professional f. Win NT/2000/XP Prof. Edition' end object Label50: TLabel Left = 16 Top = 124 Width = 231 Height = 13 Caption = 'Premium f. Win 9x/NT/2000/XP Home+Prof. Ed.' end object Label51: TLabel Left = 16 Top = 52 Width = 198 Height = 13 Caption = 'Standard f. Win 9x//Me/XP Home Edition' end object LabelRegOrderwhatPcs: TLabel Left = 338 Top = 20 Width = 33 Height = 13 Caption = 'Menge' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LabelRegOrderwhatPrice: TLabel Left = 258 Top = 8 Width = 61 Height = 27 AutoSize = False Caption = 'Einzelpreis Euro' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object Bevel6: TBevel Left = 8 Top = 146 Width = 367 Height = 2 end object LabelRegOrderwhatProduct: TLabel Left = 14 Top = 20 Width = 156 Height = 13 Caption = 'Produkt (Dr. Hardware Version...)' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Shape1: TShape Left = 13 Top = 39 Width = 362 Height = 1 end object DBTextRegPriceEuroBaseSum: TDBText Left = 260 Top = 153 Width = 53 Height = 16 DataField = 'BASESUM_EURO' DataSource = MainForm.DS_REGDATA Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Shape2: TShape Left = 249 Top = 173 Width = 90 Height = 1 end object LabelRegOrderwhatSum: TLabel Left = 254 Top = 174 Width = 60 Height = 13 Caption = 'Summe Euro' end object LabelRegOrderwhatMwst: TLabel Left = 15 Top = 154 Width = 156 Height = 13 AutoSize = False Caption = 'Alle Preise incl. Mehrwertsteuer' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object DBEditRegPcsPro9x: TDBEdit Left = 336 Top = 72 Width = 39 Height = 21 DataField = 'PCS_PRO9X' DataSource = MainForm.DS_REGDATA TabOrder = 1 end object DBEditRegPcsProNT: TDBEdit Left = 336 Top = 96 Width = 39 Height = 21 DataField = 'PCS_PRONT' DataSource = MainForm.DS_REGDATA TabOrder = 2 end object DBEditRegPcsPremium: TDBEdit Left = 336 Top = 120 Width = 39 Height = 21 DataField = 'PCS_PREMIUM' DataSource = MainForm.DS_REGDATA TabOrder = 3 end object DBEditRegPcsStandard: TDBEdit Left = 336 Top = 48 Width = 39 Height = 21 DataField = 'PCS_STD' DataSource = MainForm.DS_REGDATA TabOrder = 0 end object Panel2: TPanel Left = 254 Top = 50 Width = 75 Height = 19 BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 object DBTextRegPriceEuroStandard: TDBText Left = 4 Top = 1 Width = 53 Height = 19 DataField = 'PRICE_EURO_STD' DataSource = MainForm.DS_REGDATA end end object Panel3: TPanel Left = 254 Top = 74 Width = 75 Height = 19 BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 object DBTextRegPriceEuroPro9x: TDBText Left = 4 Top = 1 Width = 51 Height = 19 DataField = 'PRICE_EURO_PRO' DataSource = MainForm.DS_REGDATA end end object Panel4: TPanel Left = 254 Top = 98 Width = 75 Height = 19 BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 7 object DBTextRegPriceEuroProNT: TDBText Left = 4 Top = 1 Width = 49 Height = 19 DataField = 'PRICE_EURO_PRO' DataSource = MainForm.DS_REGDATA end end object Panel5: TPanel Left = 254 Top = 122 Width = 75 Height = 19 BevelOuter = bvNone Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 8 object DBTextRegPriceEuroPremium: TDBText Left = 4 Top = 1 Width = 51 Height = 19 DataField = 'PRICE_EURO_PREMIUM' DataSource = MainForm.DS_REGDATA end end object BitBtnRegCalcBaseSum: TBitBtn Left = 342 Top = 156 Width = 33 Height = 29 Hint = 'Gesamtsumme berechnen' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = BitBtnRegCalcBaseSumClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF733333700000000073333337777777773333} NumGlyphs = 2 end end object GroupBoxOrderVersionInfo: TGroupBox Left = 398 Top = 80 Width = 95 Height = 193 Hint = 'Gesamtsumme berechnen' Caption = 'Versions-Info' ParentShowHint = False ShowHint = True TabOrder = 1 object LabelRegOrderwhatProDiff: TLabel Left = 6 Top = 26 Width = 84 Height = 143 Caption = 'Zus�tze der Professional und Premium Version: Sensoren- Analyse,' + ' automatische Reports, verl�ngerte kostenlose Update- berechtig' + 'ung' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end end end end end