Solved

Handling database

Posted on 2002-07-10
12
144 Views
Last Modified: 2010-04-04
This is my first project in Delphi and I badly need some help. Can somebody help me with my data entry, editing and processing of data? Thanks.
0
Comment
Question by:sharol
12 Comments
 
LVL 22

Expert Comment

by:mnasman
ID: 7145331
Hello
 
  Here are some steps to make a simple database program

1. drop Table components on the form, and set the Database property to: DBDemos, and the TableName property to: Customer, then set the Active Property to: True.

2. Double Click on the Table component that on the form, u will see new window, right click on it, and choose add all fields.

3. Select all the fields, and draw them on the form, you will see the controls on the form connected to ur table, and Datasource Component.

4. From the Datacontrol Tab, drop DBNavigator on the form, and set it's DataSource Property to Datasource1

5. Run your project, you have now simple database application, and you can add, edit and delete records to the table using the DBNavigator

Best regards
Mohammed Nasman
0
 

Author Comment

by:sharol
ID: 7145342
im using apollo as my database tool. can you help me with this? I would like to make use of buttons to handle the database so that it would be user friendly.would you like to take a look t my form?
0
 
LVL 22

Expert Comment

by:mnasman
ID: 7145442
Hello

  here's the code for add, save and delete

procedure TForm1.btnAddClick(Sender: TObject);
begin
  Table1.Append;
end;

procedure TForm1.btnSaveClick(Sender: TObject);
begin
  Table1.Post;
end;

procedure TForm1.btnDeleteClick(Sender: TObject);
begin
  if MessageDlg('Do you want to Delete this record',mtError,[mbYes,mbNo],0) = mrYes then
    Table1.Delete;
end;
0
 
LVL 22

Expert Comment

by:mnasman
ID: 7145444
if you wish also to move between records using code, look at

  Table1.Next;
  Table1.Prior;
  Table1.First;
  Table1.Last;
0
 

Author Comment

by:sharol
ID: 7155992
I am handling the database with a datasource. How do I delete records with that component? Can you provide me the code for the delete button with a messagebox so that there will be a verification before a record is deleted. I tried the code you provided but it won't work. Maybe I lack something.
And also, can you help me with my date field. I am using a dbedit for the date entry but I always get an error message that the date entered is not a valid date though for me it is. There must be something I need to declare or configure. Thanks again.
0
 
LVL 2

Expert Comment

by:mikepj
ID: 7177806
He's provided what you ask for already.  What didn't work?

What is the ShortDateFormat for your system?  That is really a seperate question.
0
How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

 

Author Comment

by:sharol
ID: 7183135
okay, disregard the date question.

about the delete, its not working. what i am doing is i display the records in a dbgrid. qnd when the user clicks a record and then click the delte button, that record should be deleted. how do i do this? hope you could help me, please. thanks a lot.
0
 
LVL 22

Accepted Solution

by:
mnasman earned 350 total points
ID: 7183271
Hello sharol

  the code i gave to you working fine with delete

however, when you have table that has a details, you can't delete a record from the master table and there are existing records to it in the detail table

give me ur email
and i will send you a sample application for the database, that contain most of the functions
0
 

Author Comment

by:sharol
ID: 7183466
it a_lynpm@yahoo.com. thanks a lot.

hope you could provide me with one that deals with an apollo table,datasource and a dbgrid whrein the records are displayed. thanks again. il wait for your e-mail.
0
 

Expert Comment

by:CleanupPing
ID: 9343074
sharol:
This old question needs to be finalized -- accept an answer, split points, or get a refund.  For information on your options, please click here-> http:/help/closing.jsp#1
EXPERTS:
Post your closing recommendations!  No comment means you don't care.
0
 
LVL 22

Expert Comment

by:mnasman
ID: 9387919
points to me
0
 
LVL 5

Expert Comment

by:Lukasz Lach
ID: 9460846
sharol,
No comment has been added lately (12 days), so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area for this question:

RECOMMENDATION: Award points to mnasman http:#7145331

Please leave any comments here within 7 days.

-- Please DO NOT accept this comment as an answer ! --

Thanks,

anAKiN
EE Cleanup Volunteer
0

Featured Post

Enabling OSINT in Activity Based Intelligence

Activity based intelligence (ABI) requires access to all available sources of data. Recorded Future allows analysts to observe structured data on the open, deep, and dark web.

Join & Write a Comment

Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
Get a first impression of how PRTG looks and learn how it works.   This video is a short introduction to PRTG, as an initial overview or as a quick start for new PRTG users.
Here's a very brief overview of the methods PRTG Network Monitor (https://www.paessler.com/prtg) offers for monitoring bandwidth, to help you decide which methods you´d like to investigate in more detail.  The methods are covered in more detail in o…

757 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now