不用第三方控件，让richEdit支持图片与表格换行
不用第三方控件，让richEdit支持图片与表格换行r DELPHI 6提供的RICHEDIT是1.0，并不支持图片，对复杂表格也会乱成一团，如何在DELPHI原有控件的基础上做少量修改，使之支持显示图片与正确显示表格，其实只需要几行就好了，方法如下：r r找到richEdit控件所在单元ComCtrls.pas (在SOURCEVCL)r //第一步r procedure TCustomRichEdit.CreateParams(var Params: TCreateParams);r constr // RichEditModuleName = 'RICHED32.DLL';//原来语句r // RichEditClassName = 'RICHEDIT'; //原来语句r r RichEditModuleName = 'Msftedit.dll'; //改后语句r RichEditClassName = 'RichEdit50W'; //改后语句r //第二步r procedure TCustomRichEdit.CreateWnd;r ....r //加入一行要放在CreateWnd因为此时HANDLE已建立r Perform(EM_SetOleCallback, 0, Longint(TRichEditOleCallback.Create(TRichEdit(self)) as IRichEditOleCallback)) ;r r ...
文件大小：759.4KB
评论区