Anfänger braucht Hilfe für ein einfaches Programm

[carstenas]

Hallo

Ich bin ein Blutiger anfänger in sachen Programmierung,

versuche ein einfaches Programm mit einer DBF,das ganze soll zu lernzwecken dienen.

Ich möchte eine DBF erstellen mit dem Datenbankeditor,nur 2 Felder Name und Vorname,
diese Datei soll immer genommen werden werden wenn ich das Programm starte,
egal in was für einem Ordner und welches Laufwerk.

Code: Alles auswählen

procedure TForm1.FormCreate(Sender: TObject);
var a: string;
begin
    a:=ExtractFilePath(paramstr(0))+'daten.dbf'; 
    dbf1.FilePath:=a ;
    dbf1.FilePathFull:=a;
    dbf1.DbfFile.Open;
    dbf1.Active:=true;
    // ShowMessage(a);  //
end;

dann sollen die daten mit einem DBgrid angezeigt werden und bearbeitet werden,
habe mal mein beispiel angehängt.

Gruß Carsten

[bembulak]

Darf ich fragen, was deine eigentliche Frage ist? Ich meine, wo hapert es?

[carstenas]

Hallo

Natürlich kannst du fragen

ich habe mal ein beispiel angehängt,wo ich meine so soll es funktionieren macht es aber nicht;

ich übergebe einer variablen a den pfad zurück wo die Anwendung liegt laufwerk und ordner mit Extractfilepath
danach versuche ich der dbf1 den pfad zu übergeben,genauso wie den absoluten pfad,
das öffnen der dbf und activieren des dataset habe ich auch gemacht,
aber immer kommt eine fehlermeldung,

wie geht man am besten vor eine datei immer gleich mit der anwendung zu öffnen um damit zu arbeiten?
ohne diese relativen Pfade.

MFG

[piper62]

Du hast in der TDBF Komponente noch einen Verweis auf die TDatasource eingehängt. Das ist ein Fehler den ich auch bei meinen Studennten häufig sehe.
Das gibt aber Probleme. Die Datasource hält den Verweis auf die TDBF.
Ausserdem fehlte die Angabe mit welcher Tabelle gearbeitet werden soll.

Ich habe das Beispiel so umkonfiguriert, dass es in der Entwicklungsumgebung bereits Deine Tabelle öffnet. Ev. wird dann Einiges klarer.

Gruss

[carstenas]

Hallo Piper62

Danke für die Antwort

als ich dein beispiel versucht habe hat es nicht funktioniert ich mußte erst wieder den FilePath einstellen der DBF ich wollte aber ohne die relative Pfadangabe arbeiten also erst zur Laufzeit feststellen wo liegt anwendung und wo liegt Datei,dann Datei Öffnen oder Activieren und dann anzeigen in DBGrid.

sind dass dann die richtigen befehle die ich verwende?
MFG

[piper62]

im Prinzip ja. Mach Dir im Zweifelsfall Zusatzausgaben "showmessage(...)" und überprüf die Variablen.

Das wird schon. Vieles ist einfach auch Übung...

[carstenas]

Hallo

Habs jetzt doch noch hinbekommen datei läuft auf jedem rechner und in jedem verzeichnis

Danke

Gruß

[Kuster Peter]

Da ich auch Anfänger in genau diesem Bereich bin, darf ich Dich bitten, uns die Lösung zu zeigen, die Du mit Hilfe dieses Forums erstellt hast? Würde gerne auch von Deiner Erfahrung profitieren.

Peter

[carstenas]

Hallo Peter


Also ich habe eine Datei mit der Datenbankoberfläche gemacht,
in einem Form ein DBgrid,eine Dbf Komponente und eine Datasource,
das ganze miteinander verbunden.

Einstellungen für die Datasource.
Dataset = Dbf komponente,
DBF Komponente tablename auf die Datei gelegt bei mir (daten.dbf)
DBgrid=Datasource

dann habe ich einfach bei Form Create
dbf.close; // zuerst werden evtl geöffnete dateien geschlossen
dbf.active:=True;// dansch wird die Dbf Komponente aktiviert

du kannst dann noch einen index angeben in der datenbank oberfläche wonach sortiert wird,oder später eine 1:n verknüpfung erstellen.
MFG Carsten

[Kuster Peter]

Hallo Carsten

Du hast mich falsch verstanden, was mich interessiert ist, mit welchen Befehlen Du es geschafft hast, dass das PRG in jedem Ordner läuft. Diese Befehle fehlen mir. Wärst Du bitte so net, diese auch zu posten, damit ich es lesen kann? Wäre Dir wirklich dankbar.

Peter

[Christian]

Hat er doch im Beitrag geschrieben ?! Dazu muss man einfach keinen Absouluten Pfad zur datenbank angeben sondern einen relativen. Da gibts keien besonderen Befehle.