var vs. const

[u-boot]

Folgender Code funktioniert:

Code: Alles auswählen

procedure TTestTrackForm.Button1Click(Sender: TObject);
const C:integer= 17;
begin
  C:=45; 
  Showmessage(inttostr(C));
end;

Frage: Warum meckert da nix und es kompiliert und funktioniert sogar noch, wenn man dem Const eine Zahl zuweist?
Was ist bei einem Integer der Unterschied zwischen const und var in der Deklaration?

[carli]

Keiner mehr.

Const ist var, sobald du einen Datentyp angibst.
Const ist nur dann konstant, wenn du Sachen machst wie

Code: Alles auswählen

const c = 17;

[masc-online]

Hallo U-Boot,

mit const bezeichner: typ = wert werden in FreePascal keine typisierten Konstanten wie in Delphi deklariert, sondern vorinitialisierte Variablen. Works as designed - scheinbar aus Kompatibilitätsgründen zu Turbo Pascal. Dies läßt sich aber über das Compiler-Flag {$J-} ändern. Dann nörgelt FreePascal auch bei Deinem Code-Beispiel.

Gruß, Marian

[Socke]

Code: Alles auswählen

const
  MyConst: Longint = 34;
var
  MyVar: Longint = 45;

Keiner mehr.

Const ist var, sobald du einen Datentyp angibst.

Es gibt einen Unterschied in der Initialisierung. Typisierte Konstanten werden beim Programm-Startup initialisiert (d.h. bei sehr vielen Variablen verzögert braucht das Programm länger bis der programm-spezifische Code ausgeführt wird).
Initialisierte Variablen werden hingegen erst initialisiert, wenn sie verfügbar sind. Bei Globalen Variablen/Konstanten dürfte es daher keinen wirklichen unterschied geben. Lokale typisierte Konstanten werden im Gegensatz zu lokalen initialisierten Variablen auch beim Programm-Startup initialisiert; die Variablen erst, wenn die Funktion/Prozedur aufgerufen wird. (sieh im LangRef).