怎么把smallint型指针指向地址的内容都到byte数组中

[baggiowd]

过程是这样的
procedure TForm1.WPalm1Capture(ASender: TObject; state: Integer;
var veindata:smallint; length: Integer);

veindata是数据首地址,length是长度,
怎么把数据读出来存到oracle的blob字段中,

求教 不会delphi啊

[蓝色光芒]

var
MS : TMemoryStream;
begin
MS := TMemoryStream.Create;
MS.Write(veindata , length);
MS.Position := 0;
//打开数据表,AdoTable.Open;
//再定位数据行
TBlobField(AdoTable.FieldByName('xx')).LoadFromStream(MS);
MS.Free;
AdoTable.Post;
//...
end;

[蓝色光芒]

还需要先执行 AdoTable.Edit;

[baggiowd]

高人 又是你 感谢这几天对我的帮助