Var f:TStrings; //Переменная типа объект TStringList.

begin f:= TStringList.Create(); f.Free;

end;

В этом примере я объявил переменную типа TStrings, но при создании проинициализировал её объектом TStringList. Это вполне законная запись, потому что объект TStringList происходит от TStrings. Новая переменная f будет работать, как объект TStringList, хотя и объявлена как TStrings. Главное – каким объектом переменная проинициализирована.

Такие трюки можно проводить только с родственными объектами, но я постараюсь не использовать их в своей книге, хотя знать ты всё это обязан. А вдруг тебе попадётся исходник трюкача и тогда такая запись может тебя запутать.

Итак, давай познакомимся, как можно работать с помощью TStringList с текстовыми файлами. Всё очень просто. У него есть метод LoadFromFile для которого нужно указать имя текстового файла. После этого, через свойство Strings можно получить доступ к любой строчке, а в свойстве Count находиться число указывающее на количество строк в файле.