delphi - 動的サイズで TStringField を作成できますか?

Question

フィールドInsufficient memoryでエラーが発生しTClientDatasetました。TStringField0 から 8000 までの文字列の長さを使用する必要がありますが、TClientDataset.

それで、TStringField動的に作成できますSizeか？

PS 最初のタスクは、TDBGrid を TClientDataset にコピーすることです。

Answer 1

次のソリューションを使用しました。まず、 に基づいて最大値を計算SizesしLength(aDBGrid.Columns[i].Field.DisplayText)ます。次にTStringFields、計算された で作成しますSizes。

PS 最初のタスクは、TDBGrid を TClientDataset にコピーすることです。