Using .ini files?

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|556\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> C/C++/C#/Other -> Using .ini files?
Wed, 29 Aug 2007, 04:36
spinal	Anyone got any examples or anything. Google is crap and finding things like this. I would like to use a .ini file with info something like this - [Application Name] DIR = \folder\other folder\ LIVES = 4 LAST USED = 01/01/07 Or something similar. -=-=- Check out my excellent homepage!
Wed, 29 Aug 2007, 04:43
Jayenkai	There's a couple of function sets in the BB Code archive, but they look insanely complex for all that they're doing! Find them here : Look for Bobby ball -=-=- ''Load, Next List!''
Wed, 29 Aug 2007, 05:13
Jayenkai	Path$="\fiddle\stick\and\broom\sticks" Lives=666 LU$="06/06/06" Repeat Read in$ If in$<>"END" Style$=FindStyle$(in$) If style$="[" Or style$="{" Or style$="{" SectionHeader$=GetPiece$(in$,0) ; 0 = Entire chunk, inside brackets EndIf If style$="=" Command$=GetPiece$(in$,1) ; 1 = Left side Parameter$=GetPiece$(in$,2) ; 2 = Right side Select Upper$(Command$) Case "DIR","PATH","DIRECTORY","HOME","ROOT" path$=Parameter$ Case "LIVES","HEALTH","LIFE" lives=Int(Parameter$) Case "LAST USED","LASTUSED","LAST","LU" LU$=Parameter$ End Select EndIf EndIf Until in$="END" Print SectionHeader$ Print "Path : "+Path$ Print "Lives : "+Lives Print "Last Used : "+LU$ Function FindStyle$(in$) out$="" in$=Trim(in$) If Instr(in$,"=")>0 Then out$="=" If Left$(in$,1)="[" And Right$(in$,1)="]" Then out$="[" If Left$(in$,1)="{" And Right$(in$,1)="}" Then out$="{" If Left$(in$,1)="(" And Right$(in$,1)=")" Then out$="(" If Left$(in$,1)=";" Then out$=";" If Left$(in$,1)="/" Then out$="/" ;Use these for putting comments in your ini files. If Left$(in$,1)="" Then out$="" ;Although, if there's no = in there, the line will be ignored anyway! Return out End Function Function GetPiece$(in$,part) in$=Trim$(in$) out$="" If part=0 ;Everything inside the brackets. included=0 For I_char=1 To Len(in$) T_char$=Mid$(in$,I_char,1) If T_char$="]" Or T_char$="}" Or T_char$=")" Then included=0 If included=1 Then out$=out$+T_char$ If T_char$="[" Or T_char$="{" Or T_char$="(" Then included=1 Next EndIf If part=1 And Instr(in$,"=")>0 ;Everything to the left of the = out$=out$+Mid$(in$,1,Instr(in$,"=")-1 ) EndIf If part=2 And Instr(in$,"=")>0 ;Everything to the right of the =, up to a Comment identifier (; or //) included=1 For I_char=Instr(in$,"=")+1 To Len(in$) If Mid$(in$,I_Char,1)=";" Or Mid$(in$,I_Char,2)="//" Then included=0 If included=1 Then out$=out$+Mid$(in$,I_Char,1) Next EndIf out$=Trim(out$) Return out$ End Function Data "[Application Name]" Data "DIR = \folder\other folder\ // Comments work, too." Data "LIVES = 4 ;ALRIGHT!!!" Data "LAST USED = 01/01/07 // Comments kick ass!" ;Just used this 'cos it's data, and data has no EOF or anything. Data "END" --v I really should stop spending time on things like this, and get back to some proper game-coding! -=-=- ''Load, Next List!''