Eingegebene Zahlen in Excel-Datei speichern

[Its Me]

Hallo, ich habe einige Schwierigkeiten dabei, mein Programm so zu gestalten, wie ich es gerne möchte.

Ich möchte Zahlen, die ich zuerst eingegeben habe in einer Excel-Datei speichern.
Wie stelle ich das am Besten an?

Ich hoffe jemand von euch kann mir eine simple Antwort geben.


Vielen Dank im Voraus.

[mkinzler]

Per COM/OLE Automatisierung von Excel
http://www.dsdt.info/tutorials/automation/

[Its Me]

Danke für den Link,
ich habe ihn gelesen, er hilft mir aber nicht wirklich weiter.
Ich möchte die Zahlen in einer Konsolenanwendung eingeben.
Wenn ich aber den Code aus dem Link eingebe, beschwert sich mein Delphi immer, dass es so nicht funktioniert.

[mkinzler]

Zitat:

Wenn ich aber den Code aus dem Link eingebe, beschwert sich mein Delphi immer, dass es so nicht funktioniert.

Welchen fehler?

[DeddyH]

Welchen Code? ;)

[Its Me]

Der erste Fehler ist, dass ich bei folgenden Quellcode keinen Punkt setzen darf

procedure TForm1.Button1Click(Sender: TObject);

[DeddyH]

In einer Konsolenanwendung gibt es weder ein Formular noch einen Button.

[Its Me]

heißt das, dass es in einer Konsolenanwendung keine Möglichkeit gibt,
die eingegebenen Zahlen in einer Excel-Datei zu speichern?

[mkinzler]

Doch, aber es gibt halt keine Button, den man drückt.

[Its Me]

und wie stelle es dann an, dass ich die Werte speichern kann?

[DeddyH]

Das habe ich nicht gesagt, aber es hat keinen Sinn, wenn Du nur den Code 1:1 kopierst, das Verständnis ist wichtig. Außerdem, wenn es nicht unbedingt *.xls sein muss, versuch es doch mal einen Gang niedriger mit einer *.csv.

[Its Me]

Kannst du mir mal den Befehl sagen, mit dem man Werte in eine Datei schreibt?

[mkinzler]

AssignFile, Rewrite, WriteLn

[Its Me]

Das verstehe ich ja,
Aber wie sage ich, dass er einen Wert a, den ich zuvor einggeben habe
dann darin speichert?

[mkinzler]

Delphi-Quellcode:

Writeln( f, a);

[DeddyH]

Dateivariable zuweisen:

Delphi-Quellcode:

AssignFile(Dateivariable, Dateiname);

Datei anlegen/überschreiben:

Delphi-Quellcode:

Rewrite(Dateivariable);

Daten an Datei anhängen:

Delphi-Quellcode:

Append(Dateivariable);

Zeile in Datei schreiben:

Delphi-Quellcode:

WriteLn(Dateivariable, Daten);

Datei schließen:

Delphi-Quellcode:

CloseFile(Dateivariable);

Schau mal zu den genannten Methoden in der Hilfe nach, vor allem, was die Fehlerbehandlung angeht.

[Its Me]

Okay, die Befehle habe ich jetzt so hingekriegt, wie ich es wollte.
Aber kann ich die Eigegebenen Zahlen auch einer genauen Position bei Excel zuweisen?
zum Beispeil in A1 oder B1?

[mkinzler]

Du musst sie nur in der richtigen Reihenfolge ausgeben: 1.Wert: 1 Zeile 1. Spalte

[DeddyH]

Sry, aber solltest Du nicht lieber Schritt für Schritt vorgehen? Ich weiß, am Anfang möchte man immer gleich programmiertechnisch sofort die ganze Welt erobern, aber die Welt stellt sich meist etwas komplizierter dar. Solltest Du Dich zunächst für csv entschieden haben, musst Du Deine Daten ja erst einmal sortieren, um zumindest die Zeile bestimmen zu können.

[edit] *grmpf* mkinzler, ich überlasse Dir jetzt das Feld und begebe mich in' s Bett, Du bist ja eh immer schneller [/edit]

[Its Me]

Mit der Reihenfolge der Ausgabe komme ich immer eine Zeile weiter runter.
Von A1 zu A2, zu A3, ...
Aber wie komme ich zur zweiten Spalte, also zu B1?

[mkinzler]

Delphi-Quellcode:

Writeln( f, '<A1>;<A2>;...');
WriteLn( f, '<B1>;<B2>;...');

[Its Me]

Danke für die Hilfe :thumb: :thumb: :thumb:
ich habe es hingekriegt.