i try to use CLASS Tini()
- Code: Select all Expand view
- PROCEDURE SaveINIfile(nRow1,nCol1,nWidth1,nHeight1 )
local oIni
oIni := TIni():New( "CONFIG.INI" )
oIni:Set( "Dialog", "Row" ,nRow1 )
oIni:Set( "Dialog", "Col" ,nCol1 )
oIni:Set( "Dialog", "Width" ,nWidth1 )
oIni:Set( "Dialog", "Height" ,nHeight1)
RETURN
- Code: Select all Expand view
- FUNCTION ReadINIfile()
local oIni
local nRow1,nCol1,nWidth1,nHeight1
oIni := TIni():New( "CONFIG.INI" )
nRow1 := oIni:Get( "Dialog", "Row" )
nCol1 := oIni:Get( "Dialog", "Col" )
nWidth1 := oIni:Get( "Dialog", "Width" )
nHeight1 := oIni:Get( "Dialog", "Height")
RETURN {nRow1,nCol1,nWidth1,nHeight1}
[Dialog]
Row=2
Col=2
Width=1920
Height=1080
but ReadINIfile() return {0,0,0,0} ...
what i´m donig wrong