dBase-Datenbanken mit Topaz-Erweiterung

[FriendOfDelphi]

Zitat von Alfredo:

So funktioniert es mit BDE und Foxpro:

Delphi-Quellcode:

procedure TForm4.BitBtn1Click(Sender: TObject);
begin
table3.TableName := 'Pfad\test.dbf';
table3.TableType := ttFoxPro;
table3.Active := true;
table3.Append;
table3.FieldByName('test1').AsString := '20.05.2010 15:31:34';
table3.FieldByName('test2').asfloat := 40318.6469213;
table3.FieldByName('test3').AsFloat := 123.626;
table3.Post;
end;

q.e.d.

Gruß
Alfred

Und hier der entsprechende Quellcode mit BDE und Topaz:

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
begin
  //TzDbf2.TableName := 'Pfad\test.dbf';
  TzDbf2.DbfFileName := 'Pfad\test.dbf';
  //TzDbf2.TableType := ttFoxPro;
  TzDbf2.Active := true;
  TzDbf2.Append;
  TzDbf2.FieldByName('name').AsString := '20.05.2010 15:31:34';
  TzDbf2.FieldByName('age').asfloat := 40318.6469213;
  TzDbf2.FieldByName('amount').AsFloat := 123.626;
  TzDbf2.Post;
end;

Das ist schon einmal der erste Schritt.
Aber noch bestehen grafische, feste Komponenten (TTzDbf, TDataSource). Diese müssen noch durch Quellcode ersetzt werden.
Die Spalten der dBase-Datei sollen ja zur Laufzeit aus den Einträgen einer ini-Datei erstellt werden.
Anschließend soll dann mit diesen dynamisch generierten Spalten gearbeitet werden.