программисты которые работали в Delphi с базами данных
- 03.01.12, 13:35
Начала делать курсовую,столкнулась с проблемой-не знаю как можно к определенному полю таблицы б.д. Привязать картинку,например у меня таблица содержит инфо о сотрудниках фирмы,я хочу к каждому привязать фото!Если кто то знает напишите пожалуйста!!!
Питання закрите
0
Повернутися до відповідей
EVP Limited
19:14, 03.01.2012
а какую СУБД ты используешь?
если Paradox, то там можно в записях использовать поле с Blob binary, в которое записываются jpg файлы.
а вытягивать их оттуда можна вот таким способом:
(смотри продолжение)
EVP Limited
1 19:14, 03.01.2012
procedure TForm1.BitBtn1Click(Sender: TObject);
var st : TMemoryStream;
BS: TStream;
bm: TBitmap;
begin
st:=TMemoryStream.Create;
BS := table1.CreateBlobStream(table1.FieldByName('datagif'), bmRead);
try Image1.Picture.LoadFromStream(BS);
if not (Image1.Picture.Graphic is TBitmap) then
begin
Bm.PixelFormat := pf24Bit;
Bm.Width := Image1.Picture.Width;
Bm.Height := Image1.Picture.Height;
Bm.Canvas.Draw(0, 0, Image1.Picture.Graphic);
Image1.Picture.Bitmap.Assign(Bm);
end;
bm.Free;
end;
EVP Limited
2 19:19, 03.01.2012 Відповідь на 1 от EVP Limited
(продолжение 2)
а я бы хранил картинки как отдельные файлы и привязал бы к текстовому полю по имени файла.
L_amour
3 21:12, 03.01.2012 Відповідь на 2 от EVP Limited
Спасибо большое,сейчас попробую)