Перейти к содержимому


Фотография
- - - - -

Репорты в Excel без установленного Excel

Автор темы: GeX, Дек 03 2007 18:35

  • Пожалуйста, авторизуйтесь, чтобы ответить
15 ответов в этой теме

#1 GeX

GeX

    Super True Member

  • Moderators
  • PipPipPipPipPip
  • 11 350 сообщений
111
Очень хороший
  • Пол:Мужчина
  • Город:Ленинский 110/2

Опубликовано 03 Декабрь 2007 - 18:35

Subj для Delphi 7
  • 0
Я в контакте Ты должен быть сильным, иначе, зачем тебе быть
Размещенное изображениеРазмещенное изображение
Размещенное изображениеРазмещенное изображение

#2 Sky

Sky

    Advanced Member

  • True Members
  • PipPipPip
  • 60 сообщений
0
Обычный
  • Пол:Мужчина

Опубликовано 03 Декабрь 2007 - 23:46

генери xml файлы - офис его открывает
  • 0

#3 GeX

GeX

    Super True Member

  • Moderators
  • PipPipPipPipPip
  • 11 350 сообщений
111
Очень хороший
  • Пол:Мужчина
  • Город:Ленинский 110/2

Опубликовано 04 Декабрь 2007 - 00:13

генери xml файлы - офис его открывает


Обычные XML ? Вроде как нет. Пример можешь выложить ?
  • 0
Я в контакте Ты должен быть сильным, иначе, зачем тебе быть
Размещенное изображениеРазмещенное изображение
Размещенное изображениеРазмещенное изображение

#4 Taciturn

Taciturn

    Super True Member

  • True Members
  • PipPipPipPipPip
  • 11 550 сообщений
924
Очень хороший
  • Пол:Мужчина
  • Город:185.115.97.177, Ленинский 96/1

Опубликовано 04 Декабрь 2007 - 00:18

Обычные XML ? Вроде как нет. Пример можешь выложить ?

А самому взять Excel и при сохранении выбрать xml никак?
  • 0

#5 лайт

лайт

    iddqd

  • True Members
  • PipPipPipPipPip
  • 3 843 сообщений
9
Обычный
  • Пол:Мужчина

Опубликовано 04 Декабрь 2007 - 00:22

А самому взять Excel и при сохранении выбрать xml никак?

это звучит как предЪява :lol:
  • 0

#6 GeX

GeX

    Super True Member

  • Moderators
  • PipPipPipPipPip
  • 11 350 сообщений
111
Очень хороший
  • Пол:Мужчина
  • Город:Ленинский 110/2

Опубликовано 04 Декабрь 2007 - 00:23

А самому взять Excel и при сохранении выбрать xml никак?


Да легко. Тока она кривляется =\

Вложенный файл  1231321.JPG   148,36 КБ   5 Скачано

UPD
Сохранил =)
Но это пзц.... для таблички на скриншоте получаеццо такой файл..... О_о

<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o="urn:schemas-microsoft-com:office:office"
 xmlns:x="urn:schemas-microsoft-com:office:excel"
 xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:html="http://www.w3.org/TR/REC-html40">
 <DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
  <Author>Customer</Author>
  <LastAuthor>Customer</LastAuthor>
  <Created>2007-12-03T20:20:13Z</Created>
  <Company>Reanimator Extreme Edition</Company>
  <Version>12.00</Version>
 </DocumentProperties>
 <ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel">
  <WindowHeight>9075</WindowHeight>
  <WindowWidth>18975</WindowWidth>
  <WindowTopX>120</WindowTopX>
  <WindowTopY>30</WindowTopY>
  <ProtectStructure>False</ProtectStructure>
  <ProtectWindows>False</ProtectWindows>
 </ExcelWorkbook>
 <Styles>
  <Style ss:ID="Default" ss:Name="Normal">
   <Alignment ss:Vertical="Bottom"/>
   <Borders/>
   <Font ss:FontName="Calibri" x:CharSet="204" x:Family="Swiss" ss:Size="11"
	ss:Color="#000000"/>
   <Interior/>
   <NumberFormat/>
   <Protection/>
  </Style>
 </Styles>
 <Worksheet ss:Name="Р›ист1">
  <Table ss:ExpandedColumnCount="4" ss:ExpandedRowCount="3" x:FullColumns="1"
   x:FullRows="1" ss:DefaultRowHeight="15">
   <Row>
	<Cell><Data ss:Type="Number">1</Data></Cell>
	<Cell><Data ss:Type="Number">2</Data></Cell>
	<Cell><Data ss:Type="Number">2</Data></Cell>
   </Row>
   <Row>
	<Cell ss:Index="2"><Data ss:Type="Number">3</Data></Cell>
	<Cell><Data ss:Type="Number">3</Data></Cell>
   </Row>
   <Row>
	<Cell ss:Index="2"><Data ss:Type="Number">4</Data></Cell>
	<Cell><Data ss:Type="Number">4</Data></Cell>
	<Cell><Data ss:Type="Number">4</Data></Cell>
   </Row>
  </Table>
  <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
   <PageSetup>
	<Header x:Margin="0.3"/>
	<Footer x:Margin="0.3"/>
	<PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
   </PageSetup>
   <Selected/>
   <Panes>
	<Pane>
	 <Number>3</Number>
	 <ActiveRow>3</ActiveRow>
	 <ActiveCol>1</ActiveCol>
	</Pane>
   </Panes>
   <ProtectObjects>False</ProtectObjects>
   <ProtectScenarios>False</ProtectScenarios>
  </WorksheetOptions>
 </Worksheet>
 <Worksheet ss:Name="Р›ист2">
  <Table ss:ExpandedColumnCount="1" ss:ExpandedRowCount="1" x:FullColumns="1"
   x:FullRows="1" ss:DefaultRowHeight="15">
  </Table>
  <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
   <PageSetup>
	<Header x:Margin="0.3"/>
	<Footer x:Margin="0.3"/>
	<PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
   </PageSetup>
   <ProtectObjects>False</ProtectObjects>
   <ProtectScenarios>False</ProtectScenarios>
  </WorksheetOptions>
 </Worksheet>
 <Worksheet ss:Name="Р›ист3">
  <Table ss:ExpandedColumnCount="1" ss:ExpandedRowCount="1" x:FullColumns="1"
   x:FullRows="1" ss:DefaultRowHeight="15">
  </Table>
  <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
   <PageSetup>
	<Header x:Margin="0.3"/>
	<Footer x:Margin="0.3"/>
	<PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
   </PageSetup>
   <ProtectObjects>False</ProtectObjects>
   <ProtectScenarios>False</ProtectScenarios>
  </WorksheetOptions>
 </Worksheet>
</Workbook>

  • 0
Я в контакте Ты должен быть сильным, иначе, зачем тебе быть
Размещенное изображениеРазмещенное изображение
Размещенное изображениеРазмещенное изображение

#7 Taciturn

Taciturn

    Super True Member

  • True Members
  • PipPipPipPipPip
  • 11 550 сообщений
924
Очень хороший
  • Пол:Мужчина
  • Город:185.115.97.177, Ленинский 96/1

Опубликовано 04 Декабрь 2007 - 00:25

Да легко. Тока она кривляется =\

О, как интересно. Первый попавшийся файл легко сохранился в xml.
ftp://77.244.212.59/Temp/Расписание 200712.xml
  • 0

#8 GeX

GeX

    Super True Member

  • Moderators
  • PipPipPipPipPip
  • 11 350 сообщений
111
Очень хороший
  • Пол:Мужчина
  • Город:Ленинский 110/2

Опубликовано 04 Декабрь 2007 - 00:29

Хех, ну и как с этим всем разбираццо ?
Вроде проще через Stream запонлнять, но на эту тему я тож так и не нашел достаточной инфы =(
  • 0
Я в контакте Ты должен быть сильным, иначе, зачем тебе быть
Размещенное изображениеРазмещенное изображение
Размещенное изображениеРазмещенное изображение

#9 Sky

Sky

    Advanced Member

  • True Members
  • PipPipPip
  • 60 сообщений
0
Обычный
  • Пол:Мужчина

Опубликовано 04 Декабрь 2007 - 00:43

Хех, ну и как с этим всем разбираццо ?
Вроде проще через Stream запонлнять, но на эту тему я тож так и не нашел достаточной инфы =(


ну описание этого формата есть в msdn. - на самао деле там вроде все понятно - вначале идет заголовок, потом описание стилей и сами поля.
Делаешь какой-нибудь тестовый файл excel - форматируешь его (задаешь цвета, ограничения, форматы ячеек), заполняешь данными типа 1 2 3 4 - чтобы можно было найти эти данные в xml - ну а дальше по образу и подобию ваша программа должна это генерить.
  • 0

#10 Noir

Noir

    Super Ъ Member

  • True Members
  • PipPipPipPipPip
  • 3 151 сообщений
1
Обычный
  • Пол:Мужчина

Опубликовано 04 Декабрь 2007 - 20:40

Да легко. Тока она кривляется =\

Вложенный файл  1231321.JPG   148,36 КБ   5 Скачано

UPD
Сохранил =)
Но это пзц.... для таблички на скриншоте получаеццо такой файл..... О_о

<?xml version="1.0"?>
 <?mso-application progid="Excel.Sheet"?>
 <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
  xmlns:o="urn:schemas-microsoft-com:office:office"
  xmlns:x="urn:schemas-microsoft-com:office:excel"
  xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet"
  xmlns:html="http://www.w3.org/TR/REC-html40">
  <DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
   <Author>Customer</Author>
   <LastAuthor>Customer</LastAuthor>
   <Created>2007-12-03T20:20:13Z</Created>
   <Company>Reanimator Extreme Edition</Company>
   <Version>12.00</Version>
  </DocumentProperties>
  <ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel">
   <WindowHeight>9075</WindowHeight>
   <WindowWidth>18975</WindowWidth>
   <WindowTopX>120</WindowTopX>
   <WindowTopY>30</WindowTopY>
   <ProtectStructure>False</ProtectStructure>
   <ProtectWindows>False</ProtectWindows>
  </ExcelWorkbook>
  <Styles>
   <Style ss:ID="Default" ss:Name="Normal">
	<Alignment ss:Vertical="Bottom"/>
	<Borders/>
	<Font ss:FontName="Calibri" x:CharSet="204" x:Family="Swiss" ss:Size="11"
	 ss:Color="#000000"/>
	<Interior/>
	<NumberFormat/>
	<Protection/>
   </Style>
  </Styles>
  <Worksheet ss:Name="Р›ист1">
   <Table ss:ExpandedColumnCount="4" ss:ExpandedRowCount="3" x:FullColumns="1"
	x:FullRows="1" ss:DefaultRowHeight="15">
	<Row>
	 <Cell><Data ss:Type="Number">1</Data></Cell>
	 <Cell><Data ss:Type="Number">2</Data></Cell>
	 <Cell><Data ss:Type="Number">2</Data></Cell>
	</Row>
	<Row>
	 <Cell ss:Index="2"><Data ss:Type="Number">3</Data></Cell>
	 <Cell><Data ss:Type="Number">3</Data></Cell>
	</Row>
	<Row>
	 <Cell ss:Index="2"><Data ss:Type="Number">4</Data></Cell>
	 <Cell><Data ss:Type="Number">4</Data></Cell>
	 <Cell><Data ss:Type="Number">4</Data></Cell>
	</Row>
   </Table>
   <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
	<PageSetup>
	 <Header x:Margin="0.3"/>
	 <Footer x:Margin="0.3"/>
	 <PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
	</PageSetup>
	<Selected/>
	<Panes>
	 <Pane>
	  <Number>3</Number>
	  <ActiveRow>3</ActiveRow>
	  <ActiveCol>1</ActiveCol>
	 </Pane>
	</Panes>
	<ProtectObjects>False</ProtectObjects>
	<ProtectScenarios>False</ProtectScenarios>
   </WorksheetOptions>
  </Worksheet>
  <Worksheet ss:Name="Р›ист2">
   <Table ss:ExpandedColumnCount="1" ss:ExpandedRowCount="1" x:FullColumns="1"
	x:FullRows="1" ss:DefaultRowHeight="15">
   </Table>
   <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
	<PageSetup>
	 <Header x:Margin="0.3"/>
	 <Footer x:Margin="0.3"/>
	 <PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
	</PageSetup>
	<ProtectObjects>False</ProtectObjects>
	<ProtectScenarios>False</ProtectScenarios>
   </WorksheetOptions>
  </Worksheet>
  <Worksheet ss:Name="Р›ист3">
   <Table ss:ExpandedColumnCount="1" ss:ExpandedRowCount="1" x:FullColumns="1"
	x:FullRows="1" ss:DefaultRowHeight="15">
   </Table>
   <WorksheetOptions xmlns="urn:schemas-microsoft-com:office:excel">
	<PageSetup>
	 <Header x:Margin="0.3"/>
	 <Footer x:Margin="0.3"/>
	 <PageMargins x:Bottom="0.75" x:Left="0.7" x:Right="0.7" x:Top="0.75"/>
	</PageSetup>
	<ProtectObjects>False</ProtectObjects>
	<ProtectScenarios>False</ProtectScenarios>
   </WorksheetOptions>
  </Worksheet>
 </Workbook>


Ох уж этот OOXML)))
  • 0

#11 Malder

Malder

    Super True Member

  • True Members
  • PipPipPipPipPip
  • 1 330 сообщений
0
Обычный
  • Пол:Мужчина

Опубликовано 05 Декабрь 2007 - 22:26

а че, excel вообще никак не поставить и заполнять через ole?
  • 0

#12 GeX

GeX

    Super True Member

  • Moderators
  • PipPipPipPipPip
  • 11 350 сообщений
111
Очень хороший
  • Пол:Мужчина
  • Город:Ленинский 110/2

Опубликовано 05 Декабрь 2007 - 23:30

а че, excel вообще никак не поставить и заполнять через ole?


Да легко, это уже давно сделано. Но требуют что бы была возможность сделать репорт без установленного экселя. Да и работать это будет в *цать раз быстрее......
  • 0
Я в контакте Ты должен быть сильным, иначе, зачем тебе быть
Размещенное изображениеРазмещенное изображение
Размещенное изображениеРазмещенное изображение

#13 Malder

Malder

    Super True Member

  • True Members
  • PipPipPipPipPip
  • 1 330 сообщений
0
Обычный
  • Пол:Мужчина

Опубликовано 06 Декабрь 2007 - 18:49

Да легко, это уже давно сделано. Но требуют что бы была возможность сделать репорт без установленного экселя. Да и работать это будет в *цать раз быстрее......

Тут ты не прав. Через оле все очень быстро. Хотя конечно если тебе реально много инфы надо в Excel, то может и медленно :unsure:
  • 0

#14 GeX

GeX

    Super True Member

  • Moderators
  • PipPipPipPipPip
  • 11 350 сообщений
111
Очень хороший
  • Пол:Мужчина
  • Город:Ленинский 110/2

Опубликовано 06 Декабрь 2007 - 19:10

Тут ты не прав. Через оле все очень быстро. Хотя конечно если тебе реально много инфы надо в Excel, то может и медленно :unsure:


Быстро ??? Ты сам то пробовал ???? Попробуй добавить тысяч 5-10 записей с форматированием.... и посмотри скока это времени займет.
  • 0
Я в контакте Ты должен быть сильным, иначе, зачем тебе быть
Размещенное изображениеРазмещенное изображение
Размещенное изображениеРазмещенное изображение

#15 Malder

Malder

    Super True Member

  • True Members
  • PipPipPipPipPip
  • 1 330 сообщений
0
Обычный
  • Пол:Мужчина

Опубликовано 07 Декабрь 2007 - 18:31

Яж говорю, если инфы много, то да. Сам же я более 1000 записей (правда через с++, но это не важно) не выводил.
  • 0

#16 Барсуслятина

Барсуслятина

    Advanced Member

  • True Members
  • PipPipPip
  • 40 сообщений
2
Обычный

Опубликовано 16 Январь 2008 - 17:14

TXlsReadWrite, TXlsFile - правда платные....
5000-10000 можно добавить если передавать сразу Range

Алкогольная декларация?
  • 0
Вернуться в Программирование

Посетителей, читающих эту тему: 1

0 пользователей, 1 гостей, 0 анонимных пользователей

  1. SWNET
  2. → Разное
  3. → Программирование
  4. Privacy Policy