Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

добавление рисунка в БД из файла [D5, MSSQL]

Страницы: 1 2 >
KirillRepin © (2008-09-12 12:04:00)
Подскажите пожалуйста в чем ошибка? рисунок в БД не добавляется.
процедура в БД:
CREATE PROCEDURE Proc_AddImage
@im image
AS
BEGIN
INSERT INTO Tab_Pictures (Pic_Name, Pic)
VALUES ('picture1', @im)
END

GO

код в дельфи:
StoredProc1.ParamByName('@im').LoadFromFile('C:\1r.bmp', ftBlob);
StoredProc1.ExecProc;

Что сделано не правильно и как надо?
Заранее благодарен!

stas (2008-09-12 16:57:00) [1]
TBlobField.SaveToStream ()

KirillRepin (2008-09-12 16:31:00) [2]
Подскажите пожалуйста, а загрузить из БД обратно в TImage как?
как я понимаю это SaveToStream вот только немогу сформировать нормально код. Вот что делаю я:
var
s:TMemoryStream;
begin
s:=TMemoryStream.Create;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Text := 'SELECT Pic FROM Tab_Pictures WHERE Id_Pictures = 4';

Query1.ExecSQL;

end;

Что не так? и как правильно воткнуть и куда SaveToStream ?

Ega23 (2008-09-12 16:03:00) [3]

> вот ты что используешь в том на что ссылаешься?

ODBC, конечно. Откровенно говоря, ни разу не видел, чтобы кто-то именно на BDE-шном драйвере что-то делал. Ну если только ОЧЕНЬ давно...

www (2008-09-12 15:47:00) [4]

> Мне теперь интересно а как загрузить из TImage?

loadfromstream

KirillRepin (2008-09-12 15:38:00) [5]
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Text := 'exec Proc_AddImage @im=:im';
Query1.ParamByName('im').LoadFromFile('C:\bear.bmp', ftBlob);
Query1.ExecSQL;

Мне теперь интересно а как загрузить из TImage?

stas (2008-09-12 15:34:00) [6]
KirillRepin © (12.09.08 15:33) [33]
Ты хоть напиши что сделал.

sniknik (2008-09-12 15:34:00) [7]
> З.Ы. Может хватит чушь пороть?
это не чушь, действительно встречал предупреждения (и не где нибудь в инете, а в официальной доке) о прекращении поддержки с версии 6,5 или 7 и потому работа на более старшей версии не гарантируется...
единственное о чем он не упомянул, это о том, что речь там шла о "нативном" BDE-шном драйвере(/линке), а не о чем то другом, вроде ODBC, поддержка которого продолжалась существенно дольше.

и насколько понимаю все успешно работающие проекты на BDE используют именно ODBC, т.к. иначе проблемы были бы наверняка.
вот ты что используешь в том на что ссылаешься?

KirillRepin (2008-09-12 15:33:00) [8]
Все получилось! спасибо большое за помощь в решении моей проблемы!

stas (2008-09-12 15:26:00) [9]
Ega23 © (12.09.08 14:31) [25]
> Только это не значит, что оно "не работает".

А я и не писал этого

> т.е. все нововведения, которые появились в MSSQL 2000 (типы
> полей в частности)

А то что работаю программы, которые и с 7-кой работали, то ясно что они и будут работать и на 2008.

KirillRepin © (12.09.08 15:00) [30]
А твоя проблема в том что на BLOB нужно в алиасе BDE устанавливать максимальный размер, который по умолчанию меньше чем твоя картинка.

Ega23 (2008-09-12 15:11:00) [10]

> Query1.SQL.Clear;
> Query1.SQL.Add('exec Proc_AddImage @im=0xFFFF');

Query1.SQL.Text := '.....';

> а как теперь с загрузкой из файла быть?-

Я тебе уже выше ответил.

KirillRepin (2008-09-12 15:00:00) [11]
Сделал так:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('exec Proc_AddImage @im=0xFFFF');
Query1.ExecSQL;

все заработало!

в БД:
2 picture1 0xFFFF

а как теперь с загрузкой из файла быть?-

Ega23 (2008-09-12 14:49:00) [12]

> Query1: No SQL statement aviable

О чём это говорит, не догадываешься?

Ega23 (2008-09-12 14:48:00) [13]

> Значит она и с 6.5 работала

Ну с ней - нет, с 7.0 - да.

> И еще вопрос у тебя клиент был написан на D5?

D5, полтора года назад на D7 перевёл.

> т.е. не используются новые возможности.

Ясен пень не используются. Поддержка BDE прекращена давным-давно (с D4 вроде). Только это не значит, что оно "не работает".

KirillRepin (2008-09-12 14:46:00) [14]
попробовал с Query выдает ошибку:
Query1: No SQL statement aviable

stas (2008-09-12 14:45:00) [15]
Ega23 © (12.09.08 14:31) [25]
> 7 лет уже система работает.
Значит она и с 6.5 работала
>Т.е. мне нужно срочно на старую работу письмо
опять же клиент заточен под 6.5.
т.е. не используются новые возможности.

И еще вопрос у тебя клиент был написан на D5?

Ega23 (2008-09-12 14:31:00) [16]

> Да как раз с BLOB полями проблемы. И nvarchar.

Нет никаких проблем. Как с BLOB-ами, так и с nvarchar. 7 лет уже система работает.

> sql_variant

Гм... Действительно есть такой тип. А нафига он на клиенте?

> Но а о переходе на MSSQL 2005 при работе с BDE и разговоров
> быть неможет.

Т.е. мне нужно срочно на старую работу письмо отправить, чтобы они всем серверам даунгрейд сделали, т.к. stas © сказал, что это работать не может (а почему-то работает)?

З.Ы. Может хватит чушь пороть?

stas (2008-09-12 14:00:00) [17]
Да как раз с BLOB полями проблемы. И nvarchar.
Как работает BDE с новыми типами sql_variant и bigint незнаю, возможно тоже проблематично.
Но а о переходе на MSSQL 2005 при работе с BDE и разговоров быть неможет.

Ega23 (2008-09-12 13:41:00) [18]

> т.е. все нововведения, которые появились в MSSQL 2000 (типы
> полей в частности) BDE не поддерживает

Хочу услышать, какие типы полей в MSSQL 2000 не поддерживает BDE (за езыг тебя никто не тянул, заметь).

stas (2008-09-12 13:07:00) [19]
D5,BDE, а MSSQL 2000? в BDE поддержки MSSQL 2000 уже нет, т.е. все нововведения, которые появились в MSSQL 2000 (типы полей в частности) BDE не поддерживает. А это означает что можешь столкнуться еще с другими проблемами. Поэтому лучше ADO.

KirillRepin (2008-09-12 12:58:00) [20]

> ADO для MSSQL - родная технология для доступа к данным.
> Т.е. наиболее оптимальная.

благодарю за краткое и грамотное объяснение!
в дальнейшем буду использовать.
но в данный момент хотелось бы решить вопрос как он есть.

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »