|
Registriert seit: 31. Okt 2003
1.120 Beiträge
Delphi 7 Personal
|
Re: NonVCL Version von Classes.dcu
18. Dez 2003, 12:24
Folgender Erweiterungsvorschlag für TStrList:
1. Die Funktion Strings in GetStr und Replace in SetStr umbenennen.
2. Die beiden Functionen in den protected Bereich verschieben.
3. Folgende Zeile ans Ende der public-Deklarition einfügen:
property Strings[Index : Integer] : String read GetStr write SetStr; default;
Somit hat man mit ein bißchen Code ein Stück mehr das Verhalten von TStringList / TStrings.
|