| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

В чем ошибка?? [D6]

**** ©   (2002-09-11 11:38:00) 

Подскажите пожалуйста,
почему после 20-30 срабатываний возникает ошибка OSError???

procedure TMainForm.Timer1Timer(Sender: TObject);
Var
bit: HRGN;
begin
inc(i);
if i=11 then i:=1;
Pict.LoadFromFile("D:\Baby"+IntToStr(i)+".bmp");
Bit:=BitmapToRegion(Pict,clWhite);//вырисовка формы по картинке
SetWindowRgn(MainForm.Handle, Bit, true);
Image1.Picture.LoadFromFile("D:\Baby"+IntTostr(i)+".bmp");
end;

---

AlexT1000   (2002-09-12 18:53:00) [1]

Точно! Одно слово - садюга!

---

Poirot   (2002-09-11 17:51:00) [2]

Вощем таак!!! Ты просто задолбал систему... Этож издевательство... Динамическая форма!!! А какая у вас задержка в таймере???

---

Наверх