- Added TAnimMaterial

- Implemented animated tiles
- Fixed TAnimData.FrameData to use ShortInt instead of Byte
This commit is contained in:
2009-12-09 16:26:12 +01:00
parent 2a3e17fa57
commit be935a6bcb
3 changed files with 104 additions and 6 deletions

View File

@@ -983,9 +983,9 @@ end;
procedure TfrmMain.ApplicationProperties1Idle(Sender: TObject; var Done: Boolean);
begin
if (FScreenBufferState <> CScreenBufferValid) or
(FRepaintNeeded and (MilliSecondsBetween(Now, FLastDraw) > 50)) then
({FRepaintNeeded and }(MilliSecondsBetween(Now, FLastDraw) > 50)) then
begin
Logger.Send([lcClient, lcDebug], 'Repainting Game Window');
//Logger.Send([lcClient, lcDebug], 'Repainting Game Window');
oglGameWindow.Repaint;
FLastDraw := Now;
FRepaintNeeded := False;