Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.08.2010, 21:28   #1
Droid
Форумчанин
 
Аватар для Droid
 
Регистрация: 24.04.2008
Сообщений: 440
По умолчанию Значение в DBLookupComboBox при выборе фотки

У меня есть таблица из 3-х столбцов
1) id_file
2) xranenie_file
3) fio
есть DBLookupComboBox и Image1 при выборе значения из DBLCB в Image1 должно показывать фотку, все работет нормально, кроме отображения значения в DBLCB (при выборе значения оно сбрасывается т.е. не остается, когда выбираю значение, но фото показывает правильно...)
Код:
procedure TFD_PAC.DBLookupComboBox4Click(Sender: TObject);
var
blobstream:TadoBlobstream;
jpeg: TjpegImage;
begin
if not dm.ADOQ_Pfile.FieldByName('xranenie_file').IsNull then
begin
try
blobstream:=tadoblobstream.Create(TBlobField(dm.ADOQ_Pfile.FieldByName('xranenie_file')), bmREAD);
jpeg:=TJPEGIMAGE.Create;
jpeg.LoadFromStream(blobstream);
image1.Picture.Bitmap.Assign(jpeg);

finally
jpeg.Free;
blobstream.Free;
end;
end;
end;
Просто не фиксируется значение, в DBLookupComboBox.
1 старый программист, лучше новых 2-х

Последний раз редактировалось Droid; 02.08.2010 в 22:55.
Droid вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Снять выделение в Combobox при выборе Ilya_L Общие вопросы Delphi 0 31.07.2010 16:09
ошибки при выборе radiobutton _alis_ Компоненты Delphi 4 29.04.2010 08:04
Событие при выборе вкладки VistaSV30 Microsoft Office Access 2 25.01.2010 21:11
Dblookupcombobox значение по дефолту при условии 1sal1 Общие вопросы Delphi 2 12.12.2009 14:16
Значение DBLookupComboBox MARCH Компоненты Delphi 58 16.11.2008 20:45