Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.02.06;
Скачать: [xml.tar.bz2];

Вниз

Треклятый 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;
Скачать: [xml.tar.bz2];

Наверх









Память: 0.83 MB
Время: 0.035 c
14-15845
DoloD
2003-01-23 04:29
2003.02.06
то такое High-Speed CD-RW?


1-15692
LongIsland
2003-01-27 15:44
2003.02.06
Треклятый Access violation


7-15973
BALU1111
2002-11-25 12:41
2003.02.06
TaskManger


6-15790
Cyber
2002-12-14 10:20
2003.02.06
Аналоги NMHTTP


14-15883
Youri
2003-01-20 11:29
2003.02.06
TAPI





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