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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Нужен анализатор вызовов функций в Delphi 
:(
    Опции темы
Delphist
  Дата 11.8.2008, 15:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

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



Скажите, пожалуйста, если какая-нить фича, такого плана:
возьмем для порстоты такой проект:
Код

unit Unit1;
...

function CalcTime: integer;
begin

  //расчетный код
end;

procedure TForm1.SameFunc(a: integer);
begin

  //какой-нить код
  CalcTime;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin

  SameFunc(1);
end;

procedure TForm1.SetupForm;
begin

  InitControl;
end;

procedure TForm1.PrepareToShow;;
begin

  //что-нить делаем
end;

procedure TForm1.FormCreate(Sender: TObject);
begin

  SetupForm;
  PrepareToShow;
end;
end.


смысл такой, чтобы это фишка могла проанализировать (скажем к примеру построить дерево) последоватеьность вызовов функций (процедур) моего класса (в данном случае TForm) и оценить время работы каждой процедуры,
т.е. при загрузке формы происходит следующий вызов:

FormCreate
|
|__SetupFrom (0.241 сек)
|``|
|``|__InitControl(0.14 сек)
|
|__PrepareToShow(0.1 сек)

при нажатии Button1, происходит след. вызывов:
Button1Click (0.052 сек)
|
|__SameFunc (0.0519 сек)
|``|
|``|__CalcTime(0.0519 сек) 



--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
aleksh
Дата 11.8.2008, 15:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



извеняюсь, а зачем? какая разница 0,0015 или 0,0017?
если для проверки в работоспособности, так можно в коде добавить свою замерку, да будет притормаживать, но не на много
PM MAIL   Вверх
Delphist
  Дата 11.8.2008, 15:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

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



Цитата(aleksh @  11.8.2008,  16:52 Найти цитируемый пост)
извеняюсь, а зачем? какая разница 0,0015 или 0,0017?
если для проверки в работоспособности, так можно в коде добавить свою замерку, да будет притормаживать, но не на много 

Понимаешь когда проект из 2-3 функции то поставить замерку, а когда функци больше 300 затрах..ся ставить, плюс удобства анализа последовательности вызовов, стек представляет линейный список, а хотелось иерархичное представление. Вообщем для быстроты оптимизации своего кода, а также его анализа.


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

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

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

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

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


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

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


 




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


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

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