[Win32forth-cvs] win32forth/apps/Solipon2 solipion.exe.manifest, NONE, 1.1 SOLIPION.F, 1.13, 1.14

[Dirk B. <db...@us...>]

Update of /cvsroot/win32forth/win32forth/apps/Solipon2
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv10107/apps/Solipon2

Modified Files:
	SOLIPION.F 
Added Files:
	solipion.exe.manifest 
Log Message:
Moved the manifest into the exe file.

--- NEW FILE: solipion.exe.manifest ---
(This appears to be a binary file; contents omitted.)

Index: SOLIPION.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Solipon2/SOLIPION.F,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -d -r1.13 -r1.14
*** SOLIPION.F	14 Sep 2008 17:39:44 -0000	1.13
--- SOLIPION.F	19 Apr 2009 07:39:14 -0000	1.14
***************
*** 1062,1067 ****
  	' solipion SAVE Solipion.exe
  
!         \ add the Application icon to the EXE file
!         s" src\res\Win32For.ico" s" Solipion.exe" Prepend<home>\ AddAppIcon
  
          1 pause-seconds bye
--- 1062,1080 ----
  	' solipion SAVE Solipion.exe
  
!         \ add the resources to the exe file
!         winver winnt4 >=
!         [if]
!                 &forthdir count pad place
!                 s" Solipion.exe" pad +place
!                 pad count "path-file drop AddToFile
! 
!                 CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST s" Solipion.exe.manifest" "path-file drop  AddResource
!                 101 s" src\res\Win32For.ico" "path-file drop AddIcon
! 
!                 false EndUpdate
! 
!         [else]
!                 s" src\res\Win32For.ico" s" Solipion.exe" Prepend<home>\ AddAppIcon
!         [then]
  
          1 pause-seconds bye