Thema: Delphi Master-/Verweisproblem

Einzelnen Beitrag anzeigen

Benutzerbild von samson
samson

Registriert seit: 26. Aug 2003
Ort: Hövelhof Riege
105 Beiträge
 
Delphi 2007 Professional
 
#10

Re: Master-/Verweisproblem

  Alt 9. Sep 2003, 16:02
Also!

DST1 ist Tabelle 1 (Verweise)
DST2 ist Tabelle 2 (Artikel)
DST3 ist Tabelle 3 (Warengruppen)

Wenn Du nun passend selektiert hast, hast Du in dem TDBGrid1 (Warengruppen) und in den TDBGrid2 (Artikel) nun die passenden Einträge selektiert.

Nun hast du DST2.fieldbyname('id').asstring
und DST3.fieldbyname('id').asstring

nun kannst Du eben mit einer kleiner Query den Eintrag aus der Verweistabelle löschen.

Delphi-Quellcode:
Function DeleteRecord;
var
  Query:TOracleQuery;
begin
  Query := TOracleQuery.Create(nil);
  try
    Query.session := oraclesession;
    Query.SQL.Text := 'delete from verweis where NRWarengruppe = '+DST3.fieldbyname('id').asstring + ' and NRArtikel = '+DST2.fieldbyname('id').asstring;

    Query.execute;
    DST3.Refresh;
  finally
    Query.free;
  end;
Hier arbeite ich mit Oracle-Zugriffskomponenten, sollte jedoch bei anderen so ähnlich sein.

Ich hoffe geholfen zu haben.

Gruss

Samson
Frank Gellermann
Wer Informationen hat, hat Macht. Wer Macht hat, hat Informationen!!!
  Mit Zitat antworten Zitat