Delphi 7.0 DBGrid Ms-Word 超链接

Question

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

Answer 1

If what you are trying to do is copy a URL stored in a DBGrid Field you could do the following;

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

Include in your Uses clipbrd;

If you don't want to include clipbrd you could do it a quick and dirty way using a standard Edit Box.

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

Put the chosen method into the OnClick event for a popup menu or where ever you need it.

Assuming the contents of the field is a valid URL you can paste it anywhere you want, word documents, excel, whatever.