如何实现数据库的自动添加？？？？(5分)

我想实现数据库的自动添加，该怎么做呢？比如：到午夜12点整，搜索指定目录下的文本文件，并把此文件的内容输入数据库，能实现吗？？？

必须瞒足以下条件，方可：
一、程序必须是实时的；
二、需要自动保存的文本文档不能是独占方打开（指 Opening status.)。
var X:TFileStream;
begin
if time=Timetostr('12:00:00') then
begin
x:=TFileStream.Create('XXX.txt');
adoquery1.fields['Context'].asstream:=x;
adoquery1.post;
x.free;
end;

谢谢！