G gjw96 Unregistered / Unconfirmed GUEST, unregistred user! 2005-07-30 #1 是不是可以利用TDBRichEdit控件和OLE结合使用呢?? 望知道的可以给出完整的代码!!! 其中OLE字段值是图文混排的格式,不单单是图片或文字
G gjw96 Unregistered / Unconfirmed GUEST, unregistred user! 2005-07-30 #2 是不是可以利用TDBRichEdit控件和OLE结合使用呢?? 望知道的可以给出完整的代码!!! 其中OLE字段值是图文混排的格式,不单单是图片或文字
独 独孤客 Unregistered / Unconfirmed GUEST, unregistred user! 2005-07-30 #3 用TOleContainer在 System选项卡里 var SFileName:String; BS:TADOBLobStream; begin bs:=TADOBLobStream.Create(TBlobField( DM.ADOTable1.FieldByName('ASK')),bmRead); try sFileName:=ExtractFilePath(Application.Exename)+'tempBlob' +'.DOC'; BS.SaveToFile(SFileName); OleContainer1.createObjectFromFile(SFileName,False); finally BS.Free; end;
用TOleContainer在 System选项卡里 var SFileName:String; BS:TADOBLobStream; begin bs:=TADOBLobStream.Create(TBlobField( DM.ADOTable1.FieldByName('ASK')),bmRead); try sFileName:=ExtractFilePath(Application.Exename)+'tempBlob' +'.DOC'; BS.SaveToFile(SFileName); OleContainer1.createObjectFromFile(SFileName,False); finally BS.Free; end;
P pengzhen1017 Unregistered / Unconfirmed GUEST, unregistred user! 2005-08-07 #4 请问上楼:这样不行吗? var BS:TADOBLobStream; begin bs:=TADOBLobStream.Create(TBlobField( DM.ADOTable1.FieldByName('ASK')),bmRead); try OleContainer1.loadfromstream(bs); finally BS.Free; end;
请问上楼:这样不行吗? var BS:TADOBLobStream; begin bs:=TADOBLobStream.Create(TBlobField( DM.ADOTable1.FieldByName('ASK')),bmRead); try OleContainer1.loadfromstream(bs); finally BS.Free; end;