我目前正在與Vista CodeGear Delphi 2007下工作。 我的應用程序在一些相當繁重的計算過程中返回內存不足錯誤。 的.exe文件從150 MB增長到驚人的2 Gb如何檢索multidimentional包含來自arraylist多維數組的類元素
關於這個問題(笑!):
1)我改變了一些數組到ArrayList中 但它給了我一些比較困難的問題,解決方案(請參閱下面的示例)
2)適用於多維結構和需求的建議代碼中的小改動最受讚賞!
現在解決成員的老辦法是:
function TResults.GetTriangleA(ComNr, triangleA, PtNr : integer) : single;
Begin
try
result := ListTriangleRes[TriangleA - 1].GetA(ComNr, PtNr);
而且療法是類TriangleResult:
TTriangleRes = class(TResults)
private
IndexPoint1, IndexPoint2, Indexpoint3 : integer;
MyA : array of array [1..3] of single;
MyB : array of array [1..3] of single;
在這裏,我試圖用新的ArrayList的工作我的出路,但並不是很成功到現在
function TResults.GetTriangleVz(ComNr, triangleA, PtNr : integer) : single;
Var
MyTriangleRes: TTriangleRes;
MyObj: Tobject;
begin
MyTriangleRes:= TTriangleRes.Create ;
try
MyObj := ListTriangleRes[TriangleA - 1] ;
result := MyObj <<<<?????? how to>>>>MyTriangleRes.GetVz(ComNr, PtNr);
MKR
愛德華
第二種方式僅適用於D2009 +,愛德華正在使用D2007 – 2009-09-30 20:52:18