Player:TPlayer - не работает....

← →
greenrul (2002-09-24 18:51) [0]

Раньше создавал спрайты по методу with TPlayer.Create(Spritez.Engine), но при таком походе нельзя в нужном месте узнать координаты спрайта и пр. В какой-то доке было написано:

------------------
TPlayer = class(TImageSpriteex) private Speed:Single; public procedure DoMove(MoveCount: Integer); override; end;
Теперь перед implementation в var обозначаем наш класс как тип:

var Form1: TForm1; Player: TPlayer; Implementation Теперь в свойствах DxDraw находим событие DXDrawInitialize и вставляем следующее:

Player := TPlayer.Create(DXSpriteEngine1.Engine); Player.Image := DXImageList.Items.Find("Player"); Player.X := 250; Player.Y := 250; Player.Width := Player.Image.Width; Player.Height := Player.Image.Height;
------------------

Как я понял, здесь совсем не все расписано - например, создание самого Player...

Пытаюсь делать аналогично примеру, только в MainForm.OnCreate пишу Player1:=TPlayer.Create( А что тут писать???)

Короче, как создать переменную, класса TPlayer, создать её и дальше "грести" в run-time по таймерам всяким её свойства.

Заранее БЛАГОДАРЮ!

← →
cyborg (2002-09-24 21:30) [1]

Не утруждайте себя созданием игр, потренируйтесь в нажатии кнопок, вывода текста в Label, потом возможно и научитесь создавать глобальные переменные.

Да что вы, что вы, какие благодарности? Да незачто, ну спасибо, можно без аплодисментов.

← →
Владимир Васильев (2002-09-25 12:34) [2]

вместо with TPlayer.Create(Spritez.Engine)

Player1:=TPlayer.Create(Spritez.Engine);
with Player1 do
begin
................

← →
greenrul (2002-09-25 19:42) [3]

2cyborg: какие-то проблемы?
2Владимир Васильев: спасибо что подсказали - ступил =)

Player:TPlayer - не работает.... Найти похожие ветки