object SharewareDlg: TSharewareDlg Left = 386 Top = 530 BorderStyle = bsDialog Caption = 'Crazy Bytes - Shareware-Registrierungs-Info' ClientHeight = 339 ClientWidth = 552 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False OnCreate = Create OnDeactivate = Deactivate PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 537 Height = 81 IsControl = True end object Bevel2: TBevel Left = 8 Top = 92 Width = 537 Height = 85 end object Label1: TLabel Left = 52 Top = 44 Width = 485 Height = 41 AutoSize = False Caption = 'Sie haben somit die Gelegenheit, das Programm �ber einen Zeitrau' + 'm von 4 Wochen hindurch ausf�hrlich zu testen. Wenn Ihnen das Pr' + 'ogramm gef�llt und Sie es weiterhin nutzen m�chten, lassen Sie s' + 'ich bitte beim Autor als Anwender registrieren.' WordWrap = True end object progname: TLabel Left = 52 Top = 16 Width = 489 Height = 21 AutoSize = False Caption = 'Crazy Rotary Version 1.95 f�r Win95/NT ist ein Sharewareprogra' + 'mm.' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Image1: TImage Left = 16 Top = 180 Width = 101 Height = 77 Picture.Data = {} end object Label2: TLabel Left = 52 Top = 96 Width = 485 Height = 45 AutoSize = False Caption = 'Senden Sie bitte einen Ausdruck der beigef�gten Datei REGISTER.T' + 'XT per gelber Post an Josef St�ckl, Kundmanngasse 10/9, A-1030 ' + 'Wien oder bestellen Sie per e-mail �ber Compuserve: 106371,1776 ' + 'oder Internet: 106371,1776@compuserve.com.' WordWrap = True end object Image2: TImage Left = 16 Top = 100 Width = 29 Height = 33 Picture.Data = {} end object Image3: TImage Left = 16 Top = 140 Width = 33 Height = 25 Picture.Data = {} end object Bevel4: TBevel Left = 132 Top = 180 Width = 413 Height = 97 end object waskommt: TLabel Left = 140 Top = 184 Width = 401 Height = 41 AutoSize = False Caption = 'Sie bekommen dann umgehend Ihren pers�nlichen Freischaltcode zug' + 'esandt. Sobald Sie diesen Code in das unten stehende Eingabefeld' + ' tippen, wird aus der Sharewareversion die Vollversion ohne jede' + ' Einschr�nkung.' WordWrap = True end object Label4: TLabel Left = 140 Top = 228 Width = 397 Height = 17 AutoSize = False Caption = 'Sie unterst�tzen damit die Entwicklung dieses und anderer Progra' + 'mme.' WordWrap = True end object Label6: TLabel Left = 52 Top = 144 Width = 485 Height = 29 AutoSize = False Caption = '�berweisen Sie den Betrag von DEM/SFR 20,- oder ATS 120,- auf da' + 's Konto 72.240.647 bei der �sterreichischen Postsparkasse, BLZ 0' + '0060000 oder zahlen Sie per Euroscheck oder bar. ' WordWrap = True end object Image4: TImage Left = 12 Top = 12 Width = 37 Height = 37 end object Label8: TLabel Left = 140 Top = 252 Width = 85 Height = 17 AutoSize = False Caption = 'Freischaltcode:' WordWrap = True end object Bevel3: TBevel Left = 48 Top = 32 Width = 493 Height = 5 Shape = bsBottomLine end object Image5: TImage Left = 8 Top = 264 Width = 121 Height = 69 Picture.Data = {} end object Bevel5: TBevel Left = 132 Top = 280 Width = 273 Height = 41 end object Label3: TLabel Left = 140 Top = 284 Width = 261 Height = 17 AutoSize = False Caption = 'Mitglied der Shareware Autoren VEreinigung (SAVE)' WordWrap = True end object Label5: TLabel Left = 140 Top = 300 Width = 261 Height = 17 AutoSize = False Caption = 'Programm CBY 041' WordWrap = True end object Edit1: TEdit Left = 228 Top = 249 Width = 233 Height = 21 CharCase = ecUpperCase TabOrder = 0 end object OKBtn: TBitBtn Left = 468 Top = 306 Width = 77 Height = 27 TabOrder = 1 OnClick = OKBtnClick Kind = bkOK Spacing = -1 IsControl = True end end