Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TStrings & TStringList / 7 сообщений из 7, страница 1 из 1
09.10.2003, 16:45
    #32289149
Chaynik_A
Chaynik_A
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
Обясните пожалуйста почему:
Если я в процедуру передаю ListBox.Items, типа TStrings, то я нормально с этой переменнной работаю, а вот если я сам создаю str:=TStrings.Create, то в процедуре вываливают ошибки выполнения..., приходится пользовать str:=TStringList.Create. Можно подсказать почему так..
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.10.2003, 16:50
    #32289160
Andrew Campball
Andrew Campball
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
можно строчку кода в студия на которой происходит ошибка.
И что за ошибка ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.10.2003, 17:01
    #32289180
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
Потому что, TStrings - абстрактный класс.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.10.2003, 17:02
    #32289182
Chaynik_A
Chaynik_A
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
procedure primer(str: TStrings);
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
begin
   str.clear;
   str.Add('1');
end;

procedure main;
var
  str: TStrings;
begin
   primer(ListBox1.Items);              //всё в порядке, работает
   str:=TStrings.Create
   try
     primer(str);                           //вот тут вылетает ошибка в процедуре primer начиная со строчки str.clear;
   finally
     FreeAndNil(str); 
   end;
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.10.2003, 17:03
    #32289187
Chaynik_A
Chaynik_A
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
автор писал:Потому что, TStrings - абстрактный класс.
Вот и хочется знать что это такое, там про это и пишут в ошибке что tStrings абстрактный класс...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.10.2003, 17:14
    #32289204
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
Вот и хочется знать что это такое,

Что такое абстрактный класс?! Класс, содержащий объявления методов как abstract (т.е. не имеющих реализации в данном классе) называется абстрактным и попытка создать экземпляр такого класса приводит к ошибке. Лучше, конечно, книжку по ООП почитать. Без обид.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.10.2003, 17:39
    #32289236
Chaynik_A
Chaynik_A
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStrings & TStringList
в том то и дело, что он создается, хотя спасибо, понятно.... Только я хорошей книжки по ООП не видел, но видно плохо искал...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TStrings & TStringList / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]