Tại sao memo.Lines sử dụng TStrings thay vì TStringList?

Question

Tại sao Memo.Lines sử dụng lớp TStrings trừu tượng? Tại sao nó không sử dụng TStringList thay thế?

Và tôi có nên chuyển đổi nó thành TStringList trước khi làm việc với nó không?

Answer 1

TMemo.Lines, TListBox.Items, TComboBox.Items, v.v ...; tất cả được khai báo là TStrings. Cẩn thận, nói về tài sản đó! Các loại được tạo bên trong tương ứng là TMemoStrings, TListBoxStrings và TComboBoxStrings, tất cả đều là hậu duệ của TStrings và khác nhau theo cách lưu trữ.

Và tại sao? Đối với khả năng thay thế và khả năng tương tác. Vì vậy, mỗi một thuộc tính TStrings đều có cùng thuộc tính và bạn có thể làm:

Memo1.Lines := ListBox1.Items; 

Cách sử dụng? Vâng, một tài sản TStrings như TMemo.Lines hoạt động tốt. Bạn có thể thêm, xóa, thay đổi, gia hạn và xóa các chuỗi (và các đối tượng) trên thuộc tính, vì nội bộ nó là một TMemoStrings thực hiện tất cả tương tác này. Tuyên bố <> triển khai.

Nhưng khi bạn muốn xử lý đặc biệt, ví dụ: như phân loại mà TStringList cung cấp, sau đó bạn cần trợ giúp. Bạn không thể định kiểu cũng không chuyển đổi một TMemo.Lines đến một TStringList, bởi vì nó không phải là một, nhưng thay vào đó bạn cần phải tạo ra một đối tượng trung gian để chế biến đặc biệt này:

var 
    Temp: TStringList; 
begin 
    Temp := TStringList.Create; 
    try 
    Temp.Assign(Memo1.Lines); 
    Temp.Sort; 
    Memo1.Lines.Assign(Temp); 
    finally 
    Temp.Free; 
    end; 
end;