object Form2: TForm2 Left = 250 Top = 172 ActiveControl = Assistent1 BorderStyle = bsDialog Caption = 'Demo Dialog' ClientHeight = 396 ClientWidth = 516 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] KeyPreview = True PixelsPerInch = 96 Position = poScreenCenter TextHeight = 16 object Assistent1: TAssistent Left = 0 Top = 0 Width = 516 Height = 396 AssistentHeight = 298 AssistentWidth = 638 DialogHeight = 423 DialogWidth = 524 Page = 0 NumPages = 5 ShowHelpButton = False ShowChangeButton = True ShowAssistentOK = False OnHelpClick = Assistent1HelpClick TextAssistentOK = '&OK' TextFinish = '&Finish' TextDialogOK = '&OK' TextChangeDialog = '&Dialog' TextChangeAssistent = '&Assistent' TextHelp = '&Help' TextCancel = '&Cancel' TextNext = '&Next' TextBack = '&Back' TextDialogName = 'Demo Dialog' TextAssistentName = 'Demo Assistent - Page %d of %d' EndEnabled = True ButtonWidth = 100 ShowGlyph = True object ABox8: TABox Left = 20000 Top = 8 Width = 369 Height = 41 Dleft = 20000 Dtop = 8 Aleft = 8 Atop = 8 ShowonDialog = False AssistentPage = 1 TabOrder = 6 object Label6: TLabel Left = 8 Top = 8 Width = 345 Height = 25 AutoSize = False Caption = 'Welcome in Assistent mode. This is page one of five.' end end object ABox9: TABox Left = 20000 Top = 56 Width = 393 Height = 33 Dleft = 20000 Dtop = 56 Aleft = 56 Atop = 56 ShowonDialog = False AssistentPage = 2 TabOrder = 7 object Label7: TLabel Left = 8 Top = 8 Width = 313 Height = 16 Caption = 'You can use a Button to jump to a specific page:' end end object ABox10: TABox Left = 20000 Top = 192 Width = 401 Height = 33 Dleft = 20000 Dtop = 192 Aleft = 16 Atop = 192 ShowonDialog = False AssistentPage = 4 TabOrder = 8 object Label8: TLabel Left = 24 Top = 8 Width = 335 Height = 16 Caption = 'You can position the components wherever you like' end end object ABox12: TABox Left = 20000 Top = 16 Width = 361 Height = 65 Dleft = 20000 Dtop = 16 Aleft = 40 Atop = 16 ShowonDialog = False AssistentPage = 5 TabOrder = 9 object Label10: TLabel Left = 16 Top = 8 Width = 313 Height = 33 AutoSize = False Caption = 'You have reached the final page of this Demo. ' WordWrap = True end end object ABox1: TABox Left = 0 Top = 0 Width = 57 Height = 353 Dleft = 0 Dtop = 0 Aleft = 8 Atop = 8 ShowonDialog = True AssistentPage = 0 TabOrder = 10 object Image1: TImage Left = 0 Top = 0 Width = 57 Height = 353 Picture.Data = {} end end object ABox2: TABox Left = 64 Top = 8 Width = 441 Height = 57 Dleft = 64 Dtop = 8 Aleft = 64 Atop = 8 ShowonDialog = True AssistentPage = 0 TabOrder = 11 object Label1: TLabel Left = 8 Top = 8 Width = 425 Height = 49 AutoSize = False Caption = 'Welcome to the Demo of TAssistent. In the monent the form is in ' + 'Dialog mode. All Components to enter Data are on one Page.' WordWrap = True end end object ABox3: TABox Left = 64 Top = 64 Width = 145 Height = 81 Dleft = 64 Dtop = 64 Aleft = 72 Atop = 72 ShowonDialog = True AssistentPage = 0 TabOrder = 12 object Label2: TLabel Left = 16 Top = 8 Width = 113 Height = 65 AutoSize = False Caption = 'TAssistent works with any visual Component like:' WordWrap = True end end object AGroupBox1: TAGroupBox Left = 224 Top = 72 Width = 193 Height = 65 Caption = 'TEdit' TabOrder = 13 Dleft = 224 Dtop = 72 Aleft = 120 Atop = 144 ShowonDialog = True AssistentPage = 1 object Edit1: TEdit Left = 8 Top = 24 Width = 177 Height = 24 TabOrder = 0 end end object ABox4: TABox Left = 336 Top = 216 Width = 177 Height = 113 Dleft = 336 Dtop = 216 Aleft = 440 Atop = 8 ShowonDialog = True AssistentPage = 4 TabOrder = 14 object Memo1: TMemo Left = 16 Top = 8 Width = 153 Height = 97 Lines.Strings = ( 'or a Tmemo') TabOrder = 0 end end object ABox5: TABox Left = 64 Top = 280 Width = 209 Height = 65 Dleft = 64 Dtop = 280 Aleft = 80 Atop = 264 ShowonDialog = True AssistentPage = 0 TabOrder = 15 object Label3: TLabel Left = 8 Top = 8 Width = 201 Height = 57 AutoSize = False Caption = 'To change to Asistent mode press the button in the lower left co' + 'rner labled "Assistent"' WordWrap = True end end object AGroupBox2: TAGroupBox Left = 72 Top = 160 Width = 113 Height = 81 Caption = 'TButton' TabOrder = 16 Dleft = 72 Dtop = 160 Aleft = 192 Atop = 120 ShowonDialog = True AssistentPage = 2 object Button1: TButton Left = 16 Top = 32 Width = 75 Height = 25 Caption = 'Click me!' TabOrder = 0 OnClick = Button1Click end end object AGroupBox3: TAGroupBox Left = 200 Top = 176 Width = 129 Height = 97 Caption = 'TCheckBox' TabOrder = 17 Dleft = 200 Dtop = 176 Aleft = 248 Atop = 120 ShowonDialog = True AssistentPage = 3 object CheckBox1: TCheckBox Left = 8 Top = 24 Width = 97 Height = 17 Caption = 'Show Help' TabOrder = 0 OnClick = CheckBox1Click end object CheckBox2: TCheckBox Left = 8 Top = 48 Width = 113 Height = 17 Caption = 'Show Change' State = cbChecked TabOrder = 1 OnClick = CheckBox2Click end object CheckBox3: TCheckBox Left = 8 Top = 72 Width = 97 Height = 17 Caption = 'Show OK' TabOrder = 2 OnClick = CheckBox3Click end end object ABox6: TABox Left = 20000 Top = 56 Width = 297 Height = 73 Dleft = 20000 Dtop = 56 Aleft = 48 Atop = 56 ShowonDialog = False AssistentPage = 1 TabOrder = 18 object Label4: TLabel Left = 8 Top = 8 Width = 257 Height = 65 AutoSize = False Caption = 'This Edit field is the same as on the Dialog page. Try enter som' + 'e data and change back to Dialog mode.' WordWrap = True end end object ABox7: TABox Left = 20000 Top = 160 Width = 145 Height = 65 Dleft = 20000 Dtop = 160 Aleft = 464 Atop = 160 ShowonDialog = False AssistentPage = 1 TabOrder = 19 object Label5: TLabel Left = 8 Top = 8 Width = 129 Height = 57 AutoSize = False Caption = 'To change to the next page press the next Button.' WordWrap = True end end object ABox11: TABox Left = 20000 Top = 32 Width = 281 Height = 81 Dleft = 20000 Dtop = 32 Aleft = 72 Atop = 32 ShowonDialog = False AssistentPage = 3 TabOrder = 20 object Label9: TLabel Left = 48 Top = 16 Width = 233 Height = 57 AutoSize = False Caption = 'You can anabled and disable the Change, Help and OK Button.' WordWrap = True end end object ABox13: TABox Left = 20000 Top = 160 Width = 241 Height = 65 Dleft = 20000 Dtop = 160 Aleft = 384 Atop = 160 ShowonDialog = False AssistentPage = 5 TabOrder = 21 object Label11: TLabel Left = 8 Top = 8 Width = 225 Height = 57 AutoSize = False Caption = 'If the OK button is diabled the Next button has changed into a F' + 'inish button.' WordWrap = True end end end end