🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi.bazy-danych
Article #70227

Plik (obrazek) do bazy (pole blob)

#70227
From: Buster
Date: Wed, 27 Jun 2007 13:09
28 lines
1924 bytes
Witam.
Mam taki mały problemik. Potrzebuję w bazie danych w polu typu blob 
przechować obrazki. Rekordy dodaję poprzez komponent ADOCommand, 
wpisując zapytanie insert bezpośrednio w kodzie programu czyli:
ADOCommand1.CommandText := string_z_zapytaniem;

Wykombinowałem sobie coś takiego:
Plik : TFileStream;
Zdjecie : TStringStream;
Plik := TFileStream.Create(nazwa_pliku_pobrana_z_Edita, fmOpenRead);
Zdjecie := TStringStream.Create('');
Zdjecie.CopyFrom(Plik, Plik.Size);

Następnie w zapytaniu, w miejscu, gdzie ten plik ma być umieszczam: 
Zdjecie.DataString.
Oczywiście to zdjęcie jest jedną ze składowych całego rekordu.
Niestety ta metoda działa, źle. Otóż wywala się twierdząc, że jest jakiś 
błąd w składni SQL. Podejrzewam, że chodzi tutaj o jakieś znaki 
specjalne, które są w ciągu znaków reprezentujących obrazek. W PHP jest 
taka fajna funkcja addslashes().

Czy mógłby ktoś mi podpowiedzieć co jest nie tak??

-- 
Pozdrowienia
Radek Dobrowolski vel Buster
GG: 1670266
Odpowiadajac na priv, zamien 1 na i w adresie e-mail
Technical Details
Message-ID: <f5tnpf$e0f$1@inews.gazeta.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
From: Buster <radob@w1pos.p.lodz.pl>
Newsgroups: pl.comp.lang.delphi.bazy-danych
Subject: Plik (obrazek) do bazy (pole blob)
Date: Wed, 27 Jun 2007 15:09:10 +0200
Organization: "Portal Gazeta.pl -> http://www.gazeta.pl"
Lines: 28
Message-ID: <f5tnpf$e0f$1@inews.gazeta.pl>
NNTP-Posting-Host: pc-212-191-88-181.p.lodz.pl
Mime-Version: 1.0
X-Trace: inews.gazeta.pl 1182949999 14351 212.191.88.181 (27 Jun 2007 13:13:19 GMT)
X-Complaints-To: usenet@agora.pl
NNTP-Posting-Date: Wed, 27 Jun 2007 13:13:19 +0000 (UTC)
X-User: busterek
X-Antivirus: avast! (VPS 000752-1, 2007-06-26), Outbound message
X-Antivirus-Status: Clean
User-Agent: Thunderbird 2.0.0.4 (Windows/20070604)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit