Changeset 21 for trunk/LocalPlayer/Draft.pas

Timestamp:

Jan 8, 2017, 3:12:18 PM (7 years ago)

Author:

chronos

Message:

• Fixed: Run as 64-bit application. Can't load 32-bit StdAI library in 64-bit mode.
• Fixed: Various Warnings and Hints.

File:

• trunk/LocalPlayer/Draft.pas (modified) (2 diffs)

trunk/LocalPlayer/Draft.pas

@@ -6 +6 @@
 uses
   Protocol, ClientTools, Term, ScreenTools, PVSB, BaseWin,
-
-  LCLIntf, LCLType, LMessages, Messages, SysUtils, Classes, Graphics, Controls, Forms, ExtCtrls,
-  ButtonA,
-  ButtonB, ButtonBase, Area;
+  LCLIntf, LCLType, SysUtils, Classes, Graphics, Controls, Forms, ExtCtrls,
+  ButtonA, ButtonB, Area;
 
 type
@@ -91 +89 @@
   Back.Height := ClientHeight;
   Template := TBitmap.Create;
-  LoadGraphicFile(Template, HomeDir + 'Graphics' + DirectorySeparator + 'MiliRes', gfNoGamma);
+  LoadGraphicFile(Template, HomeDir + 'Graphics\MiliRes', gfNoGamma);
   Template.PixelFormat := pf8bit;
 end;