Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Do any of you know what this is...
Message
De
21/08/1999 06:54:47
Vinod Parwani
United Creations L.L.C.
Ad-Dulayl, Jordanie
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00255420
Message ID:
00256226
Vues:
25
>We've run into some problems locating exactly what data manager was used with, apparently, with files with a tlb extension. The following code snippet is some that's apparently used to access these files
>if SETUP->NFEET = 0 // use metric conv.
>  nstit := _sper3
>  nsper := setup->nsper
>endif
>fwindow( 6, 3, 15, 43, "GR+/RD,N/W,N", .t., "Executing Commands, "DOUBLE")
>Don't mean to be short on the sample, but if I were asked to describe the language, I'd say it looks like a cross between xBase, Pascal (note the assignment statements), and C (note the comments).
>
>My gut reaction is Clipper, but I've never laid eyes on line one of Clipper code, so I can't say for certain.
>
>tia,

Pls note that this is clipper (// are used for comments, := operator for assignment, "GR+" etc. are color codes)..

can u pls give some more code where this tlb extension is used...

Pls also note that if u r doing clipper to fox conversion, beaware of user defined commands in clipper.. (through that user can create alltogether a new language..), here are few examples....
// Clipper Sample Header file (files with ch extension)

# Command  DEFAULT  <p>  TO  <Val>  [, <pn> TO  <Valn>]  => ;
	   <p> = iif( <p> = NIL, <Val>, <p> ) ;
	   [; <pn> = iif( <pn> = NIL, <Valn>, <pn> ) ]
	
# Command  REPEAT        =>  Do While .T.

# Command  UNTIL <expl>  =>  If (<expl>); Exit; End; End


Usage of abv defined commands...

DEFAULT A TO 12, B TO "Test"  // Assigns default values to 2 variables

REPEAT  // Starts a Loop
.....
.....

UNTIL X < 12
Pls chk the Include files i.e. (ch ext.) which defines all commands...

Pls advs. if any additional info. is req..
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform