如何在memo 或则 richedit 上 添加,使用 radiobutton 和 checkbox 控件

Question

各位高手 ,请帮兄弟一下如何在memo  或则  richedit 上 添加 radiobutton 和 checkbox 控件.如果不可以,有没有办法实现,文本编辑的选择功能谢谢

Answer 1

扩展TMemo
unit MemoEx;interfaceuses
  SysUtils, Classes, Controls, StdCtrls;type
  TMemoEx = class(TMemo)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
    public constructor Create(AOwner: TComponent); override;
  published
    { Published declarations }
  end;procedure Register;implementationprocedure Register;
begin
  RegisterComponents('Additional', [TMemoEx]);
end;{ TMemoEx }constructor TMemoEx.Create(AOwner: TComponent);
begin
  inherited;
  // 让该控件可作为容器
  ControlStyle:= ControlStyle + [csAcceptsControls];
end;end.