UScreenSing.pas, UScreenSingModi.pas: removed Uffmpeg and USmpeg, added UVideo

UGraphic.pas: prepared for possible loading animation
UGraphicClasses.pas, ULCD.pas, ULight.pas, UMain.pas, USkins.pas, UDisplay.pas, UMenuButton.pas, UMenuSelect.pas, UMenuSelectSlide.pas, UMenuStatic.pas, UScreenCredits.pas, UScreenEditSub.pas, UScreenOpen.pas, UScreenPopup.pas: some fixes to get rid of some compiler infos/warnings

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@374 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 5 insertions, 5 deletions

diff --git a/Game/Code/Classes/ULCD.pas b/Game/Code/Classes/ULCD.pas
index a127c689..a3cdac73 100644
--- a/Game/Code/Classes/ULCD.pas
+++ b/Game/Code/Classes/ULCD.pas
@@ -106,9 +106,9 @@ begin
 end;

 

 procedure TLCD.Enable;

-var

+{var

   A:  byte;

-  B:  byte;

+  B:  byte;}

 begin

   Enabled := true;

   if not HalfInterface then

@@ -191,7 +191,7 @@ end;
 procedure TLCD.AddTextBR(S: string);

 var

   Word:     string;

-  W:        integer;

+//  W:        integer;

   P:        integer;

   L:        integer;

 begin

@@ -227,9 +227,9 @@ begin
 end;

 

 procedure TLCD.MoveCursorBR(Pos: integer);

-var

+{var

   I:    integer;

-  L:    integer;

+  L:    integer;}

 begin

   if Enabled then begin

   Pos := Pos - (StartPos-1);