Tôi có cần phải hoàn thành mảng bản ghi trong Delphi không?

Question

Trong ứng dụng của tôi, tôi có ghi lại như sau:

TTransaction = record 
    Alias: string 
    Description: string 
    Creation: TDateTime 
    Count: Integer 
end; 

và tôi đang sử dụng hồ sơ này trong mảng này:

Transactions = array of TTransaction; 

Tôi đang giữ mảng nạp trong thời gian chạy, nhưng ở một trao thời gian tôi cần phải xóa tất cả dữ liệu và thêm một số dữ liệu mới.

Có đủ chỉ để sử dụng:

SetLength(Transactions, 0); ? 

Hoặc tôi cần phải hoàn thành một cái gì đó?

Answer 1

Có ba cách để deallocate công ty liên kết bộ nhớ với một mảng động, a:

SetLength(a, 0); 
Finalize(a); 
a := nil; 

Tùy thuộc vào bạn sẽ sử dụng loại nào.

Các documentation nói giống nhau, mặc dù trong một hơi tròn về thời trang:

Để deallocate một mảng động, chuyển nhượng bằng không cho một biến tham chiếu đến các mảng hoặc vượt qua các biến để Hoàn thiện; một trong các phương thức này phân phối mảng, miễn là không có tham chiếu nào khác. Các mảng động được tự động phát hành khi số lượng tham chiếu của chúng giảm xuống 0.Các mảng động có chiều dài 0 có giá trị là 0.

Điều này sẽ giải phóng tất cả bộ nhớ được liên kết với mảng, bao gồm bất kỳ loại được quản lý lồng nhau nào, chẳng hạn như chuỗi, arrys động, v.v ... thuộc sở hữu của loại bản ghi của bạn.

Nếu bạn cần thay đổi kích thước mảng để sử dụng sau này và có sẵn dữ liệu mới, chỉ cần thay đổi kích thước bằng SetLength và khởi tạo các phần tử còn lại một cách thích hợp.

Answer 2

SetLength (transactions,0) không phải là một ý kiến ​​hay. Tôi nghĩ cách tốt nhất là khởi động lại tất cả các thành viên của bản ghi. Bằng cách này, bạn giữ biến được tải.

Bạn có thể sử dụng SetLength (transactions,0) nếu bạn không cần biến nữa, để sử dụng ít bộ nhớ nhất có thể. Tất nhiên, nếu bạn cần nó một lần nữa ở đâu đó trong chương trình, bạn có thể điều chỉnh lại độ dài của nó, giả sử bạn biết điều đó.

Bạn không cần phải hoàn thành bất cứ điều gì, beause đó là một bản ghi, không phải là một lớp học. Hồ sơ không có các nhà thầu xây dựng hoặc destructors, như các lớp học.

Answer 3

Đặt độ dài mảng thành 0 sẽ phá hủy mảng, điều này ngược với mong muốn của bạn "giữ cho mảng được tải". Tuy nhiên, nó sẽ giải phóng bộ nhớ cho tất cả các bản ghi và chuỗi của chúng (đối với bất kỳ chuỗi nào có số tham chiếu là 1 tại thời điểm đó).

Nếu bạn chỉ muốn giải phóng bộ nhớ cho các chuỗi, nhưng giữ bộ nhớ bản ghi được phân bổ (vì bạn định phân bổ một bộ bản ghi khác ngay sau đó và bạn không muốn lãng phí việc phát hành và phân bổ lại cùng một bộ nhớ), sau đó bạn có thể xóa chỉ các thành viên chuỗi, nhưng không có cuộc gọi thư viện duy nhất để làm điều đó cho bạn. Thay vào đó, bạn sẽ cần phải viết một vòng lặp và tự xóa từng trường của bản ghi.

for i := 0 to High(transactions) do begin 
    transactions[i].alias := ''; 
    transactions[i].description := ''; 
end; 

Nếu có rất nhiều lĩnh vực trong hồ sơ cần thanh toán bù trừ, sau đó nó có thể là thuận tiện hơn để gán một giá trị mặc định TTransaction để mỗi phần tử của mảng. Bạn có thể sử dụng Default chức năng, hoặc trong các phiên bản cũ của Delphi bạn có thể khai báo một TTransaction đó có tất cả các lĩnh vực của nó rõ ràng đã:

const 
    ClearTransaction: TTransaction = (alias: ''; description: ''; creation: 0; count: 0); 

for i := 0 to High(transactions) do 
    transactions[i] := ClearTransaction; 
    // or 
    transactions[i] := Default(TTransaction);