Subversion Repositories filter_foundry

Rev

Rev 18 | Rev 35 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 18 Rev 23
Line 45... Line 45...
45 
        return TRUE;
 45 
        return TRUE;
46 
}
 46 
}
47 
*/
 47 
*/
48 
 
 48 
 
49 
Boolean doresources(HMODULE srcmod,char *dstname){
 49 
Boolean doresources(HMODULE srcmod,char *dstname){
50 
        OSErr e = noErr;
 - 
 
51 
        int i;
 50 
        int i;
52 
 
 51 
 
53 
        HRSRC datarsrc,piplrsrc,aetersrc;
 52 
        HRSRC datarsrc,aetersrc;
54 
        HANDLE datah,aeteh,hpipl,hupdate;
 53 
        HANDLE datah,aeteh,hupdate;
55 
        Ptr newpipl = NULL,newaete = NULL,datap,aetep;
 54 
        Ptr newpipl = NULL,newaete = NULL,datap,aetep;
56 
        PARM_T *pparm = NULL;
 55 
        PARM_T *pparm = NULL;
57 
 
 56 
 
58 
        PIPropertyList *pipl;
 - 
 
59 
        short srcrn,dstrn;
 - 
 
60 
        Handle h;
 - 
 
61 
        long piplsize,aetesize,titlesize,catsize,*lp,origsize;
 57 
        long piplsize,aetesize,origsize;
62 
        Str255 title;
 58 
        Str255 title;
63 
        char s[0x100];
 59 
        //char s[0x100];
64 
       
 60 
       
65 
        Boolean discard = true;
 61 
        Boolean discard = true;
66 
 
 62 
 
67 
//      if(!EnumResourceLanguages(srcmod,"PiPL",MAKEINTRESOURCE(16000),enumfunc,0))
63 
//      if(!EnumResourceLanguages(srcmod,"PiPL",MAKEINTRESOURCE(16000),enumfunc,0))
68 
//              dbglasterror("EnumResourceLanguages");
 64 
//              dbglasterror("EnumResourceLanguages");
69 
 
 65 
 
70 
        if(hupdate = BeginUpdateResource(dstname,false)){
 66 
        if( (hupdate = BeginUpdateResource(dstname,false)) ){
71 
                DBG("BeginUpdateResource OK");
 67 
                DBG("BeginUpdateResource OK");
72 
                if( (datarsrc = FindResource(srcmod,MAKEINTRESOURCE(16000),RT_RCDATA))
 68 
                if( (datarsrc = FindResource(srcmod,MAKEINTRESOURCE(16000),RT_RCDATA))
73 
                        && (datah = LoadResource(srcmod,datarsrc))
 69 
                        && (datah = LoadResource(srcmod,datarsrc))
74 
                        && (datap = LockResource(datah))
 70 
                        && (datap = LockResource(datah))
75 
                        && (aetersrc = FindResource(srcmod,MAKEINTRESOURCE(16000),"AETE"))
 71 
                        && (aetersrc = FindResource(srcmod,MAKEINTRESOURCE(16000),"AETE"))