TExcelApplication - как с ним биться? Есть хоть Help?

← →
Andrey-k (2003-01-10 00:09) [0]

Помогите пожалуйста!
Мне надо из AdvStringGrida данные загнать в Excel97 и отпечатать, а Helpa нет, может есть другой более легкий способ для D6?

p.s.
А хваленый AdvStringGrid такую хрень печатает-ужас!

← →
Bis (2003-01-10 08:23) [1]

зайди на Королевство Дельфи, там несколько статей.
Есть куча компонент, которые в Ехсел переводят

← →
OlDemon (2003-01-10 09:56) [2]

Попробуй лучше сам разобраться. Гораздо полезней будет.
Поищи строчку CreateOleObject("Excel.Application")

← →
id_privin (2003-01-10 10:14) [3]

"Королевство" - статья "По волнам интеграции".

← →
Andrey-k (2003-01-10 22:24) [4]

спасибо, вот неплохой адресок http://www.afalinasoft.com/rus/tips/index.html

← →
Barman (2003-01-10 22:35) [5]

Согласен с OlDemon- ом. Лучше всего работать без компонентов.
А вообще, есть один очень хороший хелп и он находится в самом Экселе. "Сервис", "Макрос", "Начать запись"- лучше не бывает! А потом просто смотришь VB-код и пишешь по аналогии. Я так делаю.

← →
asmith (2003-01-11 17:02) [6]

И еще один совет - в Excel таблицу быстрее всего можно вставить через вариантный массив - создать, заполнить данными AdvStringGrida и вставить. Excel именно так делает при копировании данных. Подробнее можно почитать в MSDN.

← →
БурЖуй (2003-01-11 20:35) [7]

Barman, я понял твою идею, но можешь подсказать, как программно открыть ексель, выполнить определённый макрос, и сохранить полученый результат в определённый файл?

← →
Бандерлоги (2003-01-11 20:51) [8]

> Barman © (10.01.03 22:35)

Согласны с Barman - ом.

← →
Бандерлоги (2003-01-11 21:08) [9]

> БурЖуй © (11.01.03 20:35)

procedure TMainForm.Button1Click(Sender: TObject);
var Xl: Variant;
begin
Xl := CreateOleObject("Excel.Application");
Xl.WorkBooks.Open("F:\Documents\Microsoft Excel\Спецификация.xls");
Xl.Visible := True;
Xl.Run("Макрос1");
end;

Сам макрос, записанный в Excel VBA выглядит так:

Sub Макрос1()
"
" Макрос1 Макрос
" Макрос записан 11.01.2003 (Nomad)
"

"
Sheets.Add
ActiveWorkbook.Save
End Sub

← →
БурЖуй (2003-01-11 21:56) [10]

Бандерлоги, спасибо, попробую... Только вот незадача... звонил только что заказчику, говорит, мол у него не на всех тачках стоят ексели и ставить для меня не собирается... идиот. так что народ, подскажите, пару провереных компонентов!

← →
Andrey-k (2003-01-12 11:49) [11]

похоже XL Report.Net неплохая вещь - только платная :)

← →
Anatoly Podgoretsky (2003-01-12 12:07) [12]

Он прав и это он не идиот, ради тебя и еще что то покупать, есть несколько вариантов:

1. сделай что бы работало без Экселя, ты же программист или нет.
2. купи им коробочные версии Экселя, это если ты не программист.
3. купить компоненты третьих сторон которые работают без экселя.
4. поставить Excel Viewer, если вообще, что то можно ставить на те компьютеры.

← →
БурЖуй (2003-01-12 21:39) [13]

Anatoly Podgoretsky, вот и пытаюсь сделать без екселя, только вот найти нормальные компоненты не могу, была тут одна dllка которая переводила текстовые файлы в xls... только вот от неё толку нету :( Ведь мне и размаеры полей нужно задать...

← →
TTCustomDelphiMaster (2003-01-12 21:54) [14]

Интересно а эти компоненты могут печатать Excel"евские файлы?
Попробуй "старым дедовским способом" выводить на Canvas принтера.

← →
Andrey-k (2003-01-12 21:59) [15]

>asmith
1. Примеров вставки из массива полно , но как объединять ячейки и как нарисовать таблицу(изменить акантовку cellа)? Таких команд я не нашел, а без Excel никак не обойтись.

2.
> Anatoly Podgoretsky
5. А если Я хреновый программист, и у меня нет VBAXL8.HLP, и мне не ясно почему код с
http://www.afalinasoft.com/rus/tips/delphi-excel-workbook-3.html
не меняет названии созданной книги
var IWorkbook: Excel8TLB._Workbook; ... IWorkbook.Names.Add("NewName", "=Лист!1$A$1:$D$3", EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,EmptyParam, EmptyParam, EmptyParam, EmptyParam);
Просто пишет "ошибка в формуле"?!
спасибо

← →
Andrey-k (2003-01-12 22:05) [16]

может у кого есть (Vbaxl8.hlp) намылит? Буду очень признателен

← →
БурЖуй (2003-01-12 22:15) [17]

TTCustomDelphiMaster, в описаниях многих пишеться мол пишут, но зачастую у меня не получается нормально установить их :(

TExcelApplication - как с ним биться? Есть хоть Help? Найти похожие ветки