Kurono,
Revisa este fragmento de código del link :
http://delphi.about.com/od/database/a/record2blob.htm
Código Delphi
[-]
var
User : TUser;
blobF : TBlobField;
bs : TStream;
begin
User.Name := edName.Text;
User.NumberOfQuestions := StrToInt(edNOQ.Text) ;
User.CanAsk := chkCanAsk.Checked;
myTable.Insert;
blobF := myTable.FieldByName('data') as TBlobField;
bs := myTable.CreateBlobStream(blobF, bmWrite) ;
try
bs.Write(User,SizeOf(User)) ;
finally
bs.Free;
end;
end;
¿Ves como definen el campo blobF como un TBlobField antes de usarlo?. Creo que también es válido definirlo así:
Código Delphi
[-]
bs := myTable.CreateBlobStream(myTable.FieldByName('data') as TBlobField, bmWrite);
Espero sea útil
Nelson