Alaska Software Inc. - #IFDEF __XPP__
Username: Password:
AuthorTopic: #IFDEF __XPP__
AUGE_OHR#IFDEF __XPP__
on Wed, 18 Jun 2008 06:22:02 +0200
hi,

*** snip ***
799#IFDEF __XPP__
800   #IF XPPVER > 01900331
801       oGBrowse:UseVisualStyle := .F.
802   #ENDIF
803#ENDIF
*** eof ***

if i use Cl*pper with this Code it will hang on Line 800
#IF XPPVER > 01900331
Why ?!

greetings by OHR
Jimmy
Adrian WykrotaRe: #IFDEF __XPP__
on Wed, 18 Jun 2008 11:23:27 +0200
Maybe this
> 799#IFDEF __XPP__
> 800   IF XPPVER > 01900331
> 801       oGBrowse:UseVisualStyle := .F.
> 802   ENDIF
> 803#ENDIF


Z powaaniem/Best regards
Adrian Wykrota
www.advantec-software.com.pl

Uytkownik "AUGE_OHR" <AUGE_OHR*AT*WEB.DE> napisa w wiadomoci 
news:cfe50fc$68b2ee38$389f@news.alaska-software.com...
> hi,
>
> *** snip ***
> 799#IFDEF __XPP__
> 800   #IF XPPVER > 01900331
> 801       oGBrowse:UseVisualStyle := .F.
> 802   #ENDIF
> 803#ENDIF
> *** eof ***
>
> if i use Cl*pper with this Code it will hang on Line 800
> #IF XPPVER > 01900331
> Why ?!
>
> greetings by OHR
> Jimmy
>
>
Carlos Beling Re: #IFDEF __XPP__
on Wed, 18 Jun 2008 10:41:34 -0300
Hi AUGE_OHR:
good morning.

Would it not be as folow?
PROCEDURE Main()
#IFDEF __XPP__
IF __XPPVER__ > 01900331   <===============
        oGBrowse:UseVisualStyle := .F.
ENDIF
#ENDIF
RETURN

Beling
Best regards


AUGE_OHR escreveu:
> hi,
> 
> *** snip ***
> 799#IFDEF __XPP__
> 800   #IF XPPVER > 01900331
> 801       oGBrowse:UseVisualStyle := .F.
> 802   #ENDIF
> 803#ENDIF
> *** eof ***
> 
> if i use Cl*pper with this Code it will hang on Line 800
> #IF XPPVER > 01900331
> Why ?!
> 
> greetings by OHR
> Jimmy
> 
>
JorgeRe: #IFDEF __XPP__
on Wed, 18 Jun 2008 11:09:51 -0300
toy can't  compare an idetifier in this directive

you need create an indentifier with this permise resolved
or like this (ie)

#IFDEF __XPP__

    IF    ( XppVer() > 01900331 )                     this code not 
compile with clipper
          oGBrowse:UseVisualStyle := .F.
   ENDIF

#ENDIF

regards

"AUGE_OHR" <AUGE_OHR*AT*WEB.DE> escribi en el mensaje 
news:cfe50fc$68b2ee38$389f@news.alaska-software.com...
> hi,
>
> *** snip ***
> 799#IFDEF __XPP__
> 800   #IF XPPVER > 01900331
> 801       oGBrowse:UseVisualStyle := .F.
> 802   #ENDIF
> 803#ENDIF
> *** eof ***
>
> if i use Cl*pper with this Code it will hang on Line 800
> #IF XPPVER > 01900331
> Why ?!
>
> greetings by OHR
> Jimmy
>
>