Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.02.03;
Скачать: CL | DM;

Вниз

Как сохранить картинку в BLOBполе без TBlobField с помощью SQL   Найти похожие ветки 

 
bss   (2007-09-25 09:12) [0]

Необходимо сохранить картинку в BLOBполе таблицы, но используя команды SQL - INSERT и UPDATE.
Как это можно сделать?
БД - MySQL.


 
Ega23 ©   (2007-09-25 09:28) [1]


function StreamToMSSQLStr(aStream:TStream):String;
var
i:Integer;
bb:array[0..1] of byte;
begin
Result:="NULL";
if (not Assigned(aStream)) or (aStream.Size=0) then Exit;
aStream.Position:=0;
Result:="0x";
for i:=0 to aStream.Size-1 do
 begin
  aStream.Read(bb,1);
  Result:=Result+Dec2Hex(bb[0],2);
 end;
end;


 
bss   (2007-09-25 10:08) [2]

а как это будет выглядеть на C, не подскажите?


 
Ega23 ©   (2007-09-25 10:13) [3]

Может тебе ещё дать и ключ от квартиры, где деньги лежат?


 
bss   (2007-09-25 10:17) [4]

спасибо. Уже разобралась
хотя... А много денег?


 
sniknik ©   (2007-09-25 10:36) [5]

Ega23 ©   (25.09.07 09:28) [1]
параметры и проще и намного эффективнее чем так. и что поразительно, в запросах типа  INSERT и UPDATE, они тоже могут использоваться (запретов нет). т.что нет большого смысла использовать предложенный метод.


 
Ega23 ©   (2007-09-25 10:48) [6]


> параметры и проще и намного эффективнее чем так.



> Как сохранить картинку в BLOBполе без TBlobField с помощью SQL


То, что параметрв эффективнее - это я в курсе...  :)))


 
sniknik ©   (2007-09-25 11:28) [7]

> без TBlobField
TBlobField <> TParametr
или я неправ?


 
Ega23 ©   (2007-09-25 11:35) [8]

А, ты в этом плане...
Да, прав.
Только не люблю я параметры в ран-тайм создавать....  :)


 
Anatoly Podgoretsky ©   (2007-09-25 11:49) [9]

А ты не создавай, пусть Дельфи этим занимается.


 
Ega23 ©   (2007-09-25 11:50) [10]


> А ты не создавай, пусть Дельфи этим занимается.


В смысле?


 
Anatoly Podgoretsky ©   (2007-09-25 11:59) [11]

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


 
Desdechado ©   (2007-09-25 12:37) [12]

Query1.Sql.Text :=
  "INSERT INTO testblob " +
  " ( " +
  "  fBlob" +
  " )" +
  " VALUES" +
  " (" +
  " :ParamBlobField" +
  ")";
Query1.ParamByName("ParamBlobField").DataType := ftBlob;
Query1.ParamByName("ParamBlobField").ParamType := ptInput;
Query1.ParamByName("ParamBlobField").LoadFromFile("MyFile",ftBlob);
Query1.ExecSql;


 
Ega23 ©   (2007-09-25 13:04) [13]


> Дельфи в состоянии сама создать параметры, я уже не помню
> когда последний раз из сам создавал.


Это если коннекшн задан. А если нет?


 
sniknik ©   (2007-09-25 13:23) [14]

> А если нет?
то проще/лучше его задать... хотя бы на время, пока вносишь запросы в компоненты.
а даже если не задашь, параметр все одно создастся, только типа ftUnknown, т.е. тип ему будет определяться непосредственно при внесении данных (или сам можеш до как в [12])



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

Текущий архив: 2008.02.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.382 c
2-1199547002
Олег
2008-01-05 18:30
2008.02.03
Блокировка трафика


2-1200065240
AntonUSAnoV
2008-01-11 18:27
2008.02.03
перевод типа word в string


2-1199977556
Footballer
2008-01-10 18:05
2008.02.03
IP-адрес удалённого компа


15-1198561231
mrFreeman2007
2007-12-25 08:40
2008.02.03
Как устанавливать компоненты?


2-1199644924
Lab
2008-01-06 21:42
2008.02.03
как программно зашифровать (EFS кодирование) каталог/файл?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский