Delphi - 將一個數組類型轉換爲一個字符串數組

Question

我目前在Delphi中編程，需要將數組'BookArray：TBook數組'轉換爲BookArray2：數組字符串'。 有沒有函數或無論如何將類型數組轉換爲字符串數組？

謝謝喬治。

Answer 1

您需要一個將您的類型轉換爲字符串的函數。讓我們假設存在這樣的：

function BookToString(const Book: TBook): string; 

然後在應用功能的陣列中的每個元素：

function BookArrayToString(const Books: array of TBook): TArray<string>; 
var 
    i: Integer; 
begin 
    SetLength(Result, Length(Books)); 
    for i := 0 to high(Books) do 
    Result[i] := BookToString(Books[i]); 
end; 

Answer 2

沒有標準的函數來做到這一點。你需要仔細檢查你的tbook數組，並且一步一步地將其中的內容轉換爲字符串並將其放入字符串數組中。

SetLength(BookArray2, length(BookArray)) 
for i := 0 to High(BookArray) do begin 
    BookArray2[i] := BookArray[i].Author + ' ' + BookArray[i].Title + ' ' + IntToStr(BookArray[i].Edition); 
end;