Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.20;
Скачать: CL | DM;

Вниз

Картинка в базе   Найти похожие ветки 

 
Vital_k ©   (2006-06-15 15:34) [0]

Здравствуйте
подскажите плиз каким образом записать картинку, которая загружена в image, в базу данных. И соответственно, как эту картинку считать с базы обратно в image


 
Pe+erBuild ©   (2006-06-15 15:51) [1]

Используй компонент TDBImage! Привяжи его к полю оно должно быть типа Graphic. Потом грузи в него картинку от куда хочешь: с файла, буфера, image


 
Desdechado ©   (2006-06-15 15:54) [2]

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;

--

var stream: TMemoryStream;
..

stream := TMemoryStream.Create;
try
stream.Size := IBStoredProc.Param[..].GetDataSize;
IBStoredProc.Param[..].GetData(stream.Memory);
..
Image.Picture.Bitmap.LoadFromStream(stream);
finally
stream.Free;end;


 
Desdechado ©   (2006-06-15 15:55) [3]

Pe+erBuild ©   (15.06.06 15:51) [1]
твой вариант прокатит только с BMP



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

Текущий архив: 2006.08.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.071 c
15-1153609537
Ketmar
2006-07-23 03:05
2006.08.20
сборник стихов Дины Арбениной


4-1146253724
Beginner81
2006-04-28 23:48
2006.08.20
Как запустить приложение (игру) в окне?


2-1154428209
DelphiLexx
2006-08-01 14:30
2006.08.20
external без описания имени модуля


2-1154586636
Кирей
2006-08-03 10:30
2006.08.20
как открыть Query12 - Query31


3-1150126443
Варяг
2006-06-12 19:34
2006.08.20
MySQL + Delphi