I thinked to make
Code: Select all | Expand
oText := TTxtFile():New( "C:\WINDOWS\WIN.INI" )
IF oText:Open()
oText:goto(2)
IF !UPPER(oText:ReadLine()) = "LOAD=C:\WINDOWS\myprog.EXE"
oText:insline( "LOAD=C:\WINDOWS\myprog.EXE" )
ENDIF
oText:Close()
ENDIF
But I thiink it can go for windows xp but for win seven and win 10 ?