also wie es treffnix gesagt hat.. ohne datasets gehts ned
aber aber so als start hilfe, es geht am besten wenn du es mit einer procedure machst:
Delphi-Quellcode:
procedure TForm.SQLUpdater;
begin
with DM
do //Datenmodul
begin
if IBTrans.InTransaction
then
IBTrans.Commit;
IBTrans.StartTransaction;
Grid.Open;
//DataSet Grid
if selectAdress<>0
then //Optional.. aber gutes Feature, klickst du auf einen Eintrag, wird der dir in den DBEdits angezeigt
Grid.Locate('
id',selectAdress,[])
else
try
selectAdress:=Grid['
id'];
except
end;
db.Close;
//Hier wird es geschlossen
mov_db.Params[0].AsInteger:=selectAdress;
db.Open;
//und gleich wieder geöffnet
end;
end;
mit diesem Updater kannst du dein Grid aktualisieren
zu 2ten fragen.. löschen ist:
Delphi-Quellcode:
procedure TForm.sbtnDeleteClick(Sender: TObject);
begin
if messagedlg('Delete this entry?',
mtWarning,[mbYes,mbNo],0)=mrYes then
DM.db.Delete;
SQLUpdate;
end;
gl and hf
