윗분 답변처럼 해주시면 되요..
그리고 동적으로 생성하면...property도 다 코딩으로 하셔야 하니까...
그냥
type
  TRich = class(TRichEdit)
  published
    property OnDblClick;
  end;

선언만 하시고....폼에 올려놓은 TRichEdit 컴포넌트를 형변환하셔서...이벤트 연결 시켜도 되요..
Formcreate 부분에 (지금 폼에 올라가 있는 TRichEdit의 이름이 richEdit라고 하면요)
TRich(richEdit).OnDblClick := myEvent; 이런식으로요
myEvent는 procedure myEvent(Sender : TObject)로 선언해주시고요...그 안에다 하고 싶은 거 코딩해
주시는 거구요....

아니면 아예..TRichEdit 상속 받아서 dblClick 이벤트 추가하셔서 컴포넌트 등록해서 쓰셔도 되고요..

허접한 실력으로 한번 코딩 해봤습니다.

저두 델파이가 미흡해서요

먼저 알아 두셔야 할것은 ondblclick 이벤트가 어느 클래스 에서

선언 되었는지 찾아보셔야 될꺼같습니다.

찾아본 결과 거의 TRichEdit 할아버지에 할아버지.... 격인 TControl에서 선언

되있었습니다.

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls;

type
  TRich = class(TRichEdit)
  published
    property OnDblClick;
  end;

  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    aRichEdit: TRich;

    procedure FOnRichEditDblClick(Sender: TObject);
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  aRichEdit := TRich.Create(Self);
  with aRichEdit do
  begin
    Parent := Self;
    OnDblClick := FOnRichEditDblClick;
  end;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  aRichEdit.Free;   //자동 파괴됨..
end;

procedure TForm1.FOnRichEditDblClick(Sender: TObject);
begin
  Showmessage('AAAA');
end;