Delphi pat

V-0.2/Login_u.dfm

@@ -0,0 +1,21 @@
+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