BCB读取ini文件

    tiniFile *DataIni;
    AnsiString zport;
    AnsiString e = ExpandFileName("..//Server.ini"); 
    if(FileExists("..//Server.ini"))
    {
        DataIni = new tiniFile(e);
        sqlServer = DataIni->ReadString("sql","sqlServer","");
        zport = DataIni->ReadString("Port","PortData","");
        delete DataIni;
    }

 

Server.ini文件:

[sql]

sqlServer=SERVER1

[Port]

PortData=9999