datenübernahme von tabelle1 in tabelle2

[CVi]

mit folgendem quelltext kopiere ich daten aus ArtikelMDB in table1.

Delphi-Quellcode:

procedure TCSVReader.Button3Click(Sender: TObject);

begin
  ArtikelMDB.Open;
  ArtikelMDB.First;

  while not ArtikelMDB.EOF do
     begin
       tbTable1.append;
       tbtable1Teilenummer.asstring := ArtikelMDBartikel_nr.Text;
       tbtable1Suchbegriff.asstring := StUpCase(ArtikelMDBbezeichnung.Text);
       tbTable1.Post;
       ArtikelMDB.next
     end;
   end;
end.

das klappt ja auch ganz gut.
wie bekomme ich es jetzt hin, das wenn in table1 schon datensätze mit teilenummern stehen, dieser nur noch mit dem suchbegriff ergänzt wird.
das heisst ich möchte vorher die Teilenummer aus table1 mit artikel_nr aus artikelMDB vergleichen. wenn es diese nummer schon gibt soll er den datensatz nur um den suchbegriff ergänzen. wenn es die nummer nicht gibt soll er einen neue datensatz erzeugen.

[Bummi]

Delphi-Quellcode:

if tbTable1.Locate(....) then
begin
  tbTable1.Edit;
  .....
end
else
begin
   tbTable1.append;
   ....
end;

oder tbTable1 als Datasource gleich ArtikelMDB_src zuweisen, Index und Masterfields setzen und nur noch editieren....

[CVi]

vielen dank für die schnelle anwort um diese uhrzeit :-D

aber was kommt in meinem fall in die klammern?
if tbtable1.locate(tbtable1Teilenummer.asstring = ArtikelMDBartikel_nr.text) ...
klappt nicht.
fehler: inkompatible Typen: String und boolean :(

[Bummi]

Delphi-Quellcode:

if tbtable1.locate('Teilenummer', ArtikelMDBartikel_nr.asString,[])  then

wenn ich Dich richtig verstanden habe...

[CVi]

ja so hat es funktioniert

VIELEN VIELEN DANK :-D