Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 13.09.2014, 17:49   #1
xexxex
Пользователь
 
Регистрация: 31.07.2010
Сообщений: 52
По умолчанию Delphi 7 подменить System.Move

Надумал вот при старте проги хукнуть\подменить медленную System.Move на быструю AcedBinary.G_MoveMem.
Подскажите, как это сделать?
xexxex вне форума
Старый 13.09.2014, 18:55   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А зачем? Используй в коде то что хочешь. Подменять зачем?
I'm learning to live...
Stilet вне форума
Старый 13.09.2014, 19:07   #3
xexxex
Пользователь
 
Регистрация: 31.07.2010
Сообщений: 52
По умолчанию

Ну, как бы, фундаментальная процедура, чтобы всё VCL в проге использовало более быстрый подмененный вариант, а не только в своём коде ручной вариант G_MoveMem.

А ещё глянул тут исходники жизненно важного TMemoryStream - а он тоже оказывается у себя использует Move - и это для меня стало последней каплей - решил подменить глобально, но не знаю как...
xexxex вне форума
Старый 13.09.2014, 19:48   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
и это для меня стало последней каплей
А можно глянуть на исходник этой волшебной AcedBinary.G_MoveMem.?
Ну так. Из любопытства. А то ты интригуешь а не даешь
I'm learning to live...
Stilet вне форума
Старый 13.09.2014, 20:27   #5
xexxex
Пользователь
 
Регистрация: 31.07.2010
Сообщений: 52
По умолчанию

Да, вот, зацени. Процедура большая и не влезла в пост, прилагаю весь модуль AcedBinary.
Сразу говорю, что были проведены местные испытания, и эта процедура сделала\одолела System.Move...
Вложения
Тип файла: rar AcedBinary.rar (16.0 Кб, 15 просмотров)
xexxex вне форума
Старый 13.09.2014, 23:03   #6
Vapaamies
Просветитель
Участник клуба
 
Аватар для Vapaamies
 
Регистрация: 26.12.2012
Сообщений: 1,844
По умолчанию

Посмотри, как сделано в FastCode.
В разработке: воспроизводственный контур ИТ
Vapaamies вне форума
Старый 13.09.2014, 23:11   #7
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
были проведены местные испытания, и эта процедура сделала\одолела System.Move...
Провел испытания у себя. Что-то не впечатлило. Пожалуй я бы придерживался стандартной библиотеки.
I'm learning to live...
Stilet вне форума
Старый 14.09.2014, 14:07   #8
xexxex
Пользователь
 
Регистрация: 31.07.2010
Сообщений: 52
По умолчанию

Цитата:
Сообщение от Vapaamies Посмотреть сообщение
Посмотри, как сделано в FastCode.
Ага, спасибо за наводку. Скачал\глянул FastCode - там наткнулся на упоминание на некий FastMove - буду смотреть\пробовать.

Всем спасибо, вопрос закрыт.

Чуть ранее,(от незнания, как хукнуть самому) попробовал хукнуть Move через MadCodeHook - сделал замеры и результаты оказались хуже. Видать сложные внутренние механизмы в dll замедляют работу.
xexxex вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подменить адрес возврата GreenWizard Общие вопросы Delphi 4 16.06.2012 20:40
Ошибка Ambiguity between '_fastcall System::operator +(int,const System::Variant &)' and '_fastcall System::opera Jawner C++ Builder 1 12.04.2012 09:58
Как подменить иконку в exe UROBORAS Помощь студентам 2 14.07.2011 22:21
Подменить boundary в IdHTTP AquaKlaster Работа с сетью в Delphi 2 18.02.2010 12:25
подменить соурс в iframe fercmann JavaScript, Ajax 4 20.08.2008 01:06