PHP DM Gate v0.9 » Помогите разобраться с кодом <span class="vd">[Delphi, Windows]</span>

zinkol © (26.05.10 19:07) [0]

Скачал исходник игры http://delphigfx.narod.ru/game/lines3d.rar
Подскажите пожалуйста как сделать, чтоб фон под сеткой можно было загрузить из Bitmap
пробовал

Form1.OnCReate

R: TRect;
begin

DoubleBuffered := True;

...
image1.Canvas.pen.Color:=image1.Canvas.Brush.Color;
image1.Canvas.FloodFill(0,0,clred,fsborder);

R := Rect(0,0,Bmp.Width,Bmp.Height);
Image1.Canvas.BrushCopy(Image1.ClientRect,Bmp,R,clBlack);

фон получается очень не четким и если шар на краю сетки то при последующим перемещением он оставляет за собой след

<Цитата>
Омлет © (31.05.10 12:07) [1]

Фон нечеткий, т.к. ты растягиваешь маленькую картинку на больший прямоугольник (BrushCopy).
След остается, потому что при движении шара надо восстанавливать фон в том месте, которое он только что покинул.
Исходник - тихий ужас.

<Цитата>