Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.013 c