object Form_nastr: TForm_nastr Left = 154 Top = 171 BorderStyle = bsDialog Caption = 'Start Report ' ClientHeight = 105 ClientWidth = 331 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object SpeedButton1: TSpeedButton Left = 7 Top = 10 Width = 190 Height = 25 Caption = 'Select Report' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton3: TSpeedButton Left = 7 Top = 40 Width = 190 Height = 25 Caption = 'Generate' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = SpeedButton3Click end object SpeedButton5: TSpeedButton Left = 7 Top = 70 Width = 190 Height = 25 Caption = 'Exit' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False OnClick = SpeedButton5Click end object rg1: TRadioGroup Left = 211 Top = 7 Width = 112 Height = 89 Caption = 'Report Type' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemIndex = 0 Items.Strings = ( 'Word Report' 'Report Smith' 'Excel Report') ParentFont = False TabOrder = 0 end object Report1: TReport AutoUnload = True Preview = True Left = 288 Top = 90 end object OpenDialog1: TOpenDialog Filter = 'Word Report|*.rep|Report Smith|*.rpt|Excel Report|*.pr|All|*.*' InitialDir = 'c:\bvista\db' Left = 260 Top = 90 end object SaveDialog1: TSaveDialog Left = 232 Top = 90 end end