Delphi + Excel

Тема в разделе "Delphi - СОМ", создана пользователем erkanat79, 13 авг 2008.

Статус темы:
Закрыта.
  1. erkanat79

    erkanat79 Гость

    Добрый день! у меня возникла такая проблема нужно переделать отчет, исходников нет, было решение при формирование отчета переделать форму отчета (отчет формируется в Excel). я делаю так
    uses Excel2000.pas
    procedure TForm1.Button1Click(Sender: TObject);
    var LCID: integer;
    Rows , Columns:integer; xlDown:eek:levariant;
    begin
    LCID := GetUserDefaultLCID;
    myexcel.Visible[LCID] := true;
    myexcel.ActiveWindow.OnWindow:='budr21.xls';
    myexcel.Range['A1', 'A1'].Select;
    myexcel.Rows.Insert(xlDown);
    end;
    пытаюсь найти открытый файл далее мне нужно в первой строке добавить ещё 2-е пустые строки, у меня это не получаеться. помогите!
    Заранее огромное спасибо!
    PS Delphi 7 +Excel
     
  2. erkanat79

    erkanat79 Гость

    Добрый день! Найдено решение, может кому ещё поможет:
    xllist.ConnectTo(XL.ActiveSheet as _Worksheet);
    xllist.Range['1:2',EmptyParam].EntireRow.Insert(xlDown);
    xllist.Range['D1',EmptyParam].Select;
     
  3. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    решение решением, но я бы советовал при работе с экселем вопсринимать его как СОМ-обьект и работать с ним соответственно ( в нете полно примеров ). ф топку компоненты - зло, от лукавого
     
  4. erkanat79

    erkanat79 Гость

    Добрый день Morpheus! помоему я только один компонент использую xllist: TExcelWorksheet;
    спасибо учту выше замечание!!!
     
Загрузка...
Похожие Темы - Delphi Excel
  1. 123456789igor
    Ответов:
    5
    Просмотров:
    3.145
  2. GriffinSC
    Ответов:
    15
    Просмотров:
    7.345
  3. cybert
    Ответов:
    0
    Просмотров:
    101
  4. Shouldercannon
    Ответов:
    0
    Просмотров:
    166
  5. antares
    Ответов:
    0
    Просмотров:
    451
Статус темы:
Закрыта.

Поделиться этой страницей