Hello Lejoso,
If you are updating a tablegrid you could do the following.
procedure dbUpdateTimer;
var
indx,cnt : integer;
begin
{updates any tablegrid no matter what its name onfrmMain}
cnt := frmMain.ComponentCount -1;
for indx := 0 to cnt do
begin
if frmMain.Components[indx] is TdbStringGridEx then
TdbStringGridEx(frmMain.Components[indx]).dbUpdate;
end;
{end of frmMain updates}
{manually update other forms}
frmOrderEntry.grdOrder.dbUpdate;
frmEditAssemblies.tgMasterPart.dbUpdate;
frmEditAssemblies.tgSubPart.dbUpdate;
frmEditPart.grdEditPart.dbUpdate;
{end of manual update other forms}
//showmessage('databases updated');
end;
This code automatically updates all tablegrids in the program every 30 seconds or so. The timer is set up elsewhere.
If you don't want to do that, all you need to do is add the line
FormName.TableGridName.dbUpdate
in an event such as after_click etc.
On a clear disk you can seek forever