#include <comobj.hpp>
Variant V = Unassigned;
Как открыть и закрыть файл, нужен код
Всем привет.
Нужен код. На форме имеется две кнопки и больше ничего.
на первую надо повесит чтоб он открыл файл 1.doс (который находиться в папке с exe) так чтоб он был за моей формой. т.е. активной была моя форма после открытия файла
а на вторую надо повесит код чтоб закрывала файл 1.doc, который был открыт.
жду от вас помощи. заранее всем благодарен.
жаль, поисковик не помог
Нужен код. На форме имеется две кнопки и больше ничего.
на первую надо повесит чтоб он открыл файл 1.doс (который находиться в папке с exe) так чтоб он был за моей формой. т.е. активной была моя форма после открытия файла
а на вторую надо повесит код чтоб закрывала файл 1.doc, который был открыт.
жду от вас помощи. заранее всем благодарен.
жаль, поисковик не помог
Код:
На батон1 клик:
Код:
V = CreateOleObject("Word.Basic");
AnsiString fname = ExtractFilePath(Application->ExeName)+"1.doc";
V.Exec(Procedure("FileOpen") << fname.c_str() << 1 << 1);
AnsiString fname = ExtractFilePath(Application->ExeName)+"1.doc";
V.Exec(Procedure("FileOpen") << fname.c_str() << 1 << 1);
а потом
Код:
SetForegroundWindow(Form1->Handle);
ЗЫ: а вот еще... забыл блин...
он батон2 клик (дабы закрыть доку):
Код:
V.Exec(Procedure("FileClose") << 1);
V = Unassigned;
V = Unassigned;
вопрос решен. спасибо всем