I added to code DbTransaction.CommitRetaining;
But I can't get a new data
Code:
procedure TMainForm.DevicesListUpdate;
begin
//read data from table
TableDevices.Close;
TableDevices.SQL.Clear;
TableDevices.SQL.Add('select name from devices');
DbTransaction.CommitRetaining;
TableDevices.Open;
//DbCombox ad Items
DevicesList.Clear;
while not(TableDevices.EOF) do
begin
DevicesList.Items.Append(TableDevices.FieldByName('name').Value);
TableDevices.Next;
end;
end;