Changeset 85
- Timestamp:
- Jan 16, 2017, 7:27:36 PM (8 years ago)
- Location:
- trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Back.pas
r73 r85 5 5 6 6 uses 7 LCLIntf, LCLType, SysUtils, Classes, Graphics, Forms ;7 LCLIntf, LCLType, SysUtils, Classes, Graphics, Forms, Controls; 8 8 9 9 type … … 44 44 LoadGraphicFile(img, HomeDir + 'Graphics' + DirectorySeparator + 'Background.png'); 45 45 end; 46 BoundsRect := Screen.MonitorFromWindow(Handle).BoundsRect; 47 FormStyle := fsStayOnTop; 46 48 end else begin 47 49 WindowState := wsNormal; -
trunk/LocalPlayer/Term.pas
r74 r85 3367 3367 begin 3368 3368 inherited; 3369 3370 if FullScreen then 3371 begin 3369 if FullScreen then begin 3372 3370 p.Style := $87000000; 3373 3371 BorderStyle := bsNone; … … 7768 7766 Left := 0; 7769 7767 Top := 0; 7768 if FullScreen then begin 7769 BoundsRect := Screen.MonitorFromWindow(Handle).BoundsRect; 7770 FormStyle := fsStayOnTop; 7771 end; 7770 7772 end; 7771 7773
Note:
See TracChangeset
for help on using the changeset viewer.