Question

I want to write an app that is an address book and uses a access .mdb file. I know how to insert a new contact into the database, but i do’t know how to edit a contact. I put my test project in here AddressBookTest.zip. Any help is welcomed

Answer 1

Your code for INSERT must do This:

      qryAux.SQL.Text:='INSERT INTO tblContacts(FirstName, LastName) VALUES( ' +
        QuotedStr(frmEd.edFirstName.Text) + ',' +
        QuotedStr(frmEd.edLastName.Text) + ')';

Here is correct for insert the two values.

In Edit mode, for retrieve values from DB, you must execute the Open, not the ExecSQL.
And after do the Open, you must test if the record is finded.
See this code:

   qryAux.Open;

   // Finded?
   if not (qryAux.Eof) then begin
     frmEd.edFirstName.Text:=qryAux.FieldByName('FirstName').AsString;
     frmEd.edLastName.Text:=qryAux.FieldByName('LastName').AsString;
   end;

Regards.

---

Neftalí -Germán Estévez-