![]() |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Zitat:
|
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Zitat:
Einfach im Callstack den passenden Methodennamen rausholen und als Text ausgeben. Dann könnte man mit einer einfachen Methode das komplett erschlagen
Delphi-Quellcode:
Verwendung:
procedure StartMeasure: IAutoDestroy;
begin result := TMeasure.MeasureThis(_STACK...._); end;
Delphi-Quellcode:
procedure TForm.ButtonClick(...)
begin StartMeasure; Writeln('Muuh'); Sleep(1000); end; |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Okay das klingt schonmal nicht schlecht...
Interface + JEDI klasse ergibt immerhin einen einzeiler der dynamisch klassen+methodenname ausliest... jetzt nur noch an einer stelle implementieren + einen schalter einbauen ob das tracing stattfinden soll. Aber diese stelle gibt es wohl nicht oder? es gibt ja nichts was die methodenaufrufe sozusagen verarbeitet und man noch einfluss darauf nehmen kann... |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
{$ifdef debug} ... {$endif}
?? |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
oder ein boolean als class var in TMeasure - wenn der false ist, einfach im Log nichts schreiben.
edit: @bernhard geyer das mit der jcl muß ich mir nochmal anschauen, haben wir sowieso im projekt :) Danke ^^ |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Darf man mal fragen wozu du das brauchst?
|
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Zitat:
Bei 'ner Multithreadanwendung, mit "ausreichend" (tausenden/millionen) Funktionen, da möchte ich dan die "kleinen" Logdateien sehn und vorallem den, welcher damit dann auch wirklich noch was anfangen kann (den, der in dieser Masse dann noch das Wichtige findet). |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Zitat:
|
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Zitat:
![]() |
AW: Start und Stop jeder Methode Tracen an nur einer stelle Implementieren
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:26 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz