VPF::Помогите с разобраться с кодом на Delphi

zinkol

Дата 25.5.2010, 17:29 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 25.5.2010

Репутация: нет
Всего: нет

Скачал исходник игры
Подскажите пожалуйста как сделать, чтоб фон под сеткой можно было загрузить из Bitmap

Присоединённый файл ( Кол-во скачиваний: 4 )

lines3d.rar 50,13 Kb

Bitter

Дата 26.5.2010, 14:10 (ссылка)

(нет голосов)

Загрузка ...

Опытный лентяй

Профиль
Группа: Завсегдатай
Сообщений: 1209
Регистрация: 15.8.2004
Где: Харьков, Ukraine

Репутация: 6
Всего: 27

Найди картинку фона который сейчас есть, найди в программе это имя файла, посмотри в какую переменную он загрузился, и загружай в неё другую картинку. ну как-то так

zinkol

Дата 26.5.2010, 17:02 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 25.5.2010

Репутация: нет
Всего: нет

Фон - это залитая канва.
пробовал 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);

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

Bitter

Дата 28.5.2010, 11:55 (ссылка)

(нет голосов)

Загрузка ...

Опытный лентяй

Профиль
Группа: Завсегдатай
Сообщений: 1209
Регистрация: 15.8.2004
Где: Харьков, Ukraine

Репутация: 6
Всего: 27

тебе надо изменить в этой программе принцип перерисовки кадра. Сначала рисуешь свою картинку, а потом поле и шарики. А тут сделана перерисовка одного элемента - шарика так, что предыдущее место он затирает, а потом рисуется, это не годится.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Звук, графика и видео \| Следующая тема »