Delphi 7.0 DBGrid Ms-Word超链接

Question

Delphi，DBGrid，右键单击，复制 我想要做的是在剪贴板上创建一个超链接，然后可以将其粘贴到Word中 在点击事件

上连接到DBGrid

Answer 1

如果你要做的是复制存储在DBGrid字段中的URL，你可以执行以下操作;

    BEGIN
    IF DBGrid1.Fields[YourFieldIndex].IsNull THEN
      ShowMessage('Empty field, nothing to copy!')
    ELSE
      clipboard.astext := DBGrid1.fields[YourFieldIndex].asstring
    END;

包含在你的Uses中使用clipbrd;

如果您不想包含clipbrd，可以使用标准编辑框快速而肮脏地进行操作。

Begin
  Edit1.text := DBGrid1.fields[YourFieldIndex].asstring;
  Edit1.CopyToClipboard
End;

将所选方法放入弹出菜单的OnClick事件或您需要的位置。

假设该字段的内容是有效的URL，您可以将其粘贴到任何您想要的地方，word文档，excel等等。