MagistrAnatol Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Код:   procedure TForm1.Button2Click(Sender: TObject); var Stream : TMemoryStream; begin    Stream := TMemoryStream.Create;     try       TBlobField(tFrxTempl.FieldbyName('TEMPATE_TEXT')).SaveToStream(Stream);       Stream.Position := 0;       if Stream.Size > 0 then       begin          frxReport1.LoadFromStream(Stream);          frxReport1.FileName := tFrxTempl.FieldbyName('TEMPLATE_FILE_NAME').AsString;       end;    finally       Stream.Free;     end end;   Всего записей: 2120 | Зарегистр. 09-04-2003 | Отправлено: 10:07 20-03-2012

На первую страницу • к этому сообщению • к последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » FastReport

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование