Текущий архив: 2003.04.21;
Скачать: CL | DM;
Вниз
TStringList - как проверить создан или нет? Найти похожие ветки
← →
pok (2003-04-11 17:09) [0]Увжаемые мастера у меня такой вопрос:
есть такой код
var
str:Tstrinlist;
begin
str:=tstringlist.create;
......
как мне проверить в другой процедуре создан str или нет, если нет
тогда создать!
← →
Skier © (2003-04-11 17:13) [1]var
SomeVar : Tstrinlist;
//....................
1) if SomeVar <> nil then ShowMessage("Уже создан !")
2) if Assigned(SomeVar) then ShowMessage("Уже создан !")
← →
Anatoly Podgoretsky © (2003-04-11 17:19) [2]Приведи строки и до
var
str:Tstrinlist;
begin
← →
DVM © (2003-04-11 17:20) [3]
> var
> str:Tstrinlist;
> begin
> str:=tstringlist.create;
> ......
Только не забудьте, что str должна быть глобальной переменной.
← →
malkolinge © (2003-04-11 17:29) [4]Самое главное при уничтожении Nil присваивать
← →
pok (2003-04-11 17:41) [5]Понял. Всем большое спасибо!
Страницы: 1 вся ветка
Текущий архив: 2003.04.21;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.018 c
