写数据
if getfinger(fingervalue) then
begin
adoquery1.SQL.Text:='select * from finger';
adoquery1.Open;
adoquery1.Append;
st := TMemoryStream.Create;
adoquery1.Append;
st.Clear;
st.WriteBuffer(fingervalue,512);
st.Position :=0;
(adoquery1.FieldByName('feature') as TBlobField).LoadFromStream(St);
adoquery1.Post;
读数据
adoquery1.SQL.Text:='select * from finger order by id desc ';
adoquery1.Open;
st := TMemoryStream.Create;
st.Clear;
(adoquery1.FieldByName('feature') as TBlobField).SaveToStream(st);
st.Position:=0;
st.ReadBuffer(fingervalue1,512);
本文介绍了一种使用Delphi进行数据库操作的方法,包括如何写入指纹数据到数据库以及从数据库中读取指纹数据的过程。该过程涉及到ADOQuery组件的使用、TMemoryStream创建及操作、TBlobField的数据加载与保存等关键技术点。
527

被折叠的 条评论
为什么被折叠?



