| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Получение информации из blob-поля [D7, IB5.x]

greg123 ©   (2007-07-11 10:59:00) 

Почему-то все вопросы по blob-полям ограничиваются только загрузкой в данные поля, а как от туда получить ранее загруженную информацию?
У меня в блоб-поле находится архив, содержащий дбф-файл, как можно взять этот архив, для проведения над ним каких-либо действий (распаковать архив, прочитать дбф и т.д.)?

Заранее спасибо.

---

gentos   (2007-07-11 16:51:00) [1]

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

---

gentos   (2007-07-11 16:51:00) [2]

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

---

Игорь Шевченко   (2007-07-11 15:27:00) [3]

господа любители повыяснять отношения - это гораздо лучше делать в режиме Readonly. Особенно это относится к постоянным посетителям сайта.

---

StriderMan   (2007-07-11 15:21:00) [4]

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

---

Ega23   (2007-07-11 12:54:00) [5]

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

---

homm   (2007-07-11 12:51:00) [6]

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

---

greg123   (2007-07-11 12:46:00) [7]

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

---

Ega23   (2007-07-11 12:39:00) [8]

> Может хоть кто-нибудь даст подробное разъяснение?



Saves the contents of the BLOB field to a stream.

Delphi syntax:

procedure SaveToStream(Stream: TStream);

C++ syntax:

void __fastcall SaveToStream(Classes::TStream* Stream);

Description

Use SaveToStream to copy the contents of a BLOB field to a stream. Specify the name of the stream to which the field’s value is saved as the value of the Stream parameter.

Note: The Stream parameter is typically not a BLOB stream. BLOB streams (returned by the dataset’s CreateBlobStream method) provide a completely separate mechanism for streaming data from a BLOB field.

var
 MS: TMemoryStream;
begin
 MS := TMemoryStream.Create;
 try
   SQLDataSet1Images.SaveToStream(MS);
   Image1.Picture.Bitmap.LoadFromStream(MS);
 finally
   MS.Free;
 end;
end;
TMemoryStream *pMS = new TMemoryStream;
try
{
 SQLDataSet1Images->SaveToStream(pMS);
 Image1->Picture->Bitmap->LoadFromStream(pMS);
}
__finally
{
 delete pMS;
}



> Ты бы мне попробовал в глаза это сказать!


Я могу в глаза сказать. Если показаться не забоишься.

---

greg123   (2007-07-11 12:23:00) [9]

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

---

homm_ro   (2007-07-11 12:17:00) [10]

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

---

greg123   (2007-07-11 12:15:00) [11]

Может хоть кто-нибудь даст подробное разъяснение?

---

clickmaker   (2007-07-11 11:47:00) [12]

> что такое F1?

это там, где Шумахер

---

Ega23   (2007-07-11 11:46:00) [13]

F1 - это справка.

---

greg123   (2007-07-11 11:41:00) [14]

А можно расписать по подробнее, не могу применить данную функцию, и что такое F1?

---

Ega23   (2007-07-11 11:01:00) [15]

TBlobField(FieldByName('MySuperBLOB')).SaveToFile + F1
TBlobField(FieldByName('MySuperBLOB')).SaveToStream + F1

---

Наверх