Запись рисуков в базу данных...

← →
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-можешь об этом подробнее?

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

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

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

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

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