クリップボード内のテキストを配列変数に代入する方法

解決

もんもん  2002-12-25 00:33:39  No: 2409  IP: [192.*.*.*]

クリップボードに格納されている複数行のテキストデータを
直接配列に代入する事は可能でしょうか？

現在はＭｅｍｏコンポーネントにClipboard.AsTextで一旦代入して
そこからfor i:=0 to Memo1.Lines.Count do dat[i]:=Memo1.Lines[i];
で配列に代入しています。
可能ならＭｅｍｏコンポーネントを配置したくないのですが。

編集    削除
にしの  2002-12-25 02:15:13  No: 2410  IP: [192.*.*.*]

そういうときは、TStringListのオブジェクトを生成して使います。

strlist := TStringList.Create;
strlist.Text := Clipboard.AsText;
for i := 0 to strlist.Count - 1 do dat[i] := strlist[i];
strlist.Free;

ちなみに、文字列の配列を用意するより、TStringListを用意した方が楽だと思います。

編集    削除
もんもん  2002-12-25 10:36:06  No: 2411  IP: [192.*.*.*]

にしの様ありがとうございます。
お陰様で不要なMemoを無くすことが出来そうです。

編集    削除