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

{codecitation class=»brush: pascal; gutter: false;» width=»600px»}

— Ты слишком много знал, — сказал Windows HardDisk-у.

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

dbiSaveChanges

На Delphi 1.x (16bit) дополнительно вызовите эту процедуру:

procedure DropCache; assembler;

asm

mov ah,$0D

int $21

end;

{/codecitation}

Добавить комментарий