Label の文字列をコピーするには？

解決

lale  2007-01-27 23:38:41  No: 24628  IP: 192.*.*.*

初歩的な質問なのですが、
label に表示されている文字列を
ドラッグしてクリップボードにコピーするには
どのようにすればよいのでしょうか？

編集 削除
HOta  2007-01-28 08:21:58  No: 24629  IP: 192.*.*.*

labelはWindowsのハンドルがありませんので、Windowsのハンドルがあるコントロールを使いましょう。

編集 削除
クリップボードは何処  2007-01-28 21:43:38  No: 24630  IP: 192.*.*.*

>ドラッグしてクリップボードにコピーする...
クリップボードは画面上に存在しないんで、一体マウスをどこに動かすの？
ダブルクリックでよければ、
procedure TForm1.Label1DblClick(Sender: TObject);
begin
  Clipboard.AsText := TLabel(Sender).Caption;
end;

編集 削除
まこと  2007-01-28 23:10:33  No: 24631  IP: 192.*.*.*

TMemoあたりのBorderStyleをbsNone，ReadOnlyをTrueにする
というようなイメージでしょうか？
背景色を親フォームの色に合わせるとよいと思います。

編集 削除
lale  2007-02-01 21:33:09  No: 24632  IP: 192.*.*.*

HOtaさん、クリップボードは何処 さん、まことさん、
ありがとうございました。
いずれもなるほどという感じです。
label はいかにもコピーできそうなので
自分が知らないだけかと思っていたのですが、
こうした方法があるのでしたね。
大変参考になりました。

編集 削除