Обновление данных из таблицы DBF.
Есть дата модуль в нем
ini: TTable;
DS1: TDataSource;
Таблица DBF.
считываю данные так:
Procedure Init;
begin
PsOn := DM1.ini['ontim'];
PsOff:= DM1.ini['offtim'];
end;
На форме прописано:
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
DM1.ini.Open;
for i:=1 to 17 do
mecn[i].init;
DM1.ini.Close;
end;
все нормально. Читается.
Но при обновлении данных из другого приложения, в этом, получаю старые данные. Как обновить данные?
То что данные обновляются в действительности проверил.
Что делаю не так?
Получить новое, можно только закрыв среду Дельфи. И открыв снова.
|