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

解決

lale 2007-01-28 08:38:41 No: 24628

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

HOta 2007-01-28 17:21:58 No: 24629

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

クリップボードは何処 2007-01-29 06:43:38 No: 24630

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

まこと 2007-01-29 08:10:33 No: 24631

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

lale 2007-02-02 06:33:09 No: 24632

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