Val function not recognized (Development MSX Fora)MSX Resource Center PassionMSX MSX2 contest           
            
English Nederlands Español Português Russian         
 Nieuws
   Voorpagina
  Nieuws archief
  Nieuws onderwerpen

 Informatie
   MSX Fora
  Artikelen
  Recensies
  Beursverslagen
  Fotoreportages
  Beurzen en meetings
  Enquêtes
  Links
  Zoek

 Software
   Downloads
  Webshop

 MRC
   Wie we zijn
  Kom bij ons team
  Doneren
  Policies
  Contact met het MRC
  Link naar Ons
  Statistieken

 Zoek
 
  

  

 Login
 

Gebruikersnaam

Wachtwoord




Ben je nog niet lid? Klik hier en word MSX vriend!


 Statistieken
 

Er zijn 45 gasten en 2 MSX vrienden online

Je bent een anonieme bezoeker.
 

MSX Fora


MSX Fora

Development - Val function not recognized

Schrijver

Val function not recognized

webmouse
msx lover
Berichten: 121
Geplaatst: 09 Mei 2007, 21:27   
Hi all,

I have a small problem with Turbo Pascal 3.3f. Is the Pascal Val function supported?
(to convert a string value to an integer)
The compiler stops with an error msg.



[D-Tail]

msx guru
Berichten: 3018
Geplaatst: 09 Mei 2007, 23:24   
Stupid question, being a total (Turbo) Pascal noob, but doesn't it have anything to do with case sensitivity? Maybe val() works?
pitpan
msx master
Berichten: 1379
Geplaatst: 09 Mei 2007, 23:56   
Pascal language is case insensitive

About the problem with VAL function, I've never used Turbo-Pascal for MSX
Sd-Snatcher
msx freak
Berichten: 250
Geplaatst: 10 Mei 2007, 04:32   
I think you can use it. But is not a FUNCTION, is a PROCEDURE.

VAL                       Convert String to Number                    pp 70

 Syntax:  Val (StrVar,NumVar,Code) ;

 Type:    Integer or Real

 Form:    Procedure

 Purpose: Convert string value of StrVar to a numeric value in NumVar.

 Notes:   NumVar is type Intger or type Real.  Code is any error code.
          No errors occurred if Code = 0.


 ----------------------------------------------------------------------------


 Usage:
       CONST
          StrVar  : String [4] = '1234' ;  { String value of 1234 }
       VAR
          Code    : Integer             ;  { Error code           }
          IntVar  : Integer             ;  { Integer variable     }
          RealVar : Real                ;  { Real variable        }

       BEGIN
          Val ('$FFFE',IntVar, Code)    ;  { '-2'                 }
          Val ('1.123',RealVar,Code)    ;  { '1.1230000000E+00'   }
          Val (StrVar, IntVar, Code)    ;  { '1234'               }
       END.

webmouse
msx lover
Berichten: 121
Geplaatst: 10 Mei 2007, 08:08   
Thanx! that was the problem. I used it as a function ... works now .
 
 







(c) 1994 - 2008 Stichting MSX Resource Center. MSX is een trademark van MSX Licensing Corporation.