Results 1 to 5 of 5

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Just 4 Pleasure Walker's Avatar
    Join Date: Aug:2001
    Location: Ñîôèÿ
    Posts: 1,223

    Export êúì Excel ñ Delphi2005

    Çäðàñòè, ïðîáëåìà å ÷å íå ìè ñå ïîëó÷àâà åêñïîðòà êúì Excel îò dbGrid èëè Table ñ Delphi2005. Îôèñà å 2003. Íàäÿâàì ñå íÿêîé äà ìîæå äà ïîìîãíå.
    X370 Pro4 * Ryzen 7 5700G w/ Deepcool Maelstrom 120k * AVEXIR RGB CORE & ADATA XPG GAMMIX 64 GB RAM * EVGA GTX 1080 TI SC Black Edition GAMING * Asgard 256GB NVMe pcie * Intel 535 480GB * 1 TB A7K1000 * 2 TB F4EG * AOC 28" 4K Ultra HD * Chieftec AEGIS w/Fractal Design NEWTON R2 800W

  2. #2
    Registered User SAGE's Avatar
    Join Date: Sep:2005
    Location: Sofia
    Posts: 171
    Quote Originally Posted by Walker
    Çäðàñòè, ïðîáëåìà å ÷å íå ìè ñå ïîëó÷àâà åêñïîðòà êúì Excel îò dbGrid èëè Table ñ Delphi2005. Îôèñà å 2003. Íàäÿâàì ñå íÿêîé äà ìîæå äà ïîìîãíå.
    Íå ñå ïîëó÷àâà çàùîòî:
    1.Íå çíàåø êàê äà ãî íàïðàâèø?
    èëè
    2.Çíàåø êàê äà ãî íàïðàâèø, íî Excel-à íå ïðèåìà äàííèòå?

    Àêî å 1, òî èìà ìíîãî ãîòîâè ïðèìåðè è ëåñíî ùå íàìåðèø ñ Google.
    Àêî å 2 òî òîãàâà íàé-âåðîÿòíî â Excel å âêëþ÷åíî:
    "Ignore other applications"
    ïðîìåíÿ ñå îò Tools->Options->General

  3. #3
    Just 4 Pleasure Walker's Avatar
    Join Date: Aug:2001
    Location: Ñîôèÿ
    Posts: 1,223
     Excel òàçè îïöèÿ å èçêëþ÷åíà. Äåéñòâèòåëíî íå çíàì êàê äà ãî íàïðàâÿ ñàì è çàòîâà íàïðàâèõ òî÷íî êàêòî òè ïðåïîðú÷âàø - òúðñèõ â íåò-à, íî ñå ïîëó÷àâà òàêà, ÷å âñè÷êè ïëàòåíè êîäîâå ðàáîòÿò áåç ãðèæè, íî åñòåñòâåíî ñà trial è âñå íåùî èìå å îðÿçàíî, à âñè÷êè áåçïëàòíè èëè ãè 'íÿìà íà ñúðâúðà' èëè íå ðàáîòÿò.  ñëó÷àÿ âèçèðàì http://www.torry.net/pages.php?id=555
    X370 Pro4 * Ryzen 7 5700G w/ Deepcool Maelstrom 120k * AVEXIR RGB CORE & ADATA XPG GAMMIX 64 GB RAM * EVGA GTX 1080 TI SC Black Edition GAMING * Asgard 256GB NVMe pcie * Intel 535 480GB * 1 TB A7K1000 * 2 TB F4EG * AOC 28" 4K Ultra HD * Chieftec AEGIS w/Fractal Design NEWTON R2 800W

  4. #4
    Registered User nettle's Avatar
    Join Date: Sep:2003
    Location: Sofia
    Posts: 402
    óòî÷íè êàêâî íå ðàáîòè...
    var
    Excel, WorkBook, Sheet : variant;

    Excel:=CreateOleObject('Excel.Applicatio n');

    Excel.Visible:=True;

    WorkBook := Excel.WorkBooks.Add;

    Sheet := WorkBook.WorkSheets[1];

    Sheet.Cells.Columns.AutoFit;

    Sheet.Cells[2, 2] := 'Data Created at '+datetostr(now);

  5. #5
    Just 4 Pleasure Walker's Avatar
    Join Date: Aug:2001
    Location: Ñîôèÿ
    Posts: 1,223
    Quote Originally Posted by nettle
    óòî÷íè êàêâî íå ðàáîòè...
    var
    Excel, WorkBook, Sheet : variant;

    Excel:=CreateOleObject('Excel.Applicatio n');

    Excel.Visible:=True;

    WorkBook := Excel.WorkBooks.Add;

    Sheet := WorkBook.WorkSheets[1];

    Sheet.Cells.Columns.AutoFit;

    Sheet.Cells[2, 2] := 'Data Created at '+datetostr(now);
    Ìåðñè, òî÷íî òîâà ìè òðÿáâàøå Ñ òîâà êîåòî ñè äàë ðàáîòè ïåðôåêòíî.
    X370 Pro4 * Ryzen 7 5700G w/ Deepcool Maelstrom 120k * AVEXIR RGB CORE & ADATA XPG GAMMIX 64 GB RAM * EVGA GTX 1080 TI SC Black Edition GAMING * Asgard 256GB NVMe pcie * Intel 535 480GB * 1 TB A7K1000 * 2 TB F4EG * AOC 28" 4K Ultra HD * Chieftec AEGIS w/Fractal Design NEWTON R2 800W

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 Õàðäóåð ÁÃ. Âúçìîæíî å ñúäúðæàíèåòî íà òàçè ñòðàíèöà äà å îáåêò íà àâòîðñêè ïðàâà.
iskamPC.com | mobility.BG | Bloody's Techblog | Êðèïòîâàëóòè è ìàéíèíã | 3D Vision Blog | Ìàãàçèí çà åëåêòðîííè öèãàðè