Hallo,

wie kann man mit Hilfe eines editfeldes und einer if-bedingung ein bestimmtest datenfeld in einer datenbank finden und dann wenn man die Zeile gefunden hat den gesamten datenstatz löschen---

Hallo rainman51 !

Benutze die TQuery Komponente und baue deine Bedingung in einen SQL-Befehl ein, also etwa so:

markieren

Delphi-Quellcode:

Query1.SQL.Clear;
Query1.SQL.Add('SELECT * FROM "DeineDatenbank.DB" WHERE '+Edit.Text);
Query1.Open;

Im Edit steht nur deine Bedingung 'Feldname=Wert".
Du musst jetzt natürlich noch überprüfen, ob Query überhaupt Datensätze enthält oder vielleicht mehrere Datensätze Deine Bedingung erfüllen, dann musst Du deine Auswahl noch genauer machen.
Mit
Query1.Delete; löschst Du dann den aktuell ausgewählten Datensatz. Ich hoffe, dass ist das was Du suchst.
Gruss TOmega

Ist das Feld, in dem du suchst UNIQUE ? Wenn nicht, werden unter Umständen mit TOmega's Lösung der falsche Datensatz gelöscht.

Um alle Datensätze zu löschen, die dem Suchkriterium entsprechen, brauchts kein Select und anschliessendes Löschen aus Delphi heraus, sondern ich würde direkt die SQL Syntax anpassen:

markieren

Delphi-Quellcode:

Query1.SQL.Clear;
Query1.SQL.Add('Delete FROM "DeineDatenbank.DB" WHERE Feldname = '+ QuotedStr(Edit.Text));
Query1.ExecSQL;

Merke auch, dass ich den Suchtext über die Funktion QuotedStr übergebe. Täte ich das nicht, gibts ne Fehlermeldung, wenn der Suchtext selbst Hochkommata ' enthalten

was bedeutetb das?

--->DeineDatenbank.DB
Ich denk mal ... meien db(Inventarverwaltung). --< was steht hinter dem punkt?

Also wenn z.b meine Suchabfrage nach der der Datensatz gelöscht werden soll imm er in der ersten Spalte steht....geht das damit auch>?

Zitat von rainman51:

was bedeutetb das?

--->DeineDatenbank.DB

Datenbank ist in dem Kontext falsch. Gemeint ist der Tabellenname.

Zitat von Jelly:

Zitat von rainman51:

was bedeutetb das?

--->DeineDatenbank.DB

Datenbank ist in dem Kontext falsch. Gemeint ist der Tabellenname.

HEißt das also ....
Tabelle.Spalte?

Zitat von rainman51:

HEißt das also ....
Tabelle.Spalte?

Nein, nur der Tabellenname. Eine Datenbanktabelle besitzt Spalten, über die Du im where-Teil des SQL Befehls zugreifen kannst.

Ich denk mal, ein bischen SQL Litteratur würde nichts schaden.

Adoqueryauswahl.SQL.Clear;
Adoqueryauswahl.SQL.Add('Delete FROM "Anlagegut" WHERE Anlagegut.Inventarnummer = '+
{1QuotedStr}(Editeingabe.text));

Adoqueryauswahl.Open;

so lautet jetzt mein Text.....es kommt aber unvollständige anweisung