BLOB-поля
Люди помогите!!!:confused:
Есть прога которая печатает отчеты. У всех отчетов есть стандартные три шапки. Они храняться в таблице на сервере DB2 ввиде BLOB-поля. Мне необходимо вытащить эту шапку, изменить и забросить обратно.
Я помощью потока Stream не получается. когда я вставляю как Bitmap в Image то он ругается что битмап это не значения. А когда вставляю в Мемо то там вставляется только двоеточие!!!
Очень нуждаюсь в вашей помощи.
заранее благодарен.!!!!
Есть прога которая печатает отчеты. У всех отчетов есть стандартные три шапки. Они храняться в таблице на сервере DB2 ввиде BLOB-поля. Мне необходимо вытащить эту шапку, изменить и забросить обратно.
Я помощью потока Stream не получается. когда я вставляю как Bitmap в Image то он ругается что битмап это не значения. А когда вставляю в Мемо то там вставляется только двоеточие!!!
Очень нуждаюсь в вашей помощи.
заранее благодарен.!!!!
Код в студию! с указанием мест, где ошибки происходят.
Image1: TImage;
ADODataSet1: TADODataSet;
Button1: TButton;
Memo1: TMemo;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
Stream:TStream;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
stream:=ADODataSet1.CreateBlobStream(ADODataSet1.FieldByName('HDR'),bmRead);
image1.Picture.Bitmap.LoadFromStream(Stream); //-->Здесь Вылетает ошибка "Bitmap is not valid"
Memo1.Lines.LoadFromStream(Stream);//--> при этом просто заноситься двоеточие.
Stream.Free;
ADODataSet1: TADODataSet;
Button1: TButton;
Memo1: TMemo;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
Stream:TStream;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
stream:=ADODataSet1.CreateBlobStream(ADODataSet1.FieldByName('HDR'),bmRead);
image1.Picture.Bitmap.LoadFromStream(Stream); //-->Здесь Вылетает ошибка "Bitmap is not valid"
Memo1.Lines.LoadFromStream(Stream);//--> при этом просто заноситься двоеточие.
Stream.Free;
У тебя картинки как Jpeg в базе хранятся?
Там не понять. просто набор чисел и букв.
А символа, начиная, эдак, с седьмого, нет ли там буковок JFIF?
Цитата: maxFM
Там не понять. просто набор чисел и букв.
Ну так если ты сам рисунки в базу пихаеш, то должен знать.... а если нет, то сохрани их как JPG и посмотри на размер файла и картинки и узнаеш формат..:)
Дело в том, что стандарнтный DBImage Jpeg-и не отображает, хотя по документации должен.....