Delphi XE data access with ADO
Step 1. Open new project Step 2. Insert ADO connection object and ADO table object (rename with your table name) build the database connection with ADO connection Step 3. Add button and and edit box Step 4. double click on button and copy below codes var aa:string; begin aa := 'SELECT * FROM Tablename '; with tablename do begin Active := False; SQL.Clear; SQL.Add(aa); ExecSQL; end; tablename.Open; edit1.Text := Tablename.FieldByName('fieldname').AsString; end;