Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.17;
Скачать: CL | DM;

Вниз

Абстрактные методы класса   Найти похожие ветки 

 
reticon   (2003-11-06 23:33) [0]

Имеется некоторая процедура

DoSomething(s: string; str: TStrings);

Делаю так:

Str := TStrings.Create;

на что компилятор выдает предупреждение следующего вида

[Warning] Unit1.pas(81): Constructing instance of "TStrings" containing abstract method "TStrings.Clear"
[Warning] Unit1.pas(81): Constructing instance of "TStrings" containing abstract method "TStrings.Delete"
[Warning] Unit1.pas(81): Constructing instance of "TStrings" containing abstract method "TStrings.Insert"

Соответственно, при попытке вызова процедуры DoSomething получаем ошибку "Abstract Error".

Где грабли?


 
willys   (2003-11-06 23:36) [1]

TStrings - абстрактный класс. пиши Str := TStringList.Create;


 
Palladin   (2003-11-06 23:38) [2]

Грабли именно в абстрактных методах. Они не предназначены для прямого вызова.
И еще, какой смысл в Str:=TStrings.Create? Если параметр не возвращаемый. Никакого смысла эта конструкция за пределами процедуры не имеет. Соответственно никакого смысла объявлять str параметром тоже нет, объявляй как локальную переменную.
И еще, лучше не объявлять идентификаторы совпадающие с названиями уже существующих функций и типов. Может быть чревато последствиями. В частности путанницей или удивлением что System.Str не работает.


 
Юрий Федоров   (2003-11-06 23:51) [3]

str - это на самом деле Pointer, причем переданный в процедуру по значению. То есть при попытке считать его ппосле вызова DoSomething ты ничего не получишь.
Если тебя интересует этот объект снаружи, объяви его как var параметр. И не надо создавать экхемпляры абстрактных классов )))


 
Palladin   (2003-11-06 23:53) [4]

тьфу :) записался

> Никакого смысла эта конструкция за пределами процедуры не
> имеет.

Читать как

Никакого смысла результат работы этой конструкции за пределами процедуры не имеет.


 
reticon   (2003-11-07 00:27) [5]

Да, все верно, замена Str := TStrings.Create на
Str := TStringList.Create решила проблему. Спасибо :)

ЗЫ это я ковырял функцию StringToWords, взятую с
http://delphibase.endimus.ru/, если кому интересно


 
Anatoly Podgoretsky   (2003-11-07 08:57) [6]

Palladin © (06.11.03 23:53) [4]
Она не имеет вообще никакого смысл ни за перделами ни в ней.



Страницы: 1 вся ветка

Текущий архив: 2003.11.17;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.009 c
14-56862
Ал
2003-10-27 09:39
2003.11.17
У mainboard для PIII с интегрированным звуком барахлит один канал


1-56677
Var
2003-11-05 08:54
2003.11.17
Глюки с Real


1-56607
Oleg_
2003-11-05 13:51
2003.11.17
копирование динамич. массивов


9-56425
cyborg
2003-05-14 11:36
2003.11.17
Вылет


7-56943
Любитель
2003-09-09 09:01
2003.11.17
Господа как программно изменить время двойного клика





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский