static int MaloMesta(DWORD nCl) { char ss1[200], ss2[200]; wsprintf(ss1, " %s %s %s.", (Lan+48)->msg, FileSize_Txt(DWORDLONG(maxZapFAT1 - 1 - writeCl) * sCl_B), (Lan+47)->msg); wsprintf(ss2, " %s %s %s.", (Lan+49)->msg, FileSize_Txt(DWORDLONG(nCl) * sCl_B), (Lan+47)->msg); return Error3((Lan+190)->msg, ss1, ss2); //"Запись невозможна, на HDD LG нет свободного места."}, }
/*! \reimp */ bool QAxScriptEngine::initialize(IUnknown **ptr) { *ptr = 0; #ifndef QT_NO_QAXSCRIPT if (!script_code || script_language.isEmpty()) return false; CLSID clsid; HRESULT hres = CLSIDFromProgID((WCHAR*)script_language.utf16(), &clsid); if(FAILED(hres)) return false; CoCreateInstance(clsid, 0, CLSCTX_INPROC_SERVER, IID_IActiveScript, (void**)&engine); if (!engine) return false; IActiveScriptParse *parser = 0; engine->QueryInterface(IID_IActiveScriptParse, (void**)&parser); if (!parser) { engine->Release(); engine = 0; return false; } if (engine->SetScriptSite(script_code->script_site) != S_OK) { engine->Release(); engine = 0; return false; } if (parser->InitNew() != S_OK) { parser->Release(); engine->Release(); engine = 0; return false; } BSTR bstrCode = QStringToBSTR(script_code->scriptCode()); #ifdef Q_OS_WIN64 hres = parser->ParseScriptText(bstrCode, 0, 0, 0, DWORDLONG(this), 0, SCRIPTTEXT_ISVISIBLE, 0, 0); #else hres = parser->ParseScriptText(bstrCode, 0, 0, 0, DWORD(this), 0, SCRIPTTEXT_ISVISIBLE, 0, 0); #endif SysFreeString(bstrCode); parser->Release(); parser = 0; script_code->updateObjects(); if (engine->SetScriptState(SCRIPTSTATE_CONNECTED) != S_OK) { engine = 0; return false; } IDispatch *scriptDispatch = 0; engine->GetScriptDispatch(0, &scriptDispatch); if (scriptDispatch) { scriptDispatch->QueryInterface(IID_IUnknown, (void**)ptr); scriptDispatch->Release(); } #endif return *ptr != 0; }