Nach Hause
Top.Mail.Ru Yandeks.Metrika
Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

Nach unten

Übertragen von Daten in eine Excel-Arbeitsblattzelle Finden Sie ähnliche Zweige


Striker   (2001-12-13 07:59) [0]

Bitte teilen Sie mir mit, wie eine Variable vom Typ string oder real in die angegebene Zelle des EXCEL-Arbeitsblatts geschrieben werden soll (ich möchte ein Beispiel geben).



perov   (2001-12-13 08:21) [1]

ExcelApplication.Connect; ExcelApplication.Workbooks.Add ("", 0); ExcelWorkbook.ConnectTo (ExcelApplication.ActiveWorkbook); ExcelWorksheet.ConnectTo (ExcelWorkbook.Sheets [1] als _WorkSheet); ExcelWorksheet.Activate; ExcelWorksheet.Cells.Item [j, 1] .Value: = j - i; ExcelApplication.Visible [0]: = True;



KIR   (2001-12-13 08:32) [2]

Dies ist auch eine Frage, mit der man sich auseinandersetzen muss, und wie kann diese XL danach ordnungsgemäß geschlossen werden? Und dann funktioniert die Übertragung einmal (obwohl von Excel "I") für mich, und wenn ich es erneut versuche, dann Speicherzuweisungsfehler ...



perov   (2001-12-13 08:44) [3]

ExcelApplication.Disconnect;



Striker   (2001-12-13 09:00) [4]

Big Thank "s zu Hause versuchen.



KIR   (2001-12-13 12:02) [5]

> perov
Schon geschrieben
und ExcelApplication.Disconnect,
und ExcelApplication.Quit,
und FreeAndNil (ExcelApplication) ...
hilft nicht, hier ist ein Stück Code:

ExcelApplication1.Connect;
ExcelApplication1.WorkBooks.Add (n, 0); // n ist der Dateiname
ExcelWorkBook1.ConnectTo (ExcelApplication1.ActiveWorkBook);

{Programmtext}

ExcelApplication.WorkBook1.Close;
ExcelApplication1.Disconnect;



perov   (2001-12-13 12:33) [6]

ExcelWorksheet.Disconnect; ExcelWorkbook.Close; ExcelApplication.Disconnect;



Олег Лаукарт   (2001-12-13 13:33) [7]

In Delphi Kingdom gibt es einige Artikel zum Arbeiten mit Excel



Ынс   (2001-12-13 14:32) [8]

// füge dies zu den Modulen hinzu
verwendet ComObj;
// ...
war
xlApp: Variant;
DataArray: Variant; // zweidimensionales Array wird hier sein
rv: real;
beginnen
rv: = 10.56568;
xlApp: = CreateOleObject ("Excel.Sheet"); // erstelle
xlApp.Application.Visible: = True;

xlApp.Application.Cells [1, 2] .Value: = "23456346"; // du kannst

xlApp.Application.Range ["RealValue1"]. Value: = rv; {es ist möglich und so: "RealValue1" - der Name der Zelle in den "Zellen"}

xlApp.Application.Range ("A1: B8"). Value: = "Nur eine Zeichenfolge, um den Bereich auszufüllen"; {fülle den Bereich in einer Zeile aus}


DataArray: = VarArrayCreate ([0,2,0,2], varVariant); {Erstellt ein Array der Typvariante zum Speichern beliebiger Werte}
DataArray [0, 0]: = "Array-Element";
DataArray [1, 0]: = 38754; // auch ein Array-Element

{Ordnen Sie das gesamte Array dem Bereich sofort per Referenz zu ... billig, zuverlässig und praktisch = -) = insbesondere, wenn Sie ein Array mit Tausenden von 5-Zeilen in den Bericht übertragen müssen ... Wenn Sie dies über eine for-Schleife tun, wird der Bericht für eine lange Zeit tödlich generiert.}

xlApp.Application.Range ("A1: C3): = DataArray;

// Diese Datei für Nachkommen speichern = -)
xlApp.SaveAs ("c: \ docs \ reports \ sample1.xls");

DataArray: = Nicht zugewiesen; // Spuren fegen
xlApp: = Nicht zugewiesen; // Knall und es ...
end;



Striker   (2001-12-15 11:06) [9]

Ich habe hier gestöbert und die Seite (WWW.afalinasoft.com) gefunden. Es gibt nur die Interaktion Delphi & Excel.



Seiten: 1 ganze Branche

Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

nach oben









Speicher: 0.84 MB
Zeit: 0.046 c
1-22252
tovSuhov
2001-12-17 14:22
2002.01.08
C TreeView zaminochka ...


3-21922
Stas
2001-11-29 12:50
2002.01.08
BDE


3-21931
SklifF
2001-12-04 15:59
2002.01.08
Was ist das für ein Fehler? Fähigkeit nicht unterstützt


4-22485
delphixnumx
2001-11-05 06:56
2002.01.08
Wie kann ich meinen Cursor in Delphi laden!


7-22432
Voldemar
2001-09-25 04:12
2002.01.08
Prioritätszuordnung beim Start ...





Afrikanisch Albanien Arabisch Armenisch Aserbaidschanisch Baskisch Weißrusse Bulgarian katalanisch Chinesisch (vereinfacht) Chinesische Tradition) kroatisch Tschechisch Dänisch Dutch Englisch estnisch Philippinisch Finnish Französisch
Galicisch Georgisch Deutsch Griechisch haitian Creole Hebräisch Hindi ungarisch isländisch Indonesian irisch Italian Japanisch Koreanisch lettisch litauisch Makedonisch Malay Maltesisch Norwegian
persisch Polnisch Portugiesisch Rumänisch Russisch serbisch Slovakisch Slowenisch Spanisch Suaheli Swedish Thai Türkisch Ukrainisch Urdu Vietnamesisch Walisisch Jiddisch Bengalisch bosnisch
cebuano Esperanto Gujarati Hausa Hmong igbo Javanisch kannada khmer Laotisch Lateinisch Maorisch Marathi Mongolisch nepali Pandschabi Somalisch Tamilisch Telugu Yoruba
Zulu
Английский Französisch Deutsch Italienisch Португальский Russisch Spanisch