AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Eigenen Funktionsnamen ermitteln

Ein Thema von SubData · begonnen am 23. Mär 2005 · letzter Beitrag vom 23. Mär 2005
Antwort Antwort
Benutzerbild von SubData
SubData

Registriert seit: 14. Sep 2004
Ort: Stuhr
1.078 Beiträge
 
Delphi 11 Alexandria
 
#1

Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 14:30
Gibt es eine Möglichkeit in einer Funktion den eigenen Funktionsnamen zu ermitteln?

Mein Problem ist folgendes: Ich habe ein etwas größere Unit (An die 5000 Codezeilen) und ich will ermitteln wann wie oft eine Funktion aufgerufen wird und da ich absolut keine Lust hab jede Funktion umzustricken hab ich mich gefragt ob ich nich einfach in jede Funktion nen Einzeiler (nagut 2 gehen auch -g-) reinkopieren kann der ne neue Funktion aufruft und den eigenen Funktionsnamen übergibt und am Besten noch die Parameter, die an diese Funktion übergeben wurden.

Hat da irgendjemand ne Idee?
Ronny
/(bb|[^b]{2})/
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 14:38
Zitat von SubData:
[...] ob ich nich einfach in jede Funktion nen Einzeiler (nagut 2 gehen auch -g-) reinkopieren kann [...]
Du könntest du eine Variable immer um einen Wert erhöhen, oder ginge das nicht. Das wäre ein Einzeiler.
  Mit Zitat antworten Zitat
Benutzerbild von Airblader
Airblader

Registriert seit: 29. Okt 2004
Ort: Geislingen an der Steige
742 Beiträge
 
#3

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 14:49
Zitat von Matze:
Zitat von SubData:
[...] ob ich nich einfach in jede Funktion nen Einzeiler (nagut 2 gehen auch -g-) reinkopieren kann [...]
Du könntest du eine Variable immer um einen Wert erhöhen, oder ginge das nicht. Das wäre ein Einzeiler.
Und bei ein paar hudnert Funktionen braucht man dann ein paar hundert Variablen

edit:
oder ein array, aber dann müsste man auch immer den index ändern
Ingo Bürk
Es nimmt der Augenblick, was Jahre geben.

Johann Wolfgang von Goethe
  Mit Zitat antworten Zitat
Benutzerbild von SubData
SubData

Registriert seit: 14. Sep 2004
Ort: Stuhr
1.078 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 14:52
Naja dann weiß ich aber nicht welche Funktion aufgerufen wird :/
bzw. müsste ich dann ja jeden Einzeiler in jeder Funktion noch bearbeiten (Also anders schreiben, da er ja ne andere Variable erhöhen muss) .. Das ist dann schon wieder ein wenig viel arbeit -g-
Ronny
/(bb|[^b]{2})/
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.226 Beiträge
 
Delphi 12 Athens
 
#5

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 15:18
Zitat:
Gibt es eine Möglichkeit in einer Funktion den eigenen Funktionsnamen zu ermitteln?
Nein? (normaler Weise)

Das ist doch auch so, wie bei den Variablen ... innerhalb des compilierten Programms existieren diese Namen doch nicht mehr
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von SubData
SubData

Registriert seit: 14. Sep 2004
Ort: Stuhr
1.078 Beiträge
 
Delphi 11 Alexandria
 
#6

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 15:26
Hätte ja sein können, dass man genau das 'abfangen' kann bzw. die irgendwo gespeichert werden können...
Ronny
/(bb|[^b]{2})/
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.226 Beiträge
 
Delphi 12 Athens
 
#7

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 15:33
Du könntest dir ja die Position (die Pointer) der einzelnen Prozeduren/Funktionen zurückgeben lassen (allerdings können die sich ja, mit der Zeit verändern ... also wenn du irgendwas Quelltext... änderst.)

Oder du gibst halt jedesmal den Funktionsnamen als String mit, aber diesen mußt du dann wohl selber überall hinschreiben.
Na ja, du könntest dur ja auch ein Programm schreiben, welches dir eben erwähnte Arbeit abnimmt
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von SubData
SubData

Registriert seit: 14. Sep 2004
Ort: Stuhr
1.078 Beiträge
 
Delphi 11 Alexandria
 
#8

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 15:40
Nich so ganz das was ich eigentlich wollte
Mal schauen, werds dann wohl doch anders lösen müssen :>
Ronny
/(bb|[^b]{2})/
  Mit Zitat antworten Zitat
shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#9

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 15:52
Zitat von SubData:
Gibt es eine Möglichkeit in einer Funktion den eigenen Funktionsnamen zu ermitteln?

Mein Problem ist folgendes: Ich habe ein etwas größere Unit (An die 5000 Codezeilen) und ich will ermitteln wann wie oft eine Funktion aufgerufen wird
Das nennt man doch Profiling (ermitteln, wie oft Funktionen aufgerufen wurden und wie lange das dauert).
Da gäbe es z.B. ProDelphi:
http://codecentral.borland.com/codec...sting?id=18254
Andreas
  Mit Zitat antworten Zitat
Benutzerbild von SubData
SubData

Registriert seit: 14. Sep 2004
Ort: Stuhr
1.078 Beiträge
 
Delphi 11 Alexandria
 
#10

Re: Eigenen Funktionsnamen ermitteln

  Alt 23. Mär 2005, 16:15
Hey klingt gut das werd ich mir mal ansehen

Danke schön ^^
Ronny
/(bb|[^b]{2})/
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:27 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz