Kurs DelphiX czΩ╢µ 3


Animacja

Wstaw komponent TDXDraw i TDXimagelist. Ustaw w TDXimagelist w│a╢ciwo╢µ dxdraw na dxdraw1. Wstaw rysunek do Dximagelist. Dodaj komponent TDXTimer. Interval ustaw na 1 -okre╢la co ile mili sekund ma byµ wywo│ywane zdarzenie OnTimer tego komponentu. Aby utworzyµ takie zdarzenie, kliknij dwa razy we w│a╢ciwo╢µ o nazwie OnTimer pod zak│adk▒ events w Object Inspektorze.Utw≤rz zmienna o nazwie angle. Niech jej pocz▒tkowa warto╢µ bΩdzie 0. Teraz w zdarzeniu OnTimer dodaj kod, kt≤ry bΩdzie zwiΩksza│ warto╢µ zmiennej angle o 1. Mo┐e on mieµ taka postac:

Angle:=Angle+1;
lub inc(angle,1);

Teraz dodaj procedurΩ DrawRotate rysuj▒ca bitmapΩ nr 1 pod katem angle. Powinna wygl▒daµ tak: dximagelist1.items.items[0].DrawRotate(dxdraw1.surface, 132, 125, 200, 200, 0, 0.5, 0.5, Angle); Na ko±cu zdarzenia dodaj kod, od╢wie┐aj▒cy ekran (release i flip). TDXTimer posiada tez funkcje zwracaj▒c▒ ilo╢µ wy╢wietlanych klatek na sekundΩ. Mo┐esz u┐yµ jej w taki spos≤b: dxdraw1.surface.Canvas.textout(10,10,IntToStr(DXTimer1.FrameRate));
Je┐eli chcia│by╢ aby grafika by│a wy╢wiatlana na pe│nym ekranie musz▒ byµ spe│nione nastΩpuj▒ce warunki:

1. W│a╢ciwo╢µ u┐ywanego komponentu TDXDraw Align musi byµ ustawiona alClient.
2. W│a╢ciwo╢µ g│≤wnego formularza BorderStyle musi byµ ustawiona na bsnone.
3. W│a╢ciwo╢µ u┐ywanego komponentu TDXDraw Options/FullScreen musi miΩµ warto╢µ true.

Zastosowanie DelphiX mo┐na zastosowaµ przy robieniu gier , wygaszaczy ekranu. DelphiX jest stosunkowo wolnym enginem . Mimo to DelphiX nie jest taki z│y Mo┐na dziΩki niemu napisaµ wiele rodzaj≤w gier.

Zako±czenie. To s▒ wszystkie wiadomo╢ci potrzebne ci do sprawnego u┐ywania DelphiX do tworzenia grafiki. Oczywi╢cie to co opisa│em w kursie to dopiero pocz▒tek..

Dariusz úazowski



[ Poprzednia strona ]     [ NastΩpna strona ]

______________________________ 028 ______________________________

Copyrigt(C) '2001 Maciej Kunowski