Вниз
Скачать: CL | DM;

почему не грузится изображение?   Найти похожие ветки 

← →
GIL ©   (2004-04-09 13:46) [0]

MainIBQ.First;
 if not MainIBQ.IsEmpty then begin
  Strm:=TMemoryStream.Create;//(MainIBQSMALL,bmRead);
  for i:=1 to 12 do begin
   if not MainIBQ.Eof then begin
    MainIBQSmall.SaveToStream(Strm);
    (ScrollBox1.Controls[i*2-1] as TImage).Picture.Bitmap.LoadFromStream(Strm);
    (ScrollBox1.Controls[i*2-1] as TImage).Enabled:=True;
    (ScrollBox1.Controls[i*2] as TLabel).Caption:=MainIBQId.Value;
   end
Практически все хорошо, но рисунка нет!


← →
GIL ©   (2004-04-09 13:56) [1]

Если пытаться создать блобстрим, то он его вообще не хочет создавать, хотя все по примеру из хелпа


← →
sniknik ©   (2004-04-09 13:59) [2]

похоже не хватает кусочка кода
Strm.Position:= 0;
(с условием что остальное хорошо, практически)


← →
GIL ©   (2004-04-09 14:03) [3]

класс, спасибо!! а что он по умолчанию ее не в 0 выставляет когда из базы считывает? а то когда из файла, то все нормально


← →
sniknik ©   (2004-04-09 14:10) [4]

не знаю, не читал так никогда из файла, и в базах не уверен может гдето и ставит по умолчанию... но я всегда сам ставил.


← →
jack128 ©   (2004-04-09 14:19) [5]

На самом деле было бы странно, если бы SaveToStream обратно позицию возврощал в ноль, вы не находите? ;-)


← →
GIL ©   (2004-04-09 14:29) [6]

извинете не знал



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.031 c
1-1082614293
Draught
2004-04-22 10:11
2004.04.11
Реакция TEdit на нажание клавиш


4-1079099581
DennisLNC
2004-03-12 16:53
2004.04.11
Прокрутка в ListView


14-1079127758
TButton
2004-03-13 00:42
2004.04.11
Black and White


14-1079600414
Aristarh
2004-03-18 12:00
2004.04.11
Помогите перевести (рус->англ)


14-1079256575
ИМХО
2004-03-14 12:29
2004.04.11
А что в Испании творится?




   Наверх