forums.silverfrost.com

[klclark]

WINAPP 'CWP_ICO.RC'
PROGRAM factor3
IMPLICIT NONE
INCLUDE <windows.ins>
EXTERNAL factoriser
INTEGER ans,number
Character*50 str
common number,str
number=1
str = ''
ans=winio@('%ca[Number Factoriser]&')
ans=winio@('%il&',1,2147483647)
ans=winio@('Number to be factorised: %rd&',number)
ans=winio@('%ta%`^bt[Fac&torise]',factoriser)
ans=winio@('%2nl%ob%42st%cb',str)

END

INTEGER FUNCTION factoriser()
integer number
Character*50 str
common number,str
write(str,*)number
call windo_update@(str)
factoriser=1
END


Compiling and linking file: factorisefor.for
[Silverfrost SRC/WIN32 Ver 3.65 Copyright (c) Silverfrost Ltd 2011]
*** Source file CWP_ICO.RC cannot be opened
1 ERRORS [<SRC/WIN32 Ver 3.65]
*** Compilation failed
*** Could not open: srcobj.obj
*** Compilation abandoned
Compilation failed.

I cannot find this file on my PC. It must have got lost when I installed your software. Is there somewhere where I can get this file? Also I will need the location of where to place it. Can you help?

[PaulLaidler]

You don't need the file for this example.

Replace the first line by

WINAPP

without the file name.