Delphi - 文字列のTArrayを初期化するにはどうすればよいですか？

Question

lst_devices : TArray<String>変数を初期化するより良い方法をお探しです。

今日、私はこのようにしています（これは非常に醜いですが、それはコードのにおいですが、少なくとも問題なく動作します）。

lst_devices_id := ['', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', 
     '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '']; 

どうすれば改善できますか？

Answer 1

文字列は、デフォルトで空文字列に初期化されています。だから、そのようにそれに頼ることができる：ここで

SetLength(lst_devices_id, N); 

あなたは、配列の要素のための所望の数を割り当てて、空の文字列にそれらを初期化するデフォルトにコンパイラに依存しています。これは、以前は初期化されていない配列に依存することに注意してください。そうでない場合は、最初にファイナライズする必要があります。

Finalize(lst_devices_id); 
SetLength(lst_devices_id, N);