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

解決

もんもん 2002-12-25 00:33:39 No: 2409

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

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

にしの 2002-12-25 02:15:13 No: 2410

そういうときは、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

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