Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
#IF...#ENDIF And Image Locations
Message
From
12/06/2007 02:48:32
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01232067
Message ID:
01232173
Views:
14
Sergey,

I do not think this will work. Once it's compiled, it's compiled. Running the compiled code on a 'runtime' will not recompile

I'd rather go for something similar to this, to make sure the expression is reevaluated (IMAGEPATHNEEDED)
#define RUNTIME  empty(Version(2))

#DEFINE IMAGE_LOC_RUNTIME	ADDBS(SYS(5) + SYS(2003)) + "Graphics\"

#DEFINE IMAGE_LOC_DEV_EFFECTS	IMAGE_LOC_BASE + "Effects"	

#define IMAGEPATHNEEDED   iif(RUNTIME, IMAGE_LOC_RUNTIME, IMAGE_LOC_DEV_EFFECTS)
__________________
>
>#IF VERSION(2) = 2
>	#DEFINE IMAGE_LOC_DEV_BASE      ADDBS(SYS(5) + SYS(2003)) + "Media\"
>	#DEFINE IMAGE_LOC_DEV_EFFECTS	IMAGE_LOC_BASE + "Effects"	
>	#DEFINE IMAGE_LOC_DEV_QA		IMAGE_LOC_BASE + "Toolbars"
>#ELSE
>	#DEFINE IMAGE_LOC_DEV_BASE      ADDBS(SYS(5) + SYS(2003)) + "Graphics\"
>	#DEFINE IMAGE_LOC_DEV_EFFECTS	ADDBS(SYS(5) + SYS(2003)) + "Graphics\"
>	#DEFINE IMAGE_LOC_DEV_QA		ADDBS(SYS(5) + SYS(2003)) + "Graphics\"
>#ENDIF
>
>cImagePath = IMAGE_LOC_EFFECTS
>
>
>
>>How can I use preprocessor directives to establish image locations for both runtime and development? In development, my images are broken down bby category into various folders. In runtime, the icons will all be dumped into one folder.
>>
>>So, right now I have:
>>
>>
>>#DEFINE IMAGE_LOC_DEV_BASE      ADDBS(SYS(5) + SYS(2003)) + "Media\"
>>#DEFINE IMAGE_LOC_DEV_EFFECTS	IMAGE_LOC_BASE + "Effects"	
>>#DEFINE IMAGE_LOC_DEV_QA	IMAGE_LOC_BASE + "Toolbars"
>>
>>#DEFINE IMAGE_LOC_RUNTIME	ADDBS(SYS(5) + SYS(2003)) + "Graphics\"
>>
>>
>>But then in code I would need to do:
>>
>>
>>IF oApp.lRunTime
>>    cImagePath = IMAGE_LOC_RUNTIME
>>ELSE
>>    cImagePath = IMAGE_LOC_EFFECTS
>>ENDIF
>>
>>** Determine the image to display
>>IF lEnabled
>>    sImage = cImagePath + .sIcon
>>ELSE
>>    sImage = cImagePath + .sIconDisabled
>>ENDIF
>>
>>.imgIcon.Picture = sImage
>>
>>
>>Is there a way to set up the path that is simplified?
>>
>>Thanks
Gregory
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform