powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Запись в поле binary Stream данных
2 сообщений из 2, страница 1 из 1
Запись в поле binary Stream данных
    #32338632
Петр
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не могу записать в поле binary (SQL Server ADO), stream -> пишет несовмечтимость типов
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
var
 Grid: TDBGrid;
 Stream: TStream;
 Table: TADOTable;
begin
        Grid.Columns.SaveToStream(Stream);
***
end;


Подскажите правильный формат...
...
Рейтинг: 0 / 0
Запись в поле binary Stream данных
    #32338881
LexusR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
читай Help и будет тебе счастье
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
Loads BLOB data from a stream into the field.

procedure LoadFromStream(Stream: TStream);

Description

Use LoadFromStream to copy the contents of a stream into the BLOB field. Specify the stream from which the field’s value is copied 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 into a BLOB field.

var

  MS: TMemoryStream;
begin
  if not (ClientDataSet1.State in [dsInsert, dsEdit]) then
    ClientDataSet1.Insert;
  MS := TMemoryStream.Create();
  try
    Image1.Picture.Bitmap.SaveToStream(MS);
    ClientDataSet1Images.LoadFromStream(MS);
  finally
    MS.Free;
  end;
  ClientDataSet1.Post;

end;
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Запись в поле binary Stream данных
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]