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

Запись рисуков в базу данных...   Найти похожие ветки 

← →
VitV ©   (2006-05-29 16:00) [0]

Могу записать только бмп-ки. Но остальные ругается....
procedure TVopros.DBImage2Click(Sender: TObject);
var
 B: TBitmap;---в этом проблема???
begin
if DataModule10.IBDataSet15.FieldByName("GR").AsVariant=null then
DataModule10.IBDataSet15.Insert
else
DataModule10.IBDataSet15.Edit;
B := TBitmap.Create;
 try
   if not OpenDialog1.Execute then exit;
   B.LoadFromFile(OpenDialog1.FileName);
   DBImage2.Picture.Assign(B);
finally
   B.Free;
 end;

end;

---

← →
Desdechado ©   (2006-05-29 16:09) [1]

для записи картинок не обязательно их показывать
DBImage понимает только BMP и JPG (при подключении соответствующего юнита)

---

← →
VitV ©   (2006-05-29 16:51) [2]

А как тогда кидать и bmp,gif и т.д.? Потоком?

---

← →
Desdechado ©   (2006-05-29 16:59) [3]

Query1.Sql.Text :=
  "INSERT INTO testblob " +
  " ( " +
  "  fBlob" +
  " )" +
  " VALUES" +
  " (" +
  " :ParamBlobField" +
  ")";
Query1.ParamByName("ParamBlobField").DataType := ftBlob;
Query1.ParamByName("ParamBlobField").ParamType := ptInput;
Query1.ParamByName("ParamBlobField").LoadFromFile("MyFile",ftBlob);
Query1.ExecSql;
можно подключить классы, понимающие разные форматы (GraphicEx, например), а при показе преобразовывать в BMP

---

← →
VitV ©   (2006-05-29 17:31) [4]

а под другому нельзя?

---

← →
Desdechado ©   (2006-05-29 17:50) [5]

может, и можно
меня устраивает этот способ
а чем тебя не устраивает?

---

← →
VitV ©   (2006-05-29 18:14) [6]

А как преобразовывать в BMP?

---

← →
Ega23 ©   (2006-05-29 18:16) [7]

> А как преобразовывать в BMP?


Кого? JPEG? GIF? PNG?

---

← →
Desdechado ©   (2006-05-29 18:24) [8]

у любого класса для работы с картинками есть метод для преобразования в BMP (например, DibNeeded)

---

← →
VitV ©   (2006-05-30 11:33) [9]

т.е
> у любого класса для работы с картинками есть метод для преобразования
> в BMP (например, DibNeeded)

т.е. я выбираю в диалоге например гиф. Он(файл) записывается как бмп, а при показе опять преобразовавается в гиф?
DibNeeded-можешь об этом подробнее?

---

← →
Desdechado ©   (2006-05-30 12:19) [10]

записывается как гиф, а перед показом в TImage преобразуем в бмп
подробнее по методу - в справке по нему

---

← →
VitV ©   (2006-05-30 12:55) [11]

ясно...сенкс.

---

← →
VitV ©   (2006-05-30 15:55) [12]

Проблема в том, что при выборе файла - гиф и др. не поддерживаются.

---

← →
Desdechado ©   (2006-05-30 15:59) [13]

добавь свою маску в TOpenDialog

---

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

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



Память: 0.48 MB
Время: 0.043 c