Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

VitV © (2006-05-29 16:00:00)
Могу записать только бмп-ки. Но остальные ругается....
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-30 15:59:00) [1]
добавь свою маску в TOpenDialog

VitV (2006-05-30 15:55:00) [2]
Проблема в том, что при выборе файла - гиф и др. не поддерживаются.

VitV (2006-05-30 12:55:00) [3]
ясно...сенкс.

Desdechado (2006-05-30 12:19:00) [4]
записывается как гиф, а перед показом в TImage преобразуем в бмп
подробнее по методу - в справке по нему

VitV (2006-05-30 11:33:00) [5]
т.е
> у любого класса для работы с картинками есть метод для преобразования
> в BMP (например, DibNeeded)

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

Desdechado (2006-05-29 18:24:00) [6]
у любого класса для работы с картинками есть метод для преобразования в BMP (например, DibNeeded)

Ega23 (2006-05-29 18:16:00) [7]

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

Кого? JPEG? GIF? PNG?

VitV (2006-05-29 18:14:00) [8]
А как преобразовывать в BMP?

Desdechado (2006-05-29 17:50:00) [9]
может, и можно
меня устраивает этот способ
а чем тебя не устраивает?

VitV (2006-05-29 17:31:00) [10]
а под другому нельзя?

Desdechado (2006-05-29 16:59:00) [11]
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 16:51:00) [12]
А как тогда кидать и bmp,gif и т.д.? Потоком?

Desdechado (2006-05-29 16:09:00) [13]
для записи картинок не обязательно их показывать
DBImage понимает только BMP и JPG (при подключении соответствующего юнита)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »