Hallo,
Du darfst TStrings nicht
instanzieren! Aber das tut der Code auch nicht. Instanziert wird eine TStringlist:
Delphi-Quellcode:
// Dekleration
private
FTest1: TStrings;
// Instanzierung
FTest1 := TStringList.Create;
Ein Setter wird benötigt eben weil KEIN Zeiger zugewiesen werden soll!
Im Setter übernimmt deine FTest1-Stringliste nur die Daten der im Setter übergebenen TStrings!
Delphi-Quellcode:
if Assigned(Value) then
FTest1.Assign(Value);
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."