如何能够让ShowMessage 或Application.MessageBox 提示的文字 可以被拷贝(50分)

青

青云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-09

• #1

用dephi开发软件是，很多地方都要用到ShowMessage 或Application.MessageBox 这样的提示信息；
这些信息有的是非常有用的。
但是dephi的这种提示信息不能拷贝；

不知道delphi是否自带了这种可以拷贝功能的 提示 函数；

当然，可以为这种提示 作一个Form，上面放一个只读的Memo，就能实现；但是感觉应该有
更简便的方法；

在这里想和大家探讨一下，有什么好的处理方法。

 

卖

卖女孩的小火柴之二

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-09

• #2

学习

 

B

batconv

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-09

• #3

我以前也找过类似的问题，但是好像没有答案，自定义提示是个较好的替代。

 

S

stlont

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-09

• #4

function MyMsg ( Msg : string ) ;
begin
copy Msg to 剪贴版；
ShowMessage 或Application.MessageBox ;
end

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-09

• #5

跟踪它的源代码，其实 ShowMessage 窗口的文本是写在窗体上的一个 TLabel 上，当然 TLabel 的文本不支持复制。
1.自定义；
2.修改源码，我看了，修改几句就可以了。