path: root/Game/Code/Menu/UDisplay.dcu

�v
�u6/�6A�<pMenu\UDisplay.pasdnc6dSysUtils�C��gIntToStri5�g
FileExists���gForceDirectories���cdOpenGL12/�6AfGLuint��"�gglClearColorʜqgglClear)�V+gGL_COLOR_BUFFER_BITfQ��gGL_DEPTH_BUFFER_BITf��g
glViewport��i,g
glBindTexture��Εg
GL_TEXTURE_2DG��g	glColor4fʜqgglEnable)�V+gGL_BLENDH��gglBegin)�V+gGL_QUADS���g
glVertex2f��}�gglEnd�?Ig	glDisable)�V+gglTexParameteri�.��gGL_TEXTURE_MIN_FILTERg9��g	GL_LINEARg7��gGL_TEXTURE_WRAP_Sh9��gGL_CLAMPf:��gGL_TEXTURE_WRAP_Ti9��g
glPixelStoreiZ�f�gGL_UNPACK_ROW_LENGTHX��gglTexImage2D�r��gGL_RGBAn*��gGL_UNSIGNED_BYTEg%��gglDeleteTextures	�~gglReadPixelsP��gGL_BGRAG��cdUMenu/�6AfPMenu��ycdSDL/�6AfPSDL_SurfaceŲ�9gSDL_GetVideoSurface�u�]cdWindows�C��fHDC��"�fHGLRC��"�fBITMAPINFOHEADER[c�!fBITMAPFILEHEADER�tRg
ZeroMemory���HcdSysInit�C��cdSystem�C��fTObject���_fRealS��<fBooleanW~8g.TObject�BgTObject.SafeCallException�G��gTObject.AfterConstruction�G��gTObject.BeforeDestruction�G��gTObject.Dispatch�G��gTObject.DefaultHandler�G��gTObject.NewInstance�G��gTObject.FreeInstance�G��gTObject.Destroy�G��gTObject.Create�G��g@ClassCreate���g@AfterConstructionڿ%UfInteger���
gTrue����gParamStr��fString���f
AnsiString���gAssignedgFalse����g@LStrCmpE�a�g
@LStrArrayClrzY��g@HandleFinallyE�a�gLengthg@LStrLen��gBreakgTObject.Free�G��g	@LStrCat3E�a�g	@LStrCatNE�a�g@LStrClrѨ}�ffile�8��fPointer���gSizeOfgGetMemg@GetMem���g
AssignFileg@Assign�jtgRewriteg@RewritFileg �g
BlockWriteg@BlockWrite�߅g	CloseFileg@CloseR#�DgFreeMemg@FreeMem���g@_IOTestE�a�ceUTexture/�6Ag
glGenTextures�lV�gPrintScreenDatac:��ceUPliki/�6AgScreenshotsPath�:�cejpeg�C��f
TJPEGImage�dN�g.TJPEGImage����gTJPEGImage.Create�'<ceGraphics�C��fTBitmap�x�Fg.TBitmap�R)gTBitmap.Create�;�jgTBitmap.GetCanvas�;�jgTCanvas.SetPixel/K�jceUTime/�6AgTimeSkipa�<ceUGraphic/�6AgScreens��
g	ScreenAct��
gScreenX��
gScreenW��
gScreenH��
c4UDisplay�iif@c4WindowsTc4SDLNc4UMenuJc4OpenGL12c4SysUtilsc&	.TDisplay�r�u$*TDisplay��F��& Display晬��&4 .2f(4UGraphic�c4UTime�c4Graphics�c4Jpeg�c4UPliki�c4UTexture�c(TDisplay.Create��	��z*!Self&!
.,c(
TDisplay.Draw��	���!Self& Resultf� 
S
 Colf� Surfacec(TDisplay.PrintScreen��	��Q*!Self& Bitmapf"� Jpeg  
X 
Y
 Num FileNamef�c(TDisplay.ScreenShot��	���	*!Self& 
Ff�� FileInfof� 
FileHeaderf�� pPicDataf� FileNamef� Numc(Finalization�E�a�\! *c�(UDisplay�!*c��G&�FF
P��,ActualScreen,
NextScreen,h_DC,h_RC
 ,FadeTex(,LastFade0,Fade@-Draw�1-PrintScreen�I.Create�%-
ScreenShot�icD(����P@A,�lm-LL(TDisplayTDisplayLUDisplaySV��t�����ڋ�3ҋ��3��F �F$�Ƅ�t�d�����^[�U����SVW3҉U�U��3�Uh�d�0d� �E�
3��E��E��?�U�
��E��t�U�
��E��u3��E��E�h�?�E�����$��E�����$��E�����$�����hA��������E�
��8�3҉��u�3҉�P��P����
���Pj��H��*��
���P����h�?j�F���R,�~u�F���R�E���F �F�F$�F���
$�F �^ ��F�Ƃ��~���F �%(����$��‹�R,�F���R�FPh�
�����(�f ����$��E�����$��E�����$��E�����$�����h�����j����jj����hDj����hDhHD����jhHD������h�����������
rH�4
��
�F �(���sT�(�f ����$��‹�R,�F���R�F ����$��E�����$��E�����$��E�����$������X�F �%(����$��‹�R,�F���R�(�f ����$��E�����$��E�����$��E�����$�����h�����j����jj����hDj����hDhHD����jhHD���С���h�������F �(���s>�(�f ����$��‹�R,�F���Rh�?h�?h�?h�?����h�����j����jj����hDj����hDhHD����jhHD���С���h������F�(����

�F �(������F�����������؍FPj
��FPh�
����h
&h
(h�
����h)h(h�
����h)h(h�
�����C�S�R��3���Ph����ЋCPh
hjhXh jjh�
����jh����ЋF���R(�F�F�F���R �F �,���r;�~v�FPj
����3��F�F�F3��F�F���R$�F�ƀ�
G�M������3�ZYYd�h��E������E�_^[��]�����-black����-fsblack�@�?@U����SVW3҉U�3�Uh�
d�0d� �
�U������E��M���
��E����|��0h�
�u�h�
�E����E����t	C��'u��Ph
h��P��Pjj���в
���E����E���Q@���E���Q4��H��|T@�E�3��5�6N��|;F3ۡ�H+Nj�*Ë��%���P�E���ϋ��CNu�G�M�u��
���؋U��Ë�Q�E���C?_����U��Ë�QP���3�ZYYd�h�
�E������_^[��]�����
0����
screenshot����.jpgU���t���S3҉U�3�Uh.d�0d� �
�U������E��M��D��E����|�hP�u�hd�E����E����t	C��'u���v������������(�fDžv���BM�6������Dž����(����������������fDž����
f� f�����������������������ꉅ����ȉ�x�����E�3�Uhd�0d� �E�Ph
h���P��Pjj���ЋU���������
��������3�Uh�
d�0d� j��v������������j�������(��������j�U���������������3�ZYYd�h�
������������3�ZYYd�h�������E������3�ZYYd�h5�E������[��]�����
0����
screenshot����.BMPU��3�Uh%d�0d� �3�ZYYd�h,����]Ã-
�m��
�@
�
j
l
n
p
r
t
v
x
z



�
d"%~|&�&1.
1F�
1
��
1
�d�.������"��|�
1L
1L
1Z $( (&( (*,R
1
1�
1<
1Z $( (&( (*,$
1
1h $( (&( (*,
1$
1Di
R�0.0.0.@:X> :N
1,D�
1���I$
I*
I
���
I
I�$� ��F
�
�� ��&����"��"
�
�(��
"�
I���i&
i*
i
��
i
i�:^ ^F���
i2��F$� �
�
i<�
�0�
�,�
�
i�
��
i��
i��z�
�
	
��
	�MF�$>BpX.
"z"0 (.$n & &..f.n & &.: & 
H$$000@X 

��
\"r8
:B�Z  $ �j�
Ht:
:4�  6V*::PJf����&�N^






 
"
$1(&R
&I*(
(%,*D
*i.,�
,4)59T=VAXEZMQU!Y%]%a)e-mq�u�y�}��������@%`0)$-$)t�-t�1�8p5B=	
E�EU�5��=��I�paBa
�]�
Y�Y��]��U)Ui�i@1R�D����  a