Delphi memo1双击选中的文字内容

本文整理自网络，侵删。

 
procedure TForm1.Memo1DblClick(Sender: TObject);
begin
    ShowMessage(Memo1.SelText);      //这个弹出选中的文字内容
end;
 

相关阅读 >>

Delphi utf-8

Delphi中paramstr的用法

Delphi计算两个时间差

Delphi xe的firemonkey获取当前文件所在路径的方法

Delphi实现类似嵌入桌面的效果

Delphi 让程序支持外来文件拖放的单元文件

Delphi tstreamreader tfile assignfile读取文本文件

Delphi base64, quoted-printable 的解码与编码函数

Delphi隐藏系统托盘tray图标

Delphi �c 使用createoleobject后释放olevariant

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi memo1双击选中的文字内容