Static Ersatz in Delphi [Archiv] - ProgForum.com - Das Elektronik Diskussionsforum

Archiv verlassen und diese Seite im Standarddesign anzeigen : Static Ersatz in Delphi

Import-Script

02.09.2002, 17:50

Hi Ich habe eine Zählaufgabe in Delphi, die geradezu beispielhaft für eine lokale "static" Variable in C++ ist. Static gibt es in Delphi nicht, aber eine globale Variable möchte ich vermeiden wenn's geht. Geht das irgendwie? Und falls es wirklich was ähnliches wie static gibt, wie kann ich die Variable dann initialisieren? Danke

Import-Script

14.09.2002, 06:04

Ich wüsste nicht was an static (C) so besonders ist dass man es nicht anders lösen kann? Beschreib mal bitte genauer was du machen willst...

Import-Script

14.09.2002, 12:14

Anders lösen kann ich das schon, nur finde ich das nicht so elegant. Also, ich hab ein ziemlich großes Programm, in dem ich wegen der Übersichtlichkeit gern möglichst keine globalen Variablen haben will. Zumindest keine, die eigentlich nur von lokaler Bedeutung sind, also solche wie die, die ich meine. In meiner Funktion soll gezählt werden, wie oft die Funktion aufgerufen wurde. Verwendet wird dieser Wert nur innerhalb der Funktion. In Delphi muß ich dafür eine globale Variable anlegen, sonst ist der Wert beim Verlassen der Funktion ja wieder weg. Die Deklaration dieser Geschichte kann man in C halt lokal schön mit "static int x=0;" lösen, dann steht der Zähler nicht in den globalen Variablen, wo keiner mehr weiß was das soll. Dachte nur da gibt's vielleicht was.

Import-Script

15.09.2002, 19:36

Hm, da währe static wohl doch ganz angebracht... Zum Thema Übersichtlichkeit: Ich hab in meinen größeren Programmen (in Delphi) immer eine Klasse namens "GlobalVar" welche mir wieder viel Überblick verschafft weil sie alle Variablen in sich aufnimmt. Bei deinem Problem fällt mir aber auch nichts ein, das ist schon etwas schwieriger. Das einzigste was mir dazu in den Sinn kommt ist nen bisschen triky, aber dennoch legitim! Jede Komponente in Delphi besitzt eine Eigenschaft namens "Tag" welche von der Componente selber nicht gebraucht oder ausgelesen wird. Dass heisst, wenn du noch nen paar Komponenten mit freier "Tag"-Eigenschaft übrig hasst kannst du eines dieser Integer-Felder pro Funktionsdurchlauf um 1 erhöhen... Vielleicht ja nen Denkanstoss.

Import-Script

16.09.2002, 13:58

Die Sache mit dem GlobalVar gefällt mir gut. Dann hab ich halt ein globales Objekt, aber das ist och tragar. Danke für den Anstoß! ;-)

Import-Script

12.12.2002, 17:36

für einfache Funktionen in Delphi kann man ganz einfach typisierte Konstanten benutzen: function foo(bar: integer): integer; const staticInt: integer = 0; var dynamicInt: integer; begin // Funktionsrumpf end; das funktioniert genauso als wenn in C/C++ die Variable staticInt als static deklariert worden wäre. Einziger Fallstrick: Delphi hat die Compileroption {$WRITEABLECONST ON} bzw. {$J+} -- DIE muß natürlich gesetzt werden, sonst meckert der Compiler bei einem Schreibversuch auf die typisierte Konstante. Solche Konstrukte eignen sich auch wunderbar, um einen lokalen Semaphor für Funktionen, die nur 1x zur Zeit aufgerufen werden dürfen, oder Funktionen, die bei einem zweiten Aufruf, der stattfindet, während eine erste Instanz noch läuft, abgebrochen werden sollen, zu realisieren. Für andere Zwecke ist natürlich das Konstrukt 'GlobalVars' sehr elegant, nur geht damit der Bezug zwischen der Funktion und der Variablen etwas verloren.