AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Abfrage von doppelten Datensatzfeldern
Thema durchsuchen
Ansicht
Themen-Optionen

Abfrage von doppelten Datensatzfeldern

Ein Thema von DBman · begonnen am 9. Jun 2003 · letzter Beitrag vom 11. Jun 2003
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#11
  Alt 10. Jun 2003, 20:56
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.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat
DBman

Registriert seit: 31. Mai 2003
Ort: nähe hannover
77 Beiträge
 
#12
  Alt 11. Jun 2003, 18:34
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
Denn die Dinge , die wir erst lernen müssen , bevor wir sie tun , lernen wir beim Tun. - Aristoteles
  Mit Zitat antworten Zitat
Benutzerbild von r_kerber
r_kerber

Registriert seit: 11. Feb 2003
Ort: Trittau
3.538 Beiträge
 
Delphi XE Professional
 
#13
  Alt 11. Jun 2003, 18:35
Was ging mit dem anderen Code nicht?
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz