Izvoz v XLSX - Zgodovina strani

Janez Trtnik: /* xlsCV - cell value (posebne vrednosti celic) */

2021-03-12T13:49:03Z

‎xlsCV - cell value (posebne vrednosti celic)

Janez Trtnik: /* Definicija konstant */

2021-03-12T13:47:23Z

‎Definicija konstant

Janez Trtnik: /* Definicija konstant */

2021-03-12T13:43:26Z

‎Definicija konstant

Janez Trtnik: /* NF - number format */

2021-03-12T12:36:01Z

‎NF - number format

Janez Trtnik: /* Definicija konstant */

2021-03-12T12:33:19Z

‎Definicija konstant

Janez Trtnik ob 12:29, 12. marec 2021

2021-03-12T12:29:18Z

Janez Trtnik: /* Osnovni primer */

2021-03-11T16:07:14Z

‎Osnovni primer

Janez Trtnik: /* Prenos podatkov iz baze */

2021-03-11T16:06:43Z

‎Prenos podatkov iz baze

Janez Trtnik: /* Prenos podatkov iz baze */

2021-03-11T15:50:54Z

‎Prenos podatkov iz baze

Janez Trtnik ob 13:32, 11. marec 2021

2021-03-11T13:32:55Z

Prikaži spremembe

@@ Vrstica 80: / Vrstica 80: @@
 == Definicija konstant ==
 === xlsCV - cell value (posebne vrednosti celic) ===
-   xlscvTrue       = ':TRUE';
+   xlscvTrue       // bool TRUE
-   xlscvFalse      = ':FALSE';
+   xlscvFalse      // bool FALSE
-   xlscvAutoColSum = ':AUTOCOLSUM';
+   xlscvAutoColSum // avtomatski seštevek vseh numeričnih celic nad to celico
-   xlscvAutoRowSum = ':AUTOROWSUM';
+   xlscvAutoRowSum // avtomatski seštevek vseh numeričnih celic levo od te celice
 === xlsNF - number format ===

@@ Vrstica 79: / Vrstica 79: @@
 == Definicija konstant ==
-=== CV - cell value (posebne vrednosti celic) ===
+=== xlsCV - cell value (posebne vrednosti celic) ===
    xlscvTrue       = ':TRUE';
    xlscvFalse      = ':FALSE';
@@ Vrstica 85: / Vrstica 85: @@
    xlscvAutoRowSum = ':AUTOROWSUM';
-=== NF - number format ===
+=== xlsNF - number format ===
 Lahko se uporabi poljuben format namesto konstante.
 <pre>
@@ Vrstica 126: / Vrstica 126: @@
 </pre>
-=== BT - border type ===
+=== xlsBT - border type ===
-   xlsbtAll
+   xlsbtAll    // vsi robovi
-   xlsbtVer
+   xlsbtVer    // vsi vertikalni robovi
-   xlsbtHor
+   xlsbtHor    // vsi horizontalni robovi
-   xlsbtLeft
+   xlsbtLeft   // samo levi robovi
-   xlsbtRight
+   xlsbtRight  // samo desni robovi
-   xlsbtTop
+   xlsbtTop    // samo zgornji robovi
-   xlsbtBottom
+   xlsbtBottom // samo spodnji robovi
-=== BS - border style ===
+=== xlsBS - border style ===
    xlsbsNone
    xlsbsThin
    xlsbsMedium
    xlsbsThick
-   xlsbsUnchanged
+   xlsbsUnchanged  // rob se ne spremeni
-=== HA - hor align ===
+=== xlsHA - hor align ===
-   xlshaAuto
+   xlshaAuto   // poravnava se nastavi glede na vsebino: levo za tekst, desno za številke...
    xlshaLeft
    xlshaCenter
    xlshaRight
-=== VA - ver align ===
+=== xlsVA - ver align ===
    xlsvaTop
    xlsvaCenter

@@ Vrstica 86: / Vrstica 86: @@
 === NF - number format ===
 <pre>
    // text

@@ Vrstica 104: / Vrstica 104: @@
    xlsnfFloat4TS = '#,##0.0000';
-   // currency
+   // valute
    xlsnfEuroS = '#,##0.00 €';
    xlsnfEuroL = '#,##0.00 "EUR"';

@@ Vrstica 124: / Vrstica 124: @@
    xlsnfBoolDaNe = '"da";"da";"ne";"ne"';
 </pre>
 == Prenos podatkov iz baze ==

@@ Vrstica 76: / Vrstica 76: @@
    XLS.SetBorders(lefttopCell.Address, rightbottomCell.Address, xlsbtAll, xlsbsThick, xlsbsUnchanged, Black) // cela tabela
 EndSub
 </pre>

@@ Vrstica 2: / Vrstica 2: @@
 <pre>
 Sub PrimerXLS
-  Dim XLS As TXlsWriter
+Dim XLS As TXlsWriter
    Dim titleStyle, headerStyle, cellStyle, footerStyle As TXlsStyle
    Dim lefttopCell, rightbottomCell As TXlsCell
@@ Vrstica 67: / Vrstica 67: @@
    XLS.AddCell(xlscvAutoColSum, xlsnfLong, footerStyle)
    rightbottomCell = XLS.GetCurCell // nastavimo referenco na spodnjo desno celico tabele
    // narišemo robove okoli headerja, footerja in okoli celotne tabele

@@ Vrstica 85: / Vrstica 85: @@
    XLS.AddSheet('List 1')
-  // pripravimo definicijo stolpcev
+    // pripravimo definicijo stolpcev
-   XLS.Table.Clear                                          // prvi klic je opcijski, počisti definicijo stolpcev
+   XLS.Table.Clear // prvi klic je opcijski, počisti definicijo stolpcev
-   XLSF = XLS.Table.AddCounter('Zap. št.')                  // zapisi bodo oštevilceni
+  XLS.Table.StyleTitle.HorAlign = xlshaCenter
-   XLSF.FooterValue = 'Skupaj'                              // v footerju bo fiksen tekst
+  XLS.Table.StyleNormal.FontColor = Gray
-   XLS.Table.AddFieldByName('Naslov polja', 'polje1')       // fiksno nastavimo ime stolpca
-   XLS.Table.AddFieldByName('', 'polje2')                   // ime stolpca je ime polja
+   XLSF = XLS.Table.AddCounter('Zap. št.') // zapisi bodo oštevilceni
-   XLSF = XLS.Table.AddFieldByName('Število', 'polje3')     // numerično polje
+   XLSF.FooterValue = 'Skupaj' // v footerju bo fiksen tekst
-   XLSF.FooterValue = xlscvAutoColSum                       // v footerju bo vsota stolpca
    XLSF = XLS.Table.AddFormula('Vsota 3 in 4', 'IntToStr([polje3].AsNumber + [polje4].AsNumber)') // Basic formula
-   XLSF.FooterValue = xlscvAutoColSum                       // v footerju bo vsota stolpca
+   XLSF.FooterValue = xlscvAutoColSum // v footerju bo vsota stolpca
    XLSF = XLS.Table.AddValue('Vsota levo', xlscvAutoRowSum) // v stolpcu bo vsota številk v vrstici
-   XLSF.FooterValue = xlscvAutoColSum                       // v footerju bo vsota stolpca
+   XLSF.FooterValue = xlscvAutoColSum // v footerju bo vsota stolpca
    // pripravimo podatke

@@ Vrstica 1: / Vrstica 1: @@
 == Prenos podatkov iz baze ==
 <pre>
@@ Vrstica 55: / Vrstica 131: @@
 Sub RoboviXLS(XLS As TXlsWriter)
-   XLS.SetBorders(XLS.Table.LeftTop.RelativeAddress(-1,0), XLS.Table.RightTop.RelativeAddress(-1,0), xlsbtAll, xlsbsMedium, xlsbsUnchanged, Black) // obroba naslova
+   XLS.SetBorders(XLS.Table.LeftTop.RelativeAddress(0, -1), XLS.Table.RightTop.RelativeAddress(0, -1), xlsbtAll, xlsbsMedium, xlsbsUnchanged, Black) // obroba naslova
    XLS.SetBorders(XLS.Table.LeftTop.Address, XLS.Table.RightBottom.Address, xlsbtHor, xlsbsUnchanged, xlsbsThin, Black) // horizontalne črte jedra tabele
    XLS.SetBorders(XLS.Table.LeftTop.Address, XLS.Table.RightTop.Address, xlsbtAll, xlsbsMedium, xlsbsUnchanged, Black) // obroba headerja