Показать сообщение отдельно
Старый 26.12.2006, 11:42   #7  
NeNavision_imported is offline
NeNavision_imported
Участник
Аватар для NeNavision_imported
 
241 / 10 (1) +
Регистрация: 12.08.2005
Можно кодом посмотреть и список загруженных объектов и сам код объектов и код который выполнялся, а который нет. Это делается с помощью таблички Code Coverage №=2000000049.

Например этот код выводит собственный исходный код. (откуда был запущен, какой триггер)(сообщениями)
Код:
CodeCoverage.RESET;
CodeCoverage.DELETEALL;
IF CODECOVERAGELOG(TRUE) THEN BEGIN
  CodeCoverage.RESET;
  IF CodeCoverage.FIND('-') THEN
	REPEAT
	  MESSAGE(CodeCoverage.Line);
	UNTIL CodeCoverage.NEXT = 0;
  CODECOVERAGELOG(FALSE);
END;
P.s. на этой основе можно что-нибудь хитрое замутить, типа защиты от изменения кода и т.д.
__________________
Должен остаться только один.