Скачать: CL | DM;

Как вставить jpg картинку в таблицу?   Найти похожие ветки 

← →
Ламерок   (2007-02-07 15:58) [0]

Подскажите пожалуйста как реализовать ?
У меня получается вставлять только bmp картинки, а при попытке вставить jpg картинку ничего не происходит...
Таблицу создавал так:

procedure TForm1.Button2Click(Sender: TObject);
begin
 with Table1 do
 begin
   Active := False;
   DatabaseName := "MyBase";
   TableName := "Try.db";
   TableType := ttDefault;
   with FieldDefs do
   begin
     Clear;
     Add("Num", ftInteger, 0, False);
     Add("Text", ftMemo, 0, False);
     Add("Pic", ftGraphic, 0, False);
   end;
with IndexDefs do
   begin
     Clear;
     Add("", "Num", [ixPrimary, ixUnique]);
   end;
   CreateTable;
   Free;
 end;
end;


---

← →
Сергей М. ©   (2007-02-07 16:09) [1]

> при попытке вставить


Ну и где в этом коде ты что-то там куда-то там "вставляешь" ?)

---

← →
Ламерок   (2007-02-07 16:19) [2]

procedure TForm1.Button3Click(Sender: TObject);
begin
DBImage1.Picture.LoadFromFile("d:\0.jpg");
end;

Загружаю картинку в DBImage1, а затем на DBNavigator  нажимаю "сохранить" (кнопочка с галочкой). Если картинка ipg, то она грузится но не сохраняется в таблицу, а если картинка bmp, то она замечательно сохраняется в таблицу.

---

← →
Desdechado ©   (2007-02-07 17:00) [3]

Не все типы полей позволяют хранить картинки разных форматов. Некоторые требуют жестких форматов.
Почитай про парадокс, какие он допускает в каких типах.

---

← →
Сергей М. ©   (2007-02-07 17:01) [4]

> агружаю картинку в DBImage1


Кто такое "DBImage1" ?

В приведенном коде нет ни малейшео упоминания об этом идентификаторе ..

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.971 c