Управление приложениями..., Активизация форм... Таблицы Word Word Document из БД OLEConteiner Вопрос возможностей, пример IStorage.CreateStream, ограничение на длинну имени передача stream через com, TBlobStream - > COM -> файл Как выделить нужный объект в слайде?, PowerPoint TWebBrowser HTML + картинка из stream, Можно ли сделать Как распечатать фрейм из WEBBROWSER, Зная его name Как Вы относитесь к курящим девушкам? Использование SpeechAPI как сделать прокрутку у ole container'a, При это он не активизирован WMI - узнать все о чипсете мат.платы OPC Server, Обмен данными с микроконтроллерами RxLib, подскажите Закрытие com - хранилища shell менюшки, (такие как при правом клике) Drag-n-Drop текста из MSWord в мое приложение, Drag-n-Drop текста из MSWord Webbrowser, замена стандартного ИЕ Как загрузить html код в ИЕ, через адресную строку? Проблемы с TDComconnection, Клиент не связывается с сервером приложе Создание файла из шаблона, Подскажите как в ворде... Открыть папку в окне EXplorer'a, Однако в уже открытом окне... Как загрузить в twebbrowser файл с картинками из Word + список Почему я немогу найти спецпапку? MediaPlayer Как управлять Excel из своей программы? Автоматизация PowerPoint в Delphi., Функция AddOLEObject Не открывается файл Powerpoint WinWord+DDE, создание нового файла DOC->RTF Программа, автоматизирующая работу Excel, на чужом, компе не работает. Почему? Адрес последней ячейки в Excel popup окна и TWebbrowser Загрузка Ворда из Оле, загружается ворд без меню "Файл" TWebBrowser popup, keyboard block com порт в Pascal, дозвон по мопеду Мануал по activeX, help Перемещение листа в конец рабочей книги, в Excel Прочесть файл *.pst!, Прочесть outlook.pst Пересылка таблицы из Excel в PowerPoint, в виде рисунка Сортировка ячеек в Excel Открытие файла Excel TWebBrowser.ProgressChange bug, на заметку всем, кто работает сабжем WebBrowser.HWND, Неопознанная ошибка Web-browser, хелп 8))) Назад-вперёд (Web) проблема!!!, как сделать их не активными!!! WinAPI, Сайты ActiveX Server, Нужно создать свой как узнать позицию конца документа в Word?, как узнать позицию конца документа в Wor Outlook, Поля контактов Поиск в Ворде фразы и вставка ее в Дельфи Получить HTML код странички ActiveX без регистрации, Использование ActiveX только в runtime Как Вы относитесь к курящим девушкам? InternetExplrer, Плагин Формат ячейки Excel, проблема с передачей значений Excel без OLE Модем у меня фуфло! Регистрация ActiveX контрола, Excel не хочет TWebBrowser's parent's parent DataSnap+ADO, Проблема определения пути dll-сервера как работать с IE запущенным в качестве сервера, IE запустило другое приложение как можно использовать dispinterface? WebBrowser: не работают некоторые клавиши Как по нажатию кнопки открыть Word? excel, экспорт Рисование линий таблицы, выравнивание в Excel, По технологии СОМ
|
Платные хостинги
Раскрутка сайта
Книги по программированию
Открытие файла Excel
- Написал код, чтобы открыть существующий файл Excel.Выдало сообщение: Method 'Documents' not supported by automation object. Как исправить эту ошибку.Код снизу:Код procedure TForm1.Button1Click(Sender: TObject);varServerIsRunning: Boolean;Unknown: IUnknown;Result: HResult;AppProgID: String;App: Variant;beginAppProgID:= 'Excel.Application';ServerIsRunning:= False;Result:= GetActiveObject(ProgIDToClassID(AppProgID), nil, Unknown);if (Result = MK_E_UNAVAILABLE) thenApp:= CreateOleObject(AppProgID)else beginApp:= GetActiveOleObject(AppProgID);ServerIsRunning:= True;end;App.Visible:= True;//----------------------------------------------------------App.Documents.Open('E:\Mein\test.xls');//----------------------------------------------------------//if not ServerIsRunning then App.Quit;//App.Unassigned;end;highlightSyntax('delphiI2ZDZl','delphi'); Добавлено @ 16:15 Код uses ComObj, ActiveXhighlightSyntax('delphiNkZGYx','delphi');
- http://forum.vingrad.ru/index.php?act=Sear...&highlite=excelищи об excel`ehttp://forum.vingrad.ru/index.php?showtopic=34912&st=40
- Издеваешься?!По первой ссылке 80% тем мои, которые связаны с созданием рабочей книги в Ecxel'е и с последующими операциями с ними.Перед тем сформировать эту тему, я уже искал и в том, что ты дал по второй ссылке... ни слова!Открытие существующего файла Word по такому же коду, если AppProgID:= 'Word.Application'; происходит без проблем. А вот с Excel'ем загвоздка. В чем тут может дело?Вместо того, чтобы тыкать мне в ссылки, лучше скажи, что не знаю или ничего не говори...
- На мой вопрос никто не может ответить?
- Хм... В виду того, что никто не может ответить на вопрос, отвечаю на него сам... Эх вы! Программеры...Код var Form1: TForm1; ServerIsRunning: Boolean; Unknown: IUnknown; Result: HResult; AppProgID: String; App, Colum, Rang: Variant;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);beginAppProgID:= 'Excel.Application';ServerIsRunning:= False;Result:= GetActiveObject(ProgIDToClassID(AppProgID), nil, Unknown);if (Result = MK_E_UNAVAILABLE) thenApp:= CreateOleObject(AppProgID)else beginApp:= GetActiveOleObject(AppProgID);ServerIsRunning:= True;end;App.Visible:= True;//----------------------------------------------------------App.WorkBooks.Open('E:\Mein\test.xls');//----------------------------------------------------------//if not ServerIsRunning then App.Quit;//App.Unassigned;end;highlightSyntax('delphi1YWQ3N','delphi'); Добавлено @ 15:05
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|