| | | | | |

2026年2月19日

摘要：引用CnPack组件中的 CnRichEdit, private FRender: TCnRichEditRender; //////////////////////////////////////////////// procedure TFormRender.FormCreate(Sender 阅读全文

posted @ 2026-02-19 18:05 涂磊阅读(6) 评论(0) 推荐(0)

2026年2月18日

09]delphi中richedit查找

摘要：放置组件：在窗体上放置一个 TRichEdit (如 RichEdit1)、一个 TButton (如 Button1) 和一个 TFindDialog (如 FindDialog1)。设置按钮事件：在按钮的 OnClick 事件中调用查找对话框。 procedure TForm1.Button1 阅读全文

posted @ 2026-02-18 14:59 涂磊阅读(7) 评论(0) 推荐(0)

2026年2月17日

08]delphi10.3剪贴板的图片，保存到文件

摘要： uses Classes, SysUtils, Clipbrd, Graphics,PNGImage, JPEG; type TClipboardImageFormat = (cfBMP, cfPNG, cfJPEG); procedure SaveClipboardImageToFile(cons 阅读全文

posted @ 2026-02-17 15:44 涂磊阅读(5) 评论(0) 推荐(0)

2026年2月16日

07]Delphi10.3中Richedit中的链接可以点击

摘要： uses Winapi.RichEdit, ShellAPI; public procedure WndProc(var Msg: TMessage); override; procedure TMainForm.FormCreate(Sender: TObject); var mask: Word 阅读全文

posted @ 2026-02-16 14:27 涂磊阅读(4) 评论(0) 推荐(0)

06]delphi10.3中richedit中文本背景颜色

摘要： uses Winapi.RichEdit; procedure RE_SetSelBgColor(RichEdit: TRichEdit; AColor: TColor); var Format: CHARFORMAT2; begin FillChar(Format, SizeOf(Format), 阅读全文

posted @ 2026-02-16 14:15 涂磊阅读(8) 评论(0) 推荐(0)