object DataUser: TDataUser OldCreateOrder = False Height = 396 Width = 655 object dtaUsers: TDataSource DataSet = adoUser Left = 168 Top = 128 end object adoUser: TADOQuery ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\mrfluffy\O' + 'neDrive\Documents\Embarcadero\Studio\Projects\pat\Users.mdb;Pers' + 'ist Security Info=False' Parameters = <> SQL.Strings = ( 'INSERT INTO Login(Username) VALUES("'#39'+ sUser +'#39'")') Left = 80 Top = 128 end end