Abfrage von doppelten Datensatzfeldern

[MrSpock]

Hallo DBman,

hier ich Forum ist es allgemein akzeptiert, dass wir uns mit DU anreden und ich hab natürlich auch nichts degegen.

Also die zweite bzw. dritte Tabelle, also die Suchtabelle sollte nicht als Master -/Detailtabelle verknüpft werden, sondern nur als Suchtabelle dienen:

Delphi-Quellcode:

procedure Tfm_Main.tblKuDaBeforePost(DataSet: TDataSet);
var AlterIndex:String;
begin
   { die Suchtabelle muss bereits geöffnet sein 
     ich habe sie mal tblSuchKuDa genannt }
   { auch der Index kann bereits vorher ausgewählt werden
     damit es nicht bei jedem Post neu gemacht wird }
   tblSuchKuDa.IndexName:='KUNKZ';    //Kundenkürzel

   if tblSuchKuDa.FindKey([DBEd_KunKz.EditText]) then
   begin 
     ShowMessage(DBED_KunKz.EditText + 'GIBTS SCHON!!');
     DBEd_KunKz.SetFocus;
     Abort;
   end;
end;

So solte es eigentlich funktionieren.

[DBman]

Habe zwar nicht ganz verstanden warum ich das:

Code:

  begin 
     ShowMessage(DBED_KunKz.EditText + 'GIBTS SCHON!!'); 
     DBEd_KunKz.SetFocus; 
     Abort; 
   end;

in

Code:

   begin 
     ShowMessage(DBED_KunKz.EditText + 'GIBTS SCHON!!'); 
          Abort;              //<-- zuerst
         DBEd_KunKz.SetFocus; //<--

   end;

umändern musste, aber letzteres funktioniert dann.

dankeschön :coder:

[r_kerber]

Was ging mit dem anderen Code nicht?