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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> изображение Chart в Bitmap, Не через SaveToBitmapFile 
V
    Опции темы
zalex
Дата 9.2.2006, 15:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



привет всем!
Есть Chart, необходимо его изображение сохранить в какой либо TBitmap. Как добраться до этого изображения, без сохранения изображения в файл и затем его закачки.
PM MAIL   Вверх
Snowy
Дата 9.2.2006, 16:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

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



Код
var
  bmp: TBitmap;
begin
  bmp:=TBitmap.Create;
  bmp.Width := Chart1.Width; bmp.Height := Chart1.Height;
  BitBlt(bmp.Canvas.Handle, 0, 0, bmp.Width, bmp.Height,
         Chart1.Canvas.Handle, 0, 0, SRCCOPY);

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


Шустрый
*


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

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



Не совсем получилось smile
В общем я сохраняю Chart в Bitmap , что бы затем Bitmap вставить в Rave отчет. Перед формированием отчета выскакивает небольшая формочка (я дажа названия не Успеваю прочитать) и исчезает, наверное прогресс. Так вот, при указанном способе копирования кусок этой формочки виден на Chart'e.

Я с графикой почти не работал, можно ли сделать, вопрошаемое мной (!во сказал), как нить наподобие Canva1:=Canva2?
smile
PM MAIL   Вверх
Snowy
Дата 9.2.2006, 17:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

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



Нет только так.
А проблемма с окнами, перекрывающими канвас имеется в наличии.
Пока не придумали как ее победить.

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


Шустрый
*


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

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



код

bmp.Canvas.CopyRect(MyRect,Chart1.Canvas.ReferenceCanvas,MyRect);

к сожалению приводит к тому же результату.
PM MAIL   Вверх
Romikgy
Дата 9.2.2006, 17:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Любитель-программер
****


Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

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



А если перед
Цитата(zalex @ 9.2.2006, 16:23 Найти цитируемый пост)

bmp.Canvas.CopyRect(MyRect,Chart1.Canvas.ReferenceCanvas,MyRect);

поставить типа SetForegroundWindow(Form1.Handle);
Ну или поизвращатся в этом направлении, типа всегда окно сверху?


--------------------
Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности. 
smile

PM   Вверх
zalex
Дата 9.2.2006, 19:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



FormStyle:=StayOnTop!
Спасибо всем!
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

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

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

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

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


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

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


 




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


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

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