[жекаизжека]

Помогите разобраться очень нужно, ситуация такая, есть база на Access, использую ADO, нужно что бы из DBgrida при запросе или клику определеного значения, выводилось фото(привязаному значение ФИО) в Timage или DBImage

[ApxaHGe1]

Код:

procedure TForm8.DBGrid1DblClick(Sender: TObject);
begin
Jpg:=TJPegImage.Create;
Jpg.Assign(DBGrid1.Columns.Items[4].Field);
Form9.Image1.Picture.assign(jpg);
Form9.Memo2.Text:=DBGrid1.Columns.Items[5].Field.AsString;
Form9.Show;
end;

[жекаизжека]

а можно подробней для чайников, или если не сложно исходник скинуть

[ApxaHGe1]

Исходник врядли, это мой проэкт, он большой
Объясняю:
Изображения с расширениме jpg храняться в таблице, в таблице
6 столбцов
придположим структура таблицы: imya,familiya,otchestvo,foto!

Код:

procedure TForm8.DBGrid1DblClick(Sender: TObject);
//допустим таблица уже выведена в DBGrid1, и я вижу все записи таблицы, делаю двойной клик на нужной мне записи
и мне надо вывести эту запись на одтельные компоненты (допустим Label)
Label1.Caption:=DBGrid1.Columns.Items[0].Field.AsString;//получил имя из выделенной записи
Label2.Caption:=DBGrid1.Columns.Items[1].Field.AsString;//получил фамилию
Label3.Caption:=DBGrid1.Columns.Items[2].Field.AsString;// получил отчество
//счас буду выводить фото выбранного человека
//начинаю работаь с jpg
Jpg:=TJPegImage.Create;
Jpg.Assign(DBGrid1.Columns.Items[3].Field);//получил доступ к фото человека
Image1.Picture.assign(jpg);//вывел его фото в компонент Image1
вот и все
номерация в базе идет с нуля!
в БДГрид надо добавить все имя полей, которые ты будешь использовать
не нужные просто скрываешь и все

[жекаизжека]

ругаеться на это

Код:

Jpg:=TJPegImage.Create;

[ApxaHGe1]

в uses добавь JPeg