在delphi中如何保存long raw字段信息（ORACLE） (100分)

在ORACLE我建立一个含有long raw类型字段的表，
如何在delphi中插入long raw字段信息。
注：我使用过PRO*C，需用特定的结构，不知在
delphi中如何实现！

var pchar;sqlstr:string;i, datalen:integer;
begin
/* 准备数据 */
p:=stralloc(100);
datalen:=10;
for i:=0 to datalen-1do
(p+i)^:=chr(random(256));
/* 数据准备完成 */
sqlstr:='insert into table1 (longrowdata) values ( :longrowdata )';
query1.Close;
query1.SQL.clear;
query1.SQL.add(sqlStr);
query1.ParamByName('longrowdata').datatype:=ftBlob;
query1.ParamByName('longrowdata').setBlobdata(p, datalen);
query1.prepare;
query1.ExecSQL;
strdispose(p);
end;

我正琢磨问题发哪去了！原来一时迷糊未选问题类别。居然被你看到！
再请问如何可以取出long raw数据到一个指针中！
我想这100分非你莫属！

用do
A 控件. 可以轻易解决此问题.

时间太久，强制结束。 wjiachun