Procedure vs Function, Vor- und Nachteile

[Neutral General]

Zitat von p80286:

@Zacherl
Was mir in der Betrachtung fehlt, ist die Schreibschutzprüfung die ja bei const irgendwo stattfinden muß.

Der Schreibschutz wird nur zur Compilezeit gecheckt. Mit ein bisschen Pointergematsche kannst du const umgehen.

Delphi-Quellcode:

procedure TuWas(const X: Integer);
begin
//  X := 987;   <-- Geht nicht
  PInteger(@X)^ := 987;
  ShowMessage(IntToStr(X));
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  TuWas(123);
end;