LoadFromStream

Return to index

Author

Message

Tavo

Posted: 01/25/2002 17:29:22

Hello:

Nice new WEB Page, congratulations :)

I have a TDBRichViewEdit for editing a "ResultLetter" Table. I need load

a RVF document from another table: "ModelsLetters". I'm not capable of

do it: I've try with this

Function LoadRVFromField(DB_rv : TCustomRichView ;

                           Fld : TBlobField    ) : Boolean ;

var

  TempStream : TBlobStream ;

begin

  TempStream := TBlobStream.Create(Fld , bmRead ) ;

  Try

    TempStream.Position := 0;

    Result := DB_rv.LoadRVFFromStream(TempStream) ;

  Finally

    TempStream.Free;

  End ;

end ;

What i'm doing wrong?

Sorry for my english and thanks

Tavo.