function SetupRegistry()
    NUMBER nResult;

    //2002.04.24 민인학////////////
    #define Path TARGETDIR
    STRING szDirectoryPath, szParamFilePath, szPort;
    STRING svString;
    STRING szKey, szName, szValue;
    NUMBER nType, nSize;
    STRING szMsg, szDefault, svResult, svValue, szTitle;
    /////////////////////////////

begin

        // TODO : Add all your registry entry keys here
        //
        //
        //    RegDBCreateKeyEx, RegDBSetKeyValueEx....
        //

        szDirectoryPath = Path;
        szKey = "\\SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment";

        //Path 설정
        szValue = szDirectoryPath+"\\iBuilder";
        nType = REGDB_STRING;
        nSize = -1;
        RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);

        // 환경변수 등록
        RegDBSetKeyValueEx ( szKey , "ISAVE" , nType , szValue , nSize );
        RegDBSetKeyValueEx ( szKey , "ISAVE_IFLIB" , nType , szValue , nSize );

        // 패스 추가
        if (AddPath( "%ISAVE%\\bin" ) < 0) then
          MessageBox("AddPath failed.", SEVERE);
          abort;
        endif;

        //C:\Inprise\vbroker\bin;C:\PROGRA~1\Borland\CBUILD~1\Projects\Bpl;C:\PROGRA~1\Borland\CBUILD~1\Bin;%SystemRoot%\system32;%SystemRoot%;%SystemRoot%\System32\Wbem;c:\cygwin\bin;C:\PROGRA~1\Borland\Delphi6\Bin;C:\PROGRA~1\Borland\Delphi6\Projects\Bpl;%XILINX%\bin\nt;

        nResult = CreateRegistrySet( "" );

        return nResult;
end;

해결했습니다.... 위와 같이요...

민인학 님이 쓰신 글 :
: 꼭좀 부탁드립니다...
: 급하거든요...
: 아참 볼랜드의 인스톨쉴드 익스프레스가 아니라...
: MS비쥬얼스튜디오에 포함되어 있는 인스톨쉴드 입니다.
:
: 그럼 좋은 하루 마감하시길 바랍니다.