Как в Delphi сбросить кэш БД на диск

uses BDE {в Delphi 1.x не помню, но вроде bdeprocs};

dbiSaveChanges

procedure DropCache; assembler;
asm
  mov ah,$0D
  int $21
end;