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

Вниз

как проверить создан ли TFileStream;   Найти похожие ветки 

 
bbk   (2008-11-21 01:27) [0]

var
  tmpStream : TFileStream;
begin

  tmpStream := TFileStream.Create("d:\1.dat", fmCreate);
  tmpStream.free;

...
 if Assigned(tmpStream) then tmpStream.free; // Вылетает except ошибка
end;  

В чем и вопрос, как правильно проверить, так как после free метода файлового потока Assigned(tmpStream) возвращает все равно истину.


 
{RASkov} ©   (2008-11-21 01:29) [1]

> [0] bbk   (21.11.08 01:27)

После Free пременную сбрось в нил...


 
bbk   (2008-11-21 01:32) [2]

что ещё не понятно, после

   tmpStream.free;
   ShowMessage(IntToStr(tmpStream.Handle));

хендл все равно остается.
с destroy такая же хрень.
как блин его удалить? (:


 
{RASkov} ©   (2008-11-21 01:33) [3]

> После Free пременную сбрось в нил...

:) или в любую близлежащую реку...) т.е.:
tmpStream.free;
tmpStream:=nil;
.....
if Assigned(tmpStream) then

See also: FreeAndNil()


 
bbk   (2008-11-21 01:33) [4]

{RASkov} спасибо, что-то не допер был.
интересно девки пляшут...


 
{RASkov} ©   (2008-11-21 01:34) [5]

> хендл все равно остается.

"битый"


 
bbk   (2008-11-21 01:37) [6]

а вообще если у меня есть процедурка нужно в конце всегда обнулять созданный объект или free будет достаточно?


 
Германн ©   (2008-11-21 02:01) [7]


> bbk   (21.11.08 01:37) [6]
>
> а вообще если у меня есть процедурка нужно в конце всегда
> обнулять созданный объект или free будет достаточно?
>

Как правило достаточно. Всё остальное "от лукаваго"! :)


 
Anatoly Podgoretsky ©   (2008-11-21 08:56) [8]

> bbk  (21.11.2008 1:27:00)  [0]

Очень просто, ничего проверять не надо, не засоряй себе мозги.


 
Правильный$Вася   (2008-11-21 12:26) [9]


> а вообще если у меня есть процедурка нужно в конце всегда
> обнулять созданный объект или free будет достаточно?

по выходе из процедурки у тебя эти переменные уже недоступны


 
{RASkov} ©   (2008-11-21 12:48) [10]

> [9] Правильный$Вася   (21.11.08 12:26)

Но память-то нужно отдать :) Поэтому [7]...


 
Правильный$Вася   (2008-11-21 13:01) [11]


> Но память-то нужно отдать

естественно


 
{RASkov} ©   (2008-11-21 13:04) [12]

> [11] Правильный$Вася   (21.11.08 13:01)

сорри... я не верно понял [9](



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

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

Наверх




Память: 0.49 MB
Время: 0.01 c
15-1225462808
kaif
2008-10-31 17:20
2009.01.04
Зарегистрировал ИП


9-1176379296
frame3
2007-04-12 16:01
2009.01.04
delphix


8-1188126179
Dr. Andrew
2007-08-26 15:02
2009.01.04
Как нарисовать спираль Fermat с отрисовкой в писелах?


15-1225709484
Nastusha
2008-11-03 13:51
2009.01.04
ПОМОГИТЕ!!!!


2-1227547166
Res
2008-11-24 20:19
2009.01.04
gethostbyname