|
|
|
||||
|
Tips > |
|||||
|
Clipbrd から TStrings へコピー |
更新 ： 2010/09/12 |
||||
|
|
|||||
|
|
||
| 解説： 何かの作業でコピーした文字列をアプリケーションに取り込みたい時があります。簡単に実現する方法として、クリップボードにあるテキストデータを Memo に取り込んでみます。 クリップボードにテキストデータがあるかどうか調べるには、Tips を参照してください。 使用例： 今回の例は、クリップボードにあるテキストデータを Memo1 に貼り付けています。 アプリケーション起動後、Button1 をクリックしてください。クリップボードのテキストデータがMemo1 に表示されます。 クリップボードのデータは文字列を想定しています。適当な文字列をコピーしてから実行してください。 コンポーネントは、Memo と Button を適当に配置するだけです。 流れとしては、文字列リストを格納するため、TStrings からクラスを派生させます。 次にクリップボードのテキストデータを文字列リストに保持させます。 あとは各行を Memo1 に書き込んで終了です。 #include <clipbrd.hpp> //------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { TStrings *sl = new TStringList(); sl->Text = Clipboard()->AsText; for (int i = 0; i < sl->Count; i++) Memo1->Lines->Add(sl->Strings[i]); delete sl; } //------------------------------------------------------------------- |