aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Menu/UMenuButton.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Menu/UMenuButton.pas')
-rw-r--r--Game/Code/Menu/UMenuButton.pas23
1 files changed, 2 insertions, 21 deletions
diff --git a/Game/Code/Menu/UMenuButton.pas b/Game/Code/Menu/UMenuButton.pas
index 03085478..b91bfd15 100644
--- a/Game/Code/Menu/UMenuButton.pas
+++ b/Game/Code/Menu/UMenuButton.pas
@@ -83,34 +83,14 @@ implementation
uses UDrawTexture, SysUtils, windows;
procedure TButton.SetX(Value: real);
-var
- dx: real;
- T: integer; // text
begin
- {dY := Value - Texture.y;
-
- Texture.X := Value;
-
- for T := 0 to High(Text) do
- Text[T].X := Text[T].X + dY;}
-
PosX := Value;
if (FadeTex.TexNum = -1) then
Texture.X := Value;
-
end;
procedure TButton.SetY(Value: real);
-var
- dY: real;
- T: integer; // text
begin
- {dY := Value - PosY;
-
-
- for T := 0 to High(Text) do
- Text[T].Y := Text[T].Y + dY;}
-
PosY := Value;
if (FadeTex.TexNum = -1) then
Texture.y := Value;
@@ -267,6 +247,7 @@ var
Tick: Cardinal;
Spacing: Real;
begin
+ T := 0;
if Visible then begin
//Fade Mod
if Fade then
@@ -485,4 +466,4 @@ begin
end;
-end.
+end. \ No newline at end of file