Atualizando as informnações em ambiente de rede

{Acessando a mesma tabela concorrente com outra estação ou outro objeto Query,Table, etc Crie procedure para uso no evento OnActivate}

procedure TForm1.FormRefresh(Sender: TObject);
begin
Table1.Refresh;
...
TableN.Refresh;
end;

//No evento OnActivate do formulário acrescente a linha

Application.OnActivate := FormRefresh;

//No evento OnShow do formulário acrescente a linha

FormRefresh(Sender);

//No evento OnAfterPost de cada objeto TTable acrescente as linhas

Table.FlushBuffers;
FormRefresh(Self);