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

Вниз

Треклятый Access violation   Найти похожие ветки 

 
LongIsland   (2003-01-27 15:44) [0]

При создании формы создается некий TBitmap.
На событие OnDestroy делаю Bitmap.Free и выдается сабж. Кроме того, он стал выдаваться не сразу, а после N-ной перекомпиляции проекта.
Убираю Bitmap.Free - все проходит гладко.

Вопрос: приложение само освобождает ресурсы, связанные с этим Bitmap, если он описан в секции public?

Заранее премного благодарен!


 
Игорь Шевченко   (2003-01-27 15:50) [1]

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


 
Anatoly Podgoretsky   (2003-01-27 15:51) [2]

На N-ной перекомпиляции проекта ты внес ошибку


 
MBo   (2003-01-27 15:51) [3]

Еще из телепатии - может, ты освобождаешь bitmap, когда он еще используется чем-то?


 
LongIsland   (2003-01-27 15:53) [4]

Сначала я тоже так подумал:-) (я не про телепатические способности:-) )

Нет, попытка очистить идет только на OnDestroy. Ощущуние такое, что сначала его освобождаю я, потом приложение само пытается его уничтожить.


 
LongIsland   (2003-01-27 15:55) [5]


> MBo © (27.01.03 15:51)
> Еще из телепатии - может, ты освобождаешь bitmap, когда
> он еще используется чем-то?

На OnDestroy может вызываться OnResize?

> Anatoly Podgoretsky © (27.01.03 15:51)
> На N-ной перекомпиляции проекта ты внес ошибку

Я не менял код, связанный с этим куском


 
Anatoly Podgoretsky   (2003-01-27 16:03) [6]

Не обязательно с этим.


 
Игорь Шевченко   (2003-01-27 16:04) [7]

LongIsland © (27.01.03 15:55)

Ты покажи кусок-то, Гюльчатай :-)


 
LongIsland   (2003-01-27 16:06) [8]

В принципе, сабж я победил, правда пришлось весь подход изменить:(
Всем спасибо!


 
LongIsland   (2003-01-27 16:11) [9]


> Ты покажи кусок-то, Гюльчатай :-)

А там показывать-то нечего:-)


procedure TfmMain.FormCreate(Sender: TObject);
begin
bmpResult:=TBitmap.Create; //Создается
end;


procedure TfmMain.FormResize(Sender: TObject);
begin
bmpResult.Width:=tsPicture.ClientWidth-imgIntervals.Width;
bmpResult.Height:=tsPicture.ClientHeight;
imgResult.Picture.Assign(bmpResult); //Здесь он используется
if not New then
sbInterpolationClick(Sender);
end;

procedure TfmMain.FormDestroy(Sender: TObject);
begin
bmpResult.Free; //Уничтожается
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.009 c
14-15891
Дмитрий К.К.
2003-01-18 11:17
2003.02.06
Windows NT на сервере


1-15643
Darkwin
2003-01-28 14:43
2003.02.06
Как вывести сообщение, что программа на нём не останавливалась?


3-15499
Higs
2003-01-11 18:03
2003.02.06
Компонента SQLDirect


1-15755
Fiend
2003-01-28 11:00
2003.02.06
Хотел было поймать WM_MDIMAXIMIZE, да не тут-то было :(


9-15377
PanPascal
2002-08-17 14:24
2003.02.06
Как найти угол поворота?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский