我想将TStringList中的某个字串赋给另一字串 var str: string; StringList :TStringList; str := StringList.Strings[i]; 我发现这样的copy好样不只是值间copy，当我用AnsiStrUpper将str转成大写时，Strings[i]也变了。怎样才能真正做到传值？

問題應該不是出在 str := StringList.Strings[i]; 上面, 而是 AnsiStrUpper 的問題, 該函數是傳入 PChar 的變數型態, 若你是使用 function AnsiStrUpper(Str: PChar): PChar; 這個 function str := AnsiStrUpper(PChar(StringList.Strings[i])); 會將 StringList.Strings[i] 先變為大寫後再複製到 str 中的, 建議你改用: function UpperCase(const S: string): string; 或 function AnsiUpperCase(const S: string): string; 來進行轉大寫的動作, 就不會發生這樣的問題了.

如果 Str := StringList.Strings[i] 對Str 作一些處理而引響到 StringList.Strings[i] 那應該是 Str 指標是指向 StringList.Strings[i] 而不是 assgin 到 Str 在Delphi 最佳化的環境裡,常常會出現這樣的情況 換換別的路走,你會有更多的收穫