Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Romul_and_Rem

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

17.12.2011, 20:27. Показов 1213. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите, кто знает, в чем причина!
Делаю вот что:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure MyProc(var Metafile: Tmetafile);
var
  MyMetafile : Tmetafile;
begin
  MyMetafile := TMetafile.Create;
  with TMetafileCanvas.Create(MyMetafile,0) 
  do begin
    draw(0,0,Metafile);
    free;
  end;
  Metafile.Destroy;
  Metafile := MyMetafile;
end;
Собственно, процедура заменяет исходный метафайл на его копию. Используется расширенный метафайл (EMF). Однако, если сделать последовательность вызовов
Delphi
1
2
3
4
MyProc(Metafile);
MyProc(Metafile);
MyProc(Metafile);
MyProc(Metafile);
то с каждым вызовом происходит разрастание размера метафайла, причем в геометрической прогрессии, так что на 10-12 вызов он разрастается до десятков мегабайт (исходный размер около 40К)!!!!
Что происходит? Как от этого избавиться??
Помогите!!!
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
17.12.2011, 20:27
Ответы с готовыми решениями:

Ошибка при EOleException при копировании данных из запроса
Здравствуйте. Мне необходимо получить список ФИО всех пользователей сети(пользователей около 3000). Для этого я делаю запрос к AD. Запрос...

Разрастание базы access2000
Подскажите в чем дело.. Перешли всем офисом с 97-го на 2000-й access, и после этого базы в 2000-м стали неимоверныеми темпами...

Рост и полет мыльного пузыря в клиентской области окна с использованием метафайлов
Привет, форумчане. Срочно нужна помощь по лабораторной на С ++ WinAPI на завтра. Сам сделать никак не могу. Вот задание: рост и полет...

2
0 / 0 / 0
Регистрация: 21.06.2011
Сообщений: 19
19.12.2011, 15:24
Убери последнюю строчку
Code
1
Metafile := MyMetafile;
0
0 / 0 / 0
Регистрация: 21.06.2011
Сообщений: 19
19.12.2011, 15:25
а сорри.... неверный ответ...
вроде код правильный
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
19.12.2011, 15:25
Помогаю со студенческими работами здесь

Исчезают (при копировании) и восстанавливаются (при удалении) файлы с микроСД на 32гб
Карта работает нормально с той информацией, что на ней уже есть, плеер (сони волкман) ее определяет, файлы воспроизводит. но не удалить ,...

FTP SERV-U Ошибка при копировании файла при медленном интернете
На машине на системе WIN7 стоит FTP сервер SERV-U. Другие машины используют для выхода в интернет 3G модемы, и подключаются к фтп для...

При запуске винчестера гул как у реактивного самолёта, также скрежет при копировании и перемещении файлов
Привет форумчане, братья по железу! Такой трабл с винчестером: При запуске винчестера гул как у реактивного самолёта, также скрежет при...

ProgressBar при копировании
Добрый вечер! Знаю, в гугле полно вопросов на эту тему, но так и не получилось собрать годное решение. Как сделать при копировании файла...

Интервалы при копировании
Добрый вечер! Помогите, пожалуйста, со следующей проблемой: при копировании текста из 2010 офиса в окно нового сообщения gmail'а между...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru