aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Menu/UDisplay.pas
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-04-01 18:58:01 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-04-01 18:58:01 +0000
commit05611382cba6ee713b76d0bead4b7fb6ac4e47b9 (patch)
tree4d884736365a4ba0dd8594085e951efbc338b7d7 /Game/Code/Menu/UDisplay.pas
parent018f33e2c108242f34d185b1cc675bbe9185ce4e (diff)
downloadusdx-05611382cba6ee713b76d0bead4b7fb6ac4e47b9.tar.gz
usdx-05611382cba6ee713b76d0bead4b7fb6ac4e47b9.tar.xz
usdx-05611382cba6ee713b76d0bead4b7fb6ac4e47b9.zip
removed unused lclintf/windows references
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@996 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Menu/UDisplay.pas')
-rw-r--r--Game/Code/Menu/UDisplay.pas15
1 files changed, 5 insertions, 10 deletions
diff --git a/Game/Code/Menu/UDisplay.pas b/Game/Code/Menu/UDisplay.pas
index 74a55ea7..86b8910d 100644
--- a/Game/Code/Menu/UDisplay.pas
+++ b/Game/Code/Menu/UDisplay.pas
@@ -9,11 +9,6 @@ interface
{$I switches.inc}
uses
- {$IFDEF win32}
- windows,
- {$ELSE}
- LCLType,
- {$ENDIF}
ucommon,
SDL,
UMenu,
@@ -72,9 +67,6 @@ uses
{$ELSE}
JPEG,
{$ENDIF}
- {$IFNDEF win32}
- lclintf,
- {$ENDIF}
graphics,
TextGL,
// ULog,
@@ -373,6 +365,7 @@ begin
end;
procedure TDisplay.ScreenShot;
+{
var
F : file;
FileInfo: BITMAPINFOHEADER;
@@ -380,10 +373,11 @@ var
pPicData:Pointer;
FileName: String;
Num: Integer;
+}
begin
// FIXME: something broken in here... quick fix... disabled it
Exit;
-
+{
// search image-file
for Num := 1 to 9999 do
begin
@@ -398,7 +392,7 @@ begin
// prepare header memory
ZeroMemory(@FileHeader, SizeOf(BITMAPFILEHEADER));
ZeroMemory(@FileInfo , SizeOf(BITMAPINFOHEADER));
-
+
// initialize header-data
FileHeader.bfType := 19778; // $4D42 = 'BM'
FileHeader.bfOffBits := SizeOf(BITMAPINFOHEADER)+SizeOf(BITMAPFILEHEADER);
@@ -435,6 +429,7 @@ begin
// free allocated data ...
FreeMem(pPicData, FileInfo.biSizeImage);
end;
+}
end;
//------------