сохранение пути картинки в базу

[haker270]

Здравствуйте
простите за баян, знаю что тема старая, но толкового ответа так и не нашел
Подскажите
есть бд аксес и делфи проект. читал что хранение картинок в самой бд значительно увеличивает размер бд, поэтому лучше в бд хранить путь к картинке, а саму папку с картинками в базе.
Как это организовать?
стандарт к каждой записи нужна соответствующая картинка
нашел код, но как и куда вставлять, я так и не понял и какие компоненты добавить на форму

imgpath:=ExtractFilePath(Applicatio n.ExeName)+'\img\'+ DBGrid1.DataSource.DataSet.FieldByN ame('ID').AsString+'.jpg';
Image1.Picture.LoadFromFile(imgpath );

Заранее благодарен

[Stilet]

как и куда вставлять

Скажем сделай на форме кнопку, в которой будет такой код.
Ессно что на форме должен быть Image и DBgrid.
В базе должно быть строковое поле 255 символов (больше не стоит).
Далее. Чтоб внести новое имя фала используй OpenPictureDialog, который дат тебе полны путь к файу. В Базу вноси только имя файла (учитывая что у тебя картинки как я понял хранятся возле программы в каталоге img);

какие компоненты добавить на форму

Ну например

    ADOTable1: TADOTable;
    DBGrid1: TDBGrid;
    Image1: TImage;

И можно описать событие прохода по гриду - OnAfterScroll (Это собыытие Table)
Это если кнопку не захочешь. Стал на запись - получил картинку:

procedure TForm2.ADOTable1AfterScroll(DataSet: TDataSet);
var imgpath:string;
begin
 imgpath:=ExtractFilePath(Application.ExeName)+'\img\'+ DBGrid1.DataSource.DataSet.FieldByName('ID').AsString+'.jpg';
 Image1.Picture.LoadFromFile(imgpath );
end;