Question

BACKGROUND

I am making a simple program to log data and do a few calculations with a .MDB database. accessed via Jet 4.

AIM

I wish to be able to get the value out of / into any field from a sql query on a primary key(one result)

CURRENT

I have currently connected to the database and I am able to view edit the data via “data controls”

as shown below:

QUESTION

How do I access the data in the database such that I may put the values into a suitable variable and then write them back?

Answer 1

Jørn Angeltveit’s answer sounds like direct way to do at least part of what you want. He gives you way to access value in field. But realize that merely changing the value of that field will not update the record in the database; to do that you would also need to call the dataset’s Post method. Your question is a very basic one and if you’re building an app with a database backend you would probably be well-served to read up on how to write database apps with Delphi. If you try to go ahead without learning the basics of Delphi TDataset components then you’re likely to end up with messy approach and extra work.

EDIT: Here’s link to CodeGear site with some helpful docs on TDatasets. It is probably very similar to the documentation you’d find in the Delphi 7 help system (though finding your way through the built-in help can sometimes be confusing):
http://docs.codegear.com/products/rad_studio/radstudio2007/RS2007_helpupdates/HUpdate4/EN/html/devwin32/fhxr30623_xml.html

Here’s a good online series that actually focuses on accessing .mdb’s using Delphi’s ADO database components:
Beginner’s Guide to Databases with Delphi

Also, Marco Cantu has good sections on it in his book Mastering Delphi. You can pick up a used copy on Amazon for not much money. I used Mastering Delphi 6 when learning Delphi 7 and it was great resource. Mastering Delphi 7 is available, but I would save a few bucks and get used copy of Mastering Delphi 6:
http://www.amazon.com/Mastering-Delphi-6-Marco-Cantu/dp/0782128742/ref=sr_1_6?ie=UTF8&qid=1296705281&sr=8-6