Delphi + MySQL

← →
Вова (2009-03-26 19:36) [0]

Подскажите пожалуйста, как посадить файл в поле BLOB в таблице MySQL. Использую TZQuery. делаю так:

Stream := TMemoryStream.Create;
Stream.LoadFromFile("C:\1.txt");

qMain.SQL.Text := "insert into ........ ";

// На этом месте появляется ошибка:
TBlobField(DM.qMain.ParamByName("CONTENT")).LoadFromStream(stream);

---------------------------
Debugger Exception Notification
---------------------------
Project Transport.exe raised exception class EAccessViolation with message "Access violation at address 0048CB70 in module "trs.exe". Read of address 544E5157". Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------

← →
Palladin © (2009-03-26 19:39) [1]

> TBlobField(DM.qMain.ParamByName("CONTENT"))

аре ю щуре, что оно TBlobField ?

← →
Вова (2009-03-26 19:41) [2]

> аре ю щуре, что оно TBlobField ?

Все, что в гугле нашел, как правильно написать подскажите чайнику, очень прошу =(

← →
Palladin © (2009-03-26 19:51) [3]

перевожу на родной: Ты уверен что поле CONTENT является BLOB полем?

← →
Вова (2009-03-26 19:54) [4]

> перевожу на родной: Ты уверен что поле CONTENT является
> BLOB полем?

да, в MySql Front смотрю, это точно blob поле...

← →
Palladin © (2009-03-26 20:10) [5]

ShowMessage(BoolToStr(DM.qMain.ParamByName("CONTENT").IsBlob,True))

чего кажет?

← →
Вова (2009-03-26 20:26) [6]

> чего кажет?

Не компилится, типа IsBlob нету, только IsNull есть ...

[Error] uMain.pas(155): Undeclared identifier: "IsBlob"

← →
Palladin © (2009-03-26 20:33) [7]

тьфу, у тебя зоюсы... фих знает, я ими не пользуюсь...

← →
Вова (2009-03-26 20:33) [8]

А TZQuery умеет работать с блобами ?

← →
Вова (2009-03-26 20:34) [9]

> тьфу, у тебя зоюсы... фих знает, я ими не пользуюсь...

посоветуйте какой использовать лучше ?

← →
Palladin © (2009-03-26 20:36) [10]

ну я как истинный ариец советую использовать ADO )

← →
clickmaker © (2009-03-27 10:10) [11]

эээ... а как сочетается TBlobField(DM.qMain.Param?

← →
Palladin © (2009-03-27 10:12) [12]

эко меня вчера торкнуло... такой ерунды не заметил...

← →
Вова (2009-03-27 12:30) [13]

А как правильно написать ? Или хотя бы подскажите где можно пример посмотреть? =(

← →
Вова (2009-03-27 12:30) [14]

Удалено модератором

← →
Вова (2009-03-27 12:30) [15]

Удалено модератором

← →
Вова (2009-03-27 12:30) [16]

Удалено модератором

← →
Вова (2009-03-27 12:30) [17]

Удалено модератором

← →
Вова (2009-03-27 12:30) [18]

Удалено модератором

← →
Вова (2009-03-27 12:30) [19]

простите, инет погнал

> Вова (27.03.09 12:30) [13]
>
> Или хотя бы подскажите где можно
> пример посмотреть?

Почитать справку на предмет отличия Field от Param в свете назначений этих сущностей.

← →
from kz (2009-03-27 20:22) [21]

ParamByName("CONTENT").LoadFromStream(stream , ftBlob);

Delphi + MySQL Найти похожие ветки