Hallo Seto,
wenn der Write-Button nicht funktioniert, dann dürfte auch der Read-Button nicht funktionieren. Um zu vermeiden, dass ein falsches
DB-Verzeichnis verwendet wird solltest du die Eigenschaft Table.Active im Object Inspector auf False setzen und im Code das Ereignis OnCreate() der Form einfügen:
Delphi-Quellcode:
procedure TDemoForm.FormCreate(Sender: TObject);
var
fn: TFileName;
begin
Table.DatabaseName := ExtractFilePath(ParamStr(0)) + '
db';
fn := IncludeTrailingPathDelimiter(Table.DatabaseName) + Table.TableName + '
.db';
if FileExists(fn)
then Table.Open
else ShowMessage(Format('
Datei nicht gefunden:%s%s', [sLineBreak, fn]));
end;
So wird das Unterverzeichnis
DB des Programmverzeichnisses als
DB-Verzeichnis verwendet und du erhältst eine Fehlermeldung, wenn die Tabelle nicht existiert.
Um die Spaltenanzeige zu konfigurieren kannst du über das Kontextmenü des DBGrid den Spalteneditor öffnen und dir die gewünschten Spalten selbst zusammenstellen.
Freundliche Grüße