Eigenschaft State: TDataSetState
//Im folgenden Beispiel wird mit Hilfe eines BLOB-Streams ein String am Ende des Feldes Notes in der Tabelle Tasks angefügt.procedure TForm1.AppendNoteClick(Sender: TObject);var Stream: TStream; S: string; begin with Tasks do begin Edit; if State = dsEdit then begin Stream := CreateBlobStream(FieldByName('Notes'), bmReadWrite); try Stream.Seek(0, 2); { 0 Bytes ausgehend vom Ende des Streams suchen } S := ' This line will be added to the end.'; Stream.Write(PChar(S)^, Length(S)); Post; finally Stream.Free; end; end; end; end;