Показать сообщение отдельно
  #6  
Старый 25.04.2009, 16:31
Аватар для 0nni
0nni 0nni вне форума
Начинающий
 
Регистрация: 13.12.2008
Адрес: Туапсе
Сообщения: 161
Репутация: 20
По умолчанию

вот тут =)
Код:
procedure TForm1.FormCreate(Sender: TObject);
  begin
    DrawBitmap('test.bmp', 100, 100);
  end;
Рисуй в onPaint. тк рисунок на форме не сохраняется после перекрытия окна, еще
объфви Bmp: TBitmap внутри класса TForm1 и создавай его в OnCreate и уничтожай в onDestroy.

Еще можешь создать TImage - рисунок на нем не "затирается", поэтому onPaint тебе обрабатывать не прийдется.
__________________
...сказал, и загрустил от бесспорной своей правоты
Ответить с цитированием