Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > кеширование изменений

Автор: Vinnety 23.11.2003, 13:36

Подскажите! Как правильно записывать данные в BLOB-поля с помощью Query.
И как правильно организовать кеширование изменений (т.е. данные
заносились в физическую ТБД и не пропадали)?

Автор: <Spawn> 23.11.2003, 15:49

Вот пример кэширования:

Код

procedure TForm1.Button1Click(Sender: TObject);
begin
  with DataSource do
  begin
    CachedUpdates:= True;
    Edit;
    //К примеру у тебя все манипуляции с полями происходят в другой форме, тогда
    SomeForm:= TSomeForm.Create(Self);
    try
      if SomeForm.ShowModal = mrOk then
      begin
        Post;
        ApplyUpdates
      end
      else
      begin
        Cancel;
        CancelUpdates;
      end;  
    finally
      CachedUpdates:= False;
      FreeAndNil(SomeForm);
    end;
  end; 
end;

Автор: Vinnety 23.11.2003, 17:00

А как же правильно записывать данные в BLOB-поля с помощью Query?

Автор: Vit 24.11.2003, 00:13

Кверя:

SQL

Insert into MyTable (MyBlobField)
Values (:BlobField)

Код:

Код

Query1.params.parseSQL(Query1.slq.text, true);
(Query1.params.parambyname('BlobField') as TBlobField).LoadFromStream или Assign или LoadFromFile
Query1.ExecSQL;