кто поможет записать картинку JPG в поле базы данных

← →
серго © (2005-06-27 00:06) [0]

не получается записать картинку JPG в файл базы данных формата Paradox поле формата GRAPHIC

← →
sniknik © (2005-06-27 00:17) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?n=1&search=JPG

← →
серго © (2005-06-27 01:49) [2]

у меня не получилось вставить кусок текста в программу

← →
ЮЮ © (2005-06-27 05:55) [3]

>у меня не получилось вставить кусок текста в программу

Т.е. первоначальная проблема трансформировалась в " кто поможет вставить кусок текста в программу" ? :)

Попробуй Ctrl + C, Ctrl + V

← →
серго © (2005-06-27 11:07) [4]

>Попробуй Ctrl + C, Ctrl + V

очень остроумно!!!

← →
sniknik © (2005-06-27 11:25) [5]

а мне понравилось...
абсолютно точная реакция на
> у меня не получилось вставить кусок текста в программу
единственное подробностей не хватает, так сказать пояснений на пальцах.
другое дело что хотелось видимо не этого, но так и спрашивать надо то чего хочеш, а не двусмысленные отписки лепить и ждать что ответят на то про что думаеш. (телепаты в отпуске. бессрочном.)

-----------------------
- купил вчера мясорубку. попробовал.
- наконец то понял, что означает фраза "обьясни на пальцах как это работает"...

← →
серго © (2005-06-27 11:34) [6]

oS := qryGraf.Create( qryGraf.FieldByName( "PICT_BLOB" ), bmRead );
if( oS.Size > 0 ) then begin
case( cExt[ 1 ] ) of
"B":
Image1.Picture.Bitmap.LoadFromStream( oS );
"I":
Image1.Picture.Icon.LoadFromStream( oS );
"J":
begin
oJPG := TJPEGImage.Create;
oJPG.LoadFromStream( oS );
oJPG.DIBNeeded;
Image1.Picture.Bitmap.Assign( oJPG );
oJPG.Free;
end;
"E", "W":
Image1.Picture.Metafile.LoadFromStream( oS );
end; // case

какого формата должна быть oS?

← →
ЮЮ © (2005-06-27 11:50) [7]

TBlobStream, например, тогда

oS := TBlobStream.Create( qryGraf.FieldByName( "PICT_BLOB" ), bmRead );

← →
sniknik © (2005-06-27 12:05) [8]

http://delphimaster.net/view/3-1118302418/
оригинал кода.

delphi ругается на qryGraf пишет undeclared identifier qryGraf

> [9] серго © (27.06.05 14:31)
> delphi ругается на qryGraf пишет undeclared identifier qryGraf
Это называется "Приплыли". Картина такая. Или "Опять двойка". Тоже картина.

не надо тупо копировать, а указать имя своего DataSeta (или переименовать свой в qryGraf :)

>не надо тупо копировать, а указать имя своего DataSeta (или переименовать свой в qryGraf :)
ты прежде чем рамсить сам попробуй этот кусок кода откомпилируй!!! умник блин

кто поможет записать картинку JPG в поле базы данных Найти похожие ветки