Показать сообщение отдельно
  #3  
Старый 21.12.2007, 18:51
Аватар для mav_c
mav_c mav_c вне форума
Активный
 
Регистрация: 26.03.2007
Адрес: Москва
Сообщения: 287
Репутация: 30
По умолчанию

Цитата:
Сообщение от Oleg
Сделал прогу, а она, если нажать Ctrl+Alt+Delete постоянно увеличивает память, это что-то это значит ?
Использую графику, таймер.
Нужно ли обнулять какие-то переменные ?
Кусок кода:
...
procedure TForm1.Timer1Timer(Sender: TObject);
var
BMP1:Graphics.TBitmap;
DC1:HDC;
begin
BMP1:=Graphics.TBitmap.Create;
BMP1.Height:=Screen.Height;
BMP1.Width:=Screen.Width;
DC1:=GetDC(0);
BitBlt(BMp1.Canvas.Handle, 0, 0, Screen.Width, Screen.Height, DC1, 0, 0, SRCCopy);
BMP1.IgnorePalette:= True;
BMP1.SaveToFile('......')
end;
...
Помогите...
Вот так
Код:
ReleaseDC(0, DC1);
BMP1.Destroy();
__________________
---------------------------------------------
Программирование - не профессия, а стиль жизни
Ответить с цитированием