[Вовайн]

Ошибка adoquery1 cannot perform this operation on a closed dataset
Вод код

Код:

procedure TForm10.C1Click(Sender: TObject);
var
jpeg: TJPEGImage;
bmp: TBitmap;
begin
      if  OpenPictureDialog1.Execute then
     begin
        jpeg := TJPEGImage.Create;
        bmp := TBitmap.Create;
        try
          jpeg.LoadFromFile(OpenPictureDialog1.FileName);
          bmp.Assign(jpeg);
          ADOQuery1.Edit;                  // режим редактирования
          ADOQuery1.FieldByName('Рисунок').Assign(BMP);//загрузка фото
          ADOQuery1.Post;                  // сохраняем данные
        finally
          jpeg.Free;
          bmp.Free;
     end;
end;
end;