->Ich habe eine Datenbankdate, lese diese Datensatz für Datensatz aus
->und möchte diese Datensätze in eine DBase-Datei schreiben, nachdem ich
->einige Überprüfungen durchgeführt habe. Wie erhält man unter Pascal
nun, für pascal hatte ich einst ein ähnliches problem, und in diversen
tool-sammlungen nur routinen gefunden, welche eine bestehende dbase-
datei lesen/schreiben/ändern, keine welche eine dbase-date erzeugt.
gibt's bestimmt auch (ja, ich erinnere mich an topaz, eine kommerzielle
tool-sammlung rund um das thema), aber ich bin dann einfach hergegangen,
habe mit der delphi-datenbankoberfläche mir eine leere dbase-datei
mit der gewünschten struktur erzeugt, und den block direkt in mein
pascal-programm eingebunden. man kann dann relativ einfach die
dbase-datei erzeugen, indem man diesen block und dann nacheinander
satz für satz schreibt, alles als ascii. bei interesse kann ich dies
auch noch näher erleutern.
->oder Delphi eine DBase-Datei und wie fürgt man einen neuen Datensatz
nun in delphi ist die unterstützung über die dbe ja 'eingebaut'.
ciao
christian
--------------------------------------------------------------------
e-mail: ch.ko...@link-n.cl.sub.de WWW: www.chk.de
ch.ko...@fen.baynet.de
eine sicherlich einfache Frage: Wo findet man Informationen/Quelltexte
zu folgendem Problem:
Ich habe eine Datenbankdate, lese diese Datensatz für Datensatz aus
und möchte diese Datensätze in eine DBase-Datei schreiben, nachdem ich
einige Überprüfungen durchgeführt habe. Wie erhält man unter Pascal
oder Delphi eine DBase-Datei und wie fürgt man einen neuen Datensatz
an eine solche an?
Vielen Dank für jeden Tip im voraus
Uwe (ol...@t-online.de)
und Gerd
- Tabelle mit Tool "Datenbankoberfläche" erstellen
- in Deinem Programm ein Datenmodul erstellen, darin
eine TTable- und eine TDataSource-Komponente erstellen
- in TTable mind. DatabaseName (ein Alias oder ein Verzeichnisname)
und TableName (Dateiname) einstellen
Zugriff auf Tabelle:
With DataModule1 Do Begin
// Tabelle öffnen
Table1.Open; // oder Property Active auf True
// Hier könnte eine Schleife starten, die durch Deine alte
// Tabelle geht
// neuen Datensatz anlegen
Table1.Append;
// Daten zuweisen,
// z.B. Table1.FieldByName ('Feld1').AsString := 'Test';
// Datensatz in Tabelle schreiben
Table1.Post;
// hier würde die Schleife enden
// am Ende Tabelle schließen
Table1.Close;
End;
Ist doch ganz einfach, oder?
Gerd Roethig schrieb:
Für Pascal gibt es doch die Xbase unit von Antivivisection.
http://www.geocities.com/SiliconValley/2926/tp.html
Kapitel "source".
MfG Franz Glaser
Nun solltest Du mit TTable. Create(... und einem ewigen Rattenschwanz von
Feldbezeichnungen eine wunderschöne dBase-Tabelle anlegen können.
Wie gesagt, genaue Beschreibung in D-Online-Hilfe!
Gruß
Martin