Variable deklarieren

[SDL]

Ich möchte zum besseren verständnis für folgenden code die Variable Memory deklarieren.

Code: Alles auswählen

Procedure RAM() ; berechnet den RAM mit API
  ;WinAPI memory function....
     
  RAM_1=""
  GlobalMemoryStatus_(Memory.MEMORYSTATUS)
  RAM_1=Str(Memory\dwTotalPhys/1024/1024)+" MByte Ram"

EndProcedure

so ist das ergebnis zufriedenstellend und funktioniert auch.
ich hab bisher keine brauchbare lösung gefunden. Ich möchte nur die Variable deklarieren aber den code nicht veränder.

[ts-soft]

Code: Alles auswählen

Procedure.s RAM() ; gibt String zurück
  Protected Memory.MEMORYSTATUS ; lokale geschütze Variable vom Typ MEMORYSTATUS
  Protected RAM_1.s ; lokale geschützte Stringvariable
  
  GlobalMemoryStatus_(@Memory); Pointer zu Memory, welche als MEMORYSTATUS declariert wurde
  RAM_1 = Str(Memory\dwTotalPhys/1024/1024)+" MByte Ram"
  
  ProcedureReturn RAM_1
EndProcedure

Debug RAM()

Alle Variablen in der Prozedure lokal und geschützt deklariert. Wenn Deine
Frage nicht beantwortet ist, einfach nochmal nachfragen!

[Kiffi]

> Ich möchte nur die Variable deklarieren aber den code nicht veränder.

das wird wohl kaum funktionieren.

Grüße ... Kiffi

[smateja]

Global RAM <- einfach vor der Prozedur aufrufen ? somit wird der Code ja nicht verändert sondern quasi erweitert - wäre das ne Lösung G*

[Kiffi]

> wäre das ne Lösung G*

... aber eine schlechte Man sollte 'Global' nicht allzu inflationär verwenden.

Grüße ... Kiffi

[SDL]

Alle Variablen in der Prozedure lokal und geschützt deklariert. Wenn Deine
Frage nicht beantwortet ist, einfach nochmal nachfragen!

Danke, ist das was ich gesucht habe.