DBF-Neulingfrage: Wie kann ich eine Query über mehrere DBF-Tabellen joinen?

[baurat]

Hey Jungs,

vielen Dank für die vielen schnellen Antworten - klasse!

Zitat von Singlepin:

Hast du dir schon mal die "Master Tabellen Beziehungen" in http://wiki.lazarus.freepascal.org/L...bf_Tutorial/de
angesehen? Das könnte dich weiterbringen.

Das hab ich angeschaut, ja. Aber soooo trivial ist es dann leider doch nicht, dass ich mit zwei Tabellen auskäme - ich muss über drei und z.T. noch mehr Tabellen verknüpfen - und das geht dann damit nicht (oder?)

Zitat von dataspider:

Und es gab mal Delphi Komponenten:
TDataSet
Damit habe ich das immer gemacht.

Hm. Ich hab ja an der tdbf-Tabelle (also DBF-Tabelle) schon auch eine native DataSource dran hängen. Aber hilft mir das für joins? Die Sybase-Komponente ist leider nicht lizenzfrei

Zitat von Sir Rufo:

"Wenn" es sich um Visual Foxpro handelt, dann einfach den Visual Foxpro ODBC Treiber installieren und dann per ADO darauf zugreifen.

Damit klappt dann auch das JOIN

DAS klingt sehr gut, ich denke es ist in der Tat Visual Foxpro. Hatte mit ODBC + ADO und Delphi bislang noch nichts zu tun, deswegen... hat jemand vielleicht für den von dir beschriebenen Weg "zufällig" ein kleines Tutorial oder so...?

Aber wenn das ginge, wär es wohl genau das was ich brauche... *Hoffnung*!

[Union]

Mit ADS (sybase) kannst Du in der lokalen Version kostenfrei arbeiten.

[Sir Rufo]

Eine Suche bei Google bringt dich z.B. hierhin
OLEDB-Treiber, der tut auch mit ADO (eigentlich sogar besser als ODBC)

[Singlepin]

Um die Frage zu beantworten, bei den TDBF-Komponenten sind
Master-Detail Beziehungen natürlich auch über mehrere Tabellen möglich.
Sprich, Baumartige Strukturen.

[Sir Rufo]

Zitat von Singlepin:

Um die Frage zu beantworten, bei den TDBF-Komponenten sind
Master-Detail Beziehungen natürlich auch über mehrere Tabellen möglich.
Sprich, Baumartige Strukturen.

Bei dem VF-Treiber via ADO gibt man das Datenbank-Verzeichnis an und kann dann einfach per SQL die Tabellen ansprechen.
Das ist dann schon etwas einfacher in der Handhabung

[Union]

Mit Standard Delphi geht es über TAdoCeonnection und TAdoQuery. Wichtig der richtige Connectionstring:

Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source=<DEIN PFAD WO DIE DBF LIEGEN>;Mode=Share Deny None;Extended Properties=dBASE IV;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password="";Jet OLEDB:Engine Type=17;Jet OLEDBatabase Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDBon't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False

[Sir Rufo]

Zitat von Union:

Mit Standard Delphi geht es über TAdoCeonnection und TAdoQuery. Wichtig der richtige Connectionstring:

Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source=<DEIN PFAD WO DIE DBF LIEGEN>;Mode=Share Deny None;Extended Properties=dBASE IV;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password="";Jet OLEDB:Engine Type=17;Jet OLEDBatabase Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDBon't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False

Besser du setzt das in einen Code-Block

Code:

Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data Source=<DEIN PFAD WO DIE DBF LIEGEN>;Mode=Share Deny None;Extended Properties=dBASE IV;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=17;Jet OLEDB:Database Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False

Allerdings kann man sich den Connectionstring ja auch schön per Doppelklick auf die ADOConnection zusammenklicken

[Union]

Zitat von Sir Rufo:

Allerdings kann man sich den Connectionstring ja auch schön per Doppelklick auf die ADOConnection zusammenklicken

Ging auf meinem PC nicht. Ich musste die wichtigsten Teile manuell setzen und dann hat er das beim Speichern auf diesen Monsterstring expandiert. Kann man bestimmt die Hälfte von löschen.

[dataspider]

Zitat von baurat:

Hm. Ich hab ja an der tdbf-Tabelle (also DBF-Tabelle) schon auch eine native DataSource dran hängen. Aber hilft mir das für joins? Die Sybase-Komponente ist leider nicht lizenzfrei

Die Zugriffskomponenten von SyBase sind IMHO kostenfrei. Nur für den ADS Server muss man bezahlen. Du hast aber DBF.
In den Komponenten ist die TADSQuery, welche perfekt SQL - Statemants verarbeitet.
Beim Zugriff (Benutzung von Index) kommt es auf die Indexe an.
Da gab es wohl:
.ndx (DBase II)
.ntx (Clipper)
.mdx / .cdx (?)
TDataSet von SyBase kann IMHO mit allen Indexformaten umgehen. Bei ADO bin ich mir da nicht so sicher.
Bei meinen Versuchen mit ADO habe ich es irgendwie mit dem OEM - Zeichensatz nicht hinbekommen.

Ich habe noch eine EXE bzw. Source. Da habe ich für einen Kunden nur ein Statement gezimmert, welches aus eine Datei geladen komplexe Daten angezeigt hat.
Bei Interesse könnte ich das schicken (Source ist mit DevExpress Grid, aber das Handling mit ADSQuery kann man als Basis sicher verwenden).
Ist aber etwas grösser (PN angebracht).

Wenn du es allerdings mit ADO lösen kannst, würde ich auf zusätzliche Komponenten verzichten.

Frank

[baurat]

Merci für die ausführlichen Hilfen, schau ich mir an und melde mich!