* Fix access violation in Delete when state = dsEdit

git-svn-id: trunk@30839 -

packages/fcl-db/src/sqlite/customsqliteds.pas

@@ -883,6 +883,8 @@ var
 begin
   Dec(FRecordCount);
   TempItem := PPDataRecord(ActiveBuffer)^;
+  if TempItem = FCacheItem then // Record is being edited
+    TempItem := FInternalActiveBuffer;
   TempItem^.Next^.Previous := TempItem^.Previous;
   TempItem^.Previous^.Next := TempItem^.Next;
   if FCurrentItem = TempItem then