Форум: "Базы";
Текущий архив: 2006.05.07;
Скачать: [xml.tar.bz2];
Вниз
Добавление Jpeg в таблицу Найти похожие ветки
← →
RomanH © (2006-03-15 17:48) [0]День добрый мастера.Не могу сообразить почему файл с расширением jpeg не загружается в таблицу Paradox.
Тип поля Binary.А перед тем как сделать ApplyUpdates(0),я в DBImage.Picture помещаю имя файла с OpenDialog.
procedure TAppendDogovorForm.BitBtn3Click(Sender: TObject);
var B:TJpegImage;
begin
if not OpenDialog1.Execute
then exit;
FName:=OpenDialog1.FileName;
B:=TJpegImage.Create;
try
B.LoadFromFile(FName);
DbImage1.Picture.Assign(B);
except
on EInOutError do
begin
Application.MessageBox("Îøèáêà äîñòóïà ê ôàéëó",
"Îøèáêà",MB_ICONERROR+MB_OK);
Exit;
end;
end;
end;
Заренее благодарен.
← →
Reindeer Moss Eater © (2006-03-15 17:52) [1]TBlobField.LoadFromFile
except
on EInOutError do
begin
Application.MessageBox("Îøèáêà äîñòóïà ê ôàéëó",
"Îøèáêà",MB_ICONERROR+MB_OK);
Exit;
end;
end;
← →
Reindeer Moss Eater © (2006-03-15 17:52) [2]А что, кроме как EInOutError других исключений не ожидается?
← →
Reindeer Moss Eater © (2006-03-15 17:55) [3]Кроме того
DbImage1.Picture.Graphic.Assign(B);
← →
RomanH © (2006-03-15 18:05) [4]Не получается даже DbImage1.Picture.Graphic.Assign(B);
Может дело в типе поля
← →
Desdechado © (2006-03-15 18:45) [5]
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;
← →
RomanH © (2006-03-17 11:57) [6]Здраствуйте мастера, как предложил Desdechado, это очень грамотно.
Но появляется ошибка при сохранении Field value out of lookup table range ? Не могу понять почему ведь тип поля Binary, а размер первых байтов=240.И еще один вопрос DBImage будет ли показывать сохраненный jpg файл.
← →
Desdechado © (2006-03-17 12:31) [7]лучше использовать простой TImage, в нем можно преобразовать с использованием модуля JPEG перед показом данные
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2006.05.07;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.011 c
