Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> таблицу в TMemoryStream, таблицу в TMemoryStream 
V
    Опции темы
mr_oz
Дата 6.7.2008, 16:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 7.10.2006

Репутация: нет
Всего: нет



Привет всем!!! Подскажите пожалуйста как можно Stringgrid, DBGrid передать в переменную типа TMemoryStream)))
PM MAIL   Вверх
THandle
Дата 7.7.2008, 05:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372



Попробуй:

TMemoryStream.WriteComponent, TMemoryStream.ReadComponent;
PM   Вверх
mr_oz
Дата 7.7.2008, 07:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 7.10.2006

Репутация: нет
Всего: нет



сейчас как раз копаюсь... но че то никак . Видел пример с файловым потоком, но если его переделать в TMemoryStream.... Получится воть:
из StringGrida в поток нормально все получается:

Код

m1, m2: TMemoryStream; 
...
ms1.WriteComponent(StringGrid1);
CompressStream(ms1, ms2);
ms2.SaveToFile('C:\ms2.dat');

 А вот обратно:

Код


 ms1.LoadFromFile('C:\ms2.dat');
 DecompressStream(ms1, ms2);
 StringGrid1 := ms2.ReadComponent(StringGrid1) as TStringGrid; <-- error


Ошибка class TInplaceEdit not Found

После чего вычитал что возможно добавить RegisterClass([TStringGrid]);
Эффекта 0;
PM MAIL   Вверх
Alexeis
Дата 7.7.2008, 09:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459



mr_oz, указатель потока пробовал в начало перемещать?  smile 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
mr_oz
Дата 7.7.2008, 17:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 7.10.2006

Репутация: нет
Всего: нет



Alexeis , Извени пожалуйста возможно за глупый вопрос... Какой указатель куда в начало... (Просто сейчас всплывает в памяти только указатели из языка С, под него чаще пишу smile ... Не соображу ни как куда и что)
Я в начало только ставил RegisterClass([TStringGrid]); ошибка

PM MAIL   Вверх
Alexeis
Дата 7.7.2008, 17:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459



Ну т.е. позицию для операций чтения/записи Position.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
mr_oz
Дата 7.7.2008, 18:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 7.10.2006

Репутация: нет
Всего: нет



А все  понял... Сейчас попробую.... 
Типо outStream.Position := 0; или inStream.Position
Спасибо)))
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0741 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.