добавление ФОТО типа blob

[angel_ok]

Есть несколько таблиц. В одной из них есть поле "ФОТО" типа блоб. Надо вставить фотку.
Я сделала что б открывалось окно, где можно выбрать фото и просмотреть.
А вопрос: как мне сохранить это фото?что б при переходе, например,с одной строчки на другую, фото оставалось?
p.s. на сайте нашла несколько тем,но так и не разобралась((((

[Stilet]

http://delphiworld.narod.ru/base/ima...lob_field.html
Подойдет?

[asmodey1]

Подцепите к полю "ФОТО" компонент DBImage.
А потом просто :

DBImage1.Picture.Assign(MyImage.Picture);

[angel_ok]

Сообщение от Stilet

http://delphiworld.narod.ru/base/ima...lob_field.html
Подойдет?

взяла оттуда
procedure TForm1.N1Click(Sender: TObject);
begin
C := TClipboard.Create;
try
if Clipboard.HasFormat(CF_BITMAP) then
DBImage1.PasteFromClipboard
else
ShowMessage('Буфер обмена не содержит изображения!');
finally C.Free;
end;
end;

постоянно выдаёт сообщение 'Буфер обмена не содержит изображения!' даже еcли загружаю фото формата blob

[asmodey1]

Копирование содержимого объекта типа TBitmap в свойство Picture компонента TDBImage

var
B: TBitmap;
begin
B := TBitmap.Create;
try
B.LoadFromFile('c:\delphi\images\splash\16color\athena.bmp');
DBImage1.Picture.Assign(B);
finally
B.Free;
end;