Проблема с TStrings

[Никки]

procedure TForm1.FormClick(Sender: TObject);
var
        Strings:TStrings;
begin
        Strings:=TStrings.Create;
        Strings.Add('123'); // сдесь ошибка Abstract Error
        Strings.Clear;
        Strings.Free;
end;

Подскажите в чём дело!

[pu4koff]

TStrings - Это помойму абстрактный класс. надо:

procedure TForm1.FormClick(Sender: TObject);   
var   
        Strings:TStrings;   
begin   
        Strings:=TStringList.Create;   
        Strings.Add('123'); // сдесь ошибка Abstract Error   
        Strings.Clear;   
        Strings.Free;   
end;

[Air]

Люди не мучайтесь, когда-то и я мучался, но мне дали хороший совет и я Вам его передаю.

procedure TForm1.FormCreate(Sender: TObject);
var S:TStringList;
begin
S:=TStringList.Create; // Создание переменной
s.Add('123');  // Добавление
s.Sort; // Сортировка
s.SaveToFile('1.txt'); // Сохранение
s.LoadFromFile('2.txt'); // Загрузка
s.Clear; // Очистка
s.Free; // Закрытие переменной
end;

С этим типом у Вас проблем станет меньше.
Тип похож на TStrings (тот что у Memo.TStrings).

[pu4koff]

Сообщение от Air

Люди не мучайтесь, когда-то и я мучался, но мне дали хороший совет и я Вам его передаю.
С этим типом у Вас проблем станет меньше.
Тип похож на TStrings (тот что у Memo.TStrings).

вапще-то суть, что я написал, что ты - одна и та же. TStringList - наследник от TStrings, так что можно описать переменную как TStrings, а уже при создании объекта указывать нужный тип. Тип не похожь на тип Memo, а это тот же самый тип. Это то же самое, что кто-то запомнит собаку как млекопитающее, а кто-то как животное. собака от этого не изменица.

[alexBlack]

Сообщение от Air

Люди не мучайтесь, когда-то и я мучался, но мне дали хороший совет и я Вам его передаю.

С этим типом у Вас проблем станет меньше.

Air, не очень хороший совет. Проблем станет меньше, а работы больше.

В приведенном примере еще ладно, но как думаете, в исходниках VCL почему в методах для объявления параметров используются абстрактные классы ?

[Air]

Сообщение от pu4koff

вапще-то суть, что я написал, что ты - одна и та же. TStringList - наследник от TStrings, так что можно описать переменную как TStrings, а уже при создании объекта указывать нужный тип. Тип не похожь на тип Memo, а это тот же самый тип. Это то же самое, что кто-то запомнит собаку как млекопитающее, а кто-то как животное. собака от этого не изменица.

Хм... Мы не о биологии говорим, а разница в том, что TMemo на форме распологать нужно,а TStringList в памяти "помещается".
P.S. а почему тогда ощибку так же пометили "Strings.Add('123'); // сдесь ошибка Abstract Error"?

[Air]

Сообщение от alexBlack

Air, не очень хороший совет. Проблем станет меньше, а работы больше.

В приведенном примере еще ладно, но как думаете, в исходниках VCL почему в методах для объявления параметров используются абстрактные классы ?

М-м...ДА, а Вы глянь те на 1 сообщение, то что от "Никки", там ни каким боком и не сказано про VCL.

[alexBlack]

Сообщение от Air

М-м...ДА, а Вы глянь те на 1 сообщение, то что от "Никки", там ни каким боком и не сказано про VCL.

Был не понят. Попробую поподробнее. Я не о посте Никки, а о Вашем совете. Сравните ответ Po4koff и Ваш.

Объявлять переменные можно и нужно абстрактного класса. А вот создавать объекты нужно используя только конкретный класс. Советовать использовать всегда только конкретные классы - это ошибка, хотя это безусловно работает. Но это как-раз та самая ошибка проектирования, которая нам так дорого обходится в дальнейшем.

Приведу пример. Тот-же VCL (исходный код которого всегда полезно смотреть). Многие классы имеют методы записи/чтения в файл. Эти методы использованы с использованием абстрактного класса TStream. Ведь если бы использовались конкретные классы (TFileStream или TMemoryStream) методов было бы больше - для каждого конкретного класса.

То есть Ваш пример отличен и, надеюсь, у Никки все получилось, но, не в обиду будет сказано, Вашему совету "использовать всегда тип TStringList, потому что меньше проблем" следовать не нужно.

[Air]

Сообщение от alexBlack

Был не понят. Попробую поподробнее. Я не о посте Никки, а о Вашем совете. Сравните ответ Po4koff и Ваш.

Объявлять переменные можно и нужно абстрактного класса. А вот создавать объекты нужно используя только конкретный класс. Советовать использовать всегда только конкретные классы - это ошибка, хотя это безусловно работает. Но это как-раз та самая ошибка проектирования, которая нам так дорого обходится в дальнейшем.

Приведу пример. Тот-же VCL (исходный код которого всегда полезно смотреть). Многие классы имеют методы записи/чтения в файл. Эти методы использованы с использованием абстрактного класса TStream. Ведь если бы использовались конкретные классы (TFileStream или TMemoryStream) методов было бы больше - для каждого конкретного класса.

То есть Ваш пример отличен и, надеюсь, у Никки все получилось, но, не в обиду будет сказано, Вашему совету "использовать всегда тип TStringList, потому что меньше проблем" следовать не нужно.

Учитывая приведённые Вами данные, я предположил, что использование одной переменной (скажем "D") тита TStream в разных частях кода можно использовать как TFileStream и TMemoryStream.

К примеру:

...
var D:TStream;
begin
 D:=TFileStream.Create('C:\1.txt',fmOpenWrite);
 d.Write('sdsdsd',6);
 d.Free;

 d:=TMemoryStream.Create;
 d.LoadFromFile('C:\1.txt');
 d.SaveToFile('C:\2.txt');
 d.Free;
end;

однако не так.

<Цитата>
Приведу пример. Тот-же VCL (исходный код которого всегда полезно смотреть). Многие классы имеют методы записи/чтения в файл. Эти методы использованы с использованием абстрактного класса TStream. Ведь если бы использовались конкретные классы (TFileStream или TMemoryStream) методов было бы больше - для каждого конкретного класса.
<Конец цитаты>

Из этого я понял, что можно обьявить один тип TStream, а не описывать каждый, с отдельной переменной.

К примеру:

Var F:TFileStream;
     M:TMemoryStream;
...

Я Вас правильно понял?

[pu4koff]

Сообщение от Air

Хм... Мы не о биологии говорим, а разница в том, что TMemo на форме распологать нужно,а TStringList в памяти "помещается".
P.S. а почему тогда ощибку так же пометили "Strings.Add('123'); // сдесь ошибка Abstract Error"?

это был может не очень удачный пример разницы между написанным вами и мной. вапще-то TMemo - это контрол, у которого есть свойство типа TStrings, который создаеца как TStringList. Да и по Вашему мемо в памяти не помещается?)
ЗЫ. прост убить забыл камент