Die removeFromDB-Methode:
Delphi-Quellcode:
function TCustomer.RemovefromDB(con: TZConnection):integer;
var
q: TZQuery;
begin
q:=TZQuery.Create(nil);
q.connection:=con;
try
q.sql.Text:='Delete from Warenverkauf1 where id= :id';
q.params.parseSQL(q.sql.text, True);
q.params.paramvalues['id']:=self.id;
q.execSQL;
finally
q.free;
end;
end;
gibt nach dem Löschen-ButtonClick die Meldung "ungültige Zeigeroperation" aus. Nach dem loadFormDB bzw. Neustart des Programms ist jedoch festzustellen, dass der entsprechende Datensatz gelöscht wurde.
Was ist das nun?
Mir wird wieder einmal meine schiere Größe bewußt. Wie und wo soll man all da lernen können, was mit so einem kleinen Programmchen zusammenhängt. Ich habe in meinem bisherigen Leben 2 Studien (auf völlig anderen Gebieten, als der Informatik) sehr erfolgreich absolviert, doch hier in einer Hobbybeschäftigung ist es so schwer die jeweils nächste Stufe wirklich zu finden. Ich könnte noch 10 Bücher über
OOP lesen, doch hier an so einer Stelle weiss ich einfach nicht weiter. Habe ich nun dem Querry die richtige Connection gegeben?