1. Zum Anfang habe ich ein leeres BLOB-Feld.
2. Ich trage dann einen Wert in das Feld ein und speicher diesen ab (Siehe Quellcode).
3. Dann lösche ich den kompletten Wert aus dem Feld.
4. Dann speichere ich wieder und der Wert ist nach dem ApplyUpdates der
Query wieder da.
Die Datenmenge wird wie folgt gespeichert:
Delphi-Quellcode:
with Query do
begin
try
if not Database.InTransaction
then
Database.StartTransaction;
ApplyUpdates;
Database.Commit;
except
on E:
Exception do
begin
Database.Rollback;
MessageDlg('
Speichern nicht erfolgreich' + #13#10 + E.
Message, mtError,[mbOk], 0);
end;
end;
CommitUpdates;
end;