Использование RES

← →
Ozone © (2003-04-03 13:21) [0]

Подскажите.
Вот я, например, создал res-файл с DOC-вским документом
и пишу такой код:

var
Wa, Wd: Variant;
begin
Wa:=CreateOleObject("Word.Application");
Wd:=Wa.Documents.Open("???") - что мне здесь писать
end;

ЗЫ: в rc-файле писал "doc1 DOC C:\Doc1.doc"

← →
N112 (2003-04-03 14:03) [1]

...сохранить на диск из ресурса во временный файл...

← →
Ozone © (2003-04-04 05:15) [2]

Скажи как сохранить и я это сделаю.......

← →
N112 (2003-04-04 11:44) [3]

Работающий пример, извини, что на Ц++:

resource.rc:

102 DOCUMENTS DISCARDABLE "WordDoc.doc"

main.cpp:

HRSRC hres = FindResource(NULL,"#102","DOCUMENTS");
ULONG size = SizeofResource(NULL,hres);
PCHAR ptr = (PCHAR)LoadResource(NULL,hres);
if (ptr) // !=NULL
{
// Пишем в Doc2.doc
ULONG cb;
HANDLE hfile = CreateFile("Doc2.doc",
GENERIC_WRITE,
0,
NULL,
CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL,
NULL);
WriteFile(hfile,ptr,size,&cb,NULL);
CloseHandle(hfile);
};

← →
Serega © (2003-04-04 12:48) [4]

Попробуй так:

var trs: TResourceStream;
trs:=TResourceStream.Create(hInstance, "doc1", PChar(RT_RCDATA));
try
trs.SaveToFile(root_path+"Doc1.doc");
Wd:=Wa.Documents.Open(root_path+"Doc1.doc")
finally
trs.Free;
end;

// В данном случае doc1 - имя твоего ресурса в rc (res) файле

TO Serega:
Я пишу в rc-файле "doc1 DOC C:\RGZ_2.doc" и компилирую его.
При попытке его открыть
trs:=TResourceStream.Create(hInstance, "doc1", PChar(RT_RCDATA));
получаю ошибку, что типа "Resource doc1 not found".
Как быть?

Как быть?
Может DOC-файлы вообще нельзя загонять в RES.
А если все-таки можно, то как это правильно делать???

Использование RES - файлов Найти похожие ветки