Solved

Updateing DBGrid after submitting a SQL update

Posted on 1998-04-02
14
176 Views
Last Modified: 2010-04-06
I use Delphi 3.0 and im accessing a MSAccess 97 database thru ODBC. I have a TTable connected to
the database. I use SQL to update a record in the database. All the records are shown in a DBGrid.
When  updateing I update the selected one.
How do I get update in the DBgrid??
How do i get focus on the updated record??
I have tried:
Table.Active:=False;
Table.Active:=True;
to get the update (i works), but how do I get focus on the changed record ???
Is there a better way then opening and closeing the table??
0
Comment
Question by:mny
  • 7
  • 3
  • 3
  • +1
14 Comments
 

Author Comment

by:mny
Comment Utility
Edited text of question
0
 

Author Comment

by:mny
Comment Utility
Edited text of question
0
 
LVL 5

Expert Comment

by:ronit051397
Comment Utility
1. Use Table.Refresh to see the new details.
2. Use FindKey or Locate to select the record you want.

0
 

Author Comment

by:mny
Comment Utility
I have tried to use Table.Refresh but I get an error meassage
from ODBC lookin like this:
genaral SQL Error.
[Microsoft][ODBC microsoft Access 97 Driver]Wrong number of parameters
0
 
LVL 5

Expert Comment

by:ronit051397
Comment Utility
I have made Refresh to an Informix Table via ODBC and it worked well.
What version of BDE do you have?
0
 

Author Comment

by:mny
Comment Utility
Im using BDE 4.00, and I'm using a Access 97 (.mdb) database.
0
 
LVL 5

Expert Comment

by:ronit051397
Comment Utility
I suggest you upgrade your BDE to version 4.51, then we will be wiser.
I know there are problems with BDE 4.0 and ACCESS.
Download Bde_upg.exe from the Borland site.
0
What Security Threats Are You Missing?

Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.

 

Expert Comment

by:bijoyn
Comment Utility
Hello,

What u may do is to do a locate on the table for the record u just updated. This will bring the focus automatically to the corresponding row of the grid. Is there a specific reason for using a TTable component instead of a TQuery component ?. U can of course do the same thing with the TQuery component after making the update.

Cheers,

bijoy
0
 
LVL 1

Accepted Solution

by:
mrider earned 50 total points
Comment Utility
you can use procedure like this:

procedure RefreshTable(var T:TTable);
var MyBookmark: TBookmark;
with T do
  begin
  MyBookmark := GetBookMark;
  T.Active:=false;
  T.Active:=true;
  GotoBookMark(MyBookMark);
  FreeBookmark(MyBookmark);
  end;

it will re-read table and put your on previos active record

0
 

Author Comment

by:mny
Comment Utility
Well it works fine but....
I have a DBGrid connected to my table and bookmark works fine if i
only use it on records that fit in the grid with out scrolling it.
Say: I have 30 rows in my grid and I have say 40 records in the table.
If i bookmark the 31:st and up to 40 i get:
genaral SQL Error.
       [Microsoft][ODBC microsoft Access 97 Driver]Wrong number of parameters

What to do about that???
0
 
LVL 1

Expert Comment

by:mrider
Comment Utility
first, try to use native BDE to access Access ;)
it exists in delphi 3
second, how are you bookmarking you 31st record?
it is not physical number in normal database, you must
use finding record (see findkey routing)
so, when you go to 31st record using finding condition(ex. FindKey or GotoKey) DBGRID must do it record visible instead of if you'll use table1.disablecontrols.
I think, something wrong with you using of navigation



0
 

Author Comment

by:mny
Comment Utility
Ok its like this:
When i try to open the DB-alias (produced in ODBC32) in BDE i can open it,
but it won't let me look at the tables.

In my last comment I meant that in the program I'm building i have
a DBGrid that atmost have 30 rows visible. If i want to see the "31:st" record i have to
scroll down in the grid. Then my program lets me "dubbelclick" one record. The program
then presents a dialogbox where I edit the record. When I click "OK" an SQL updates
the record. Then I close and open the table to get it "updated" and the i would like
the record i just changed to be "highlighted". It works as long as i do it to the "30" first
records, but does not work if i scroll down and changes the "31:st"

0
 
LVL 1

Expert Comment

by:mrider
Comment Utility
hmmm..... can you show part of code which do this action?

0
 

Author Comment

by:mny
Comment Utility
I have solved it!!

I upgraded the BDE from 4.00 to 4.51 and then it worked
fine.
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

Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, Just open a new email message.  In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
You have products, that come in variants and want to set different prices for them? Watch this micro tutorial that describes how to configure prices for Magento super attributes. Assigning simple products to configurable: We assigned simple products…

744 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

11 Experts available now in Live!

Get 1:1 Help Now