Danke DeddyH jetzt hab ichs hinbekommen.
Es muss so heißen:
Delphi-Quellcode:
procedure KategorieAusgeben(Kat:
string);
begin
DB:=TADOTable(DM.FindComponent('
TB'+Kat));
end;
procedure DatenAusgeben(Dat:
string);
begin
DB.Append;
DB.Fields[0].AsString:=Dat;
DB.Post;
Damit funktioniert es, man muss noch das TADOTable davor setzen, das war aber nicht mehr so schwer herauszufinden.
Mehr Probleme hat mit die Meldung gemacht, dass der Befehl FindComponent nicht gefunden werden konnte.
Nachdem ich dann irgendwann mal die
Unit gespeichert habe, war der Fehler einfach weg.
Das ist mir schon öfters vorgekommen, dass Delphi2006 eine Komponente als nicht gefunden anzeigt und nach dem speichern ist der Fehler plötzlich weg.
Die
Unit zum Einbinden in uses für FindComponent habe ich auch entdeckt, es ist StdCtrls, die stand aber schon die ganze Zeit drin.
Wie ich herausfinde welche
unit ich für eine Komponente einbinden muss, die mir das System anmeckert habe ich noch nicht herausgefunden.
Falls so eine Liste in einem Buch steht oder in der Hilfe versteckt, kann mir jemand dazu mal Bescheid geben.
Ich habe sehr viele Delphi Bücher hier, müsste nur wissen wo und wonach ich suchen soll.
Danke nochmal für die freundliche Hilfe hier, selbst wenn man sehr einfache Fragen stellt bekommt man hier im Forum keine aggressiven Antworten von genervten Drachen und Biertrinkern.