Hallo vamp79,
wenn du mit einer
Paradox oder dBase Datenbank arbeitest, musst du nicht unbedingt
SQL benutzen. Es geht dann auch mit:
Delphi-Quellcode:
if OpenDialog.Execute then
begin
myFileNames.Append;
myFileNamesNamen.AsString := OpenDialog1.FileName;
myFileNames.Post;
end;
Dabei gehe ich davon aus, dass du ein TTable Objekt mit dem Namen myFileNames benutzt, dieses auf deine Datenbanktabelle zeigt, die Tabelle ein Feld mit dem Namen "Namen" hat, das du mit dem Feldeditor als persistentes Feld hinzugefügt hast (über rechten Mausklick auf das TTable Objekt). Wenn du nicht zulassen willst, dass ein Eintrag mehrfach vorkommt, kannst du das Feld Namen indizieren und vor Einfügen abfragen, ob der Name schon existiert:
Delphi-Quellcode:
if OpenDialog.Execute then
if Not myFileNames.FindKey(OpenDialog1.FileName) then
...