Procedure anhalten/stoppen

[St.Pauli]

Gibt es einen Befehl mit dem man allgemein Proceduren anhalten bzw. stoppen kann?

[Waldteufel]

Ja, den gibt es.

Delphi-Quellcode:

procedure NurDieHaelfte;
begin
  { ein bischen code }
  Exit;
  { noch ein bischen code }
end;

Jetzt wird nur der Teil ausgeführt, der vor dem "Exit;" steht. Der Teil danach wird übersprungen.

[Binärbaum]

Nur zur Ergänzung:
Es gibt auch noch einen ähnlichen Befehl für Schleifen:

Delphi-Quellcode:

var i: Integer;
...
for i:= 0 to 2000000000 do begin
  if i = 2 then Break;
end;
//hier geht's weiter
...

Break sorgt dafür, dass die Schleife abgebrochen wird und das Programm nach der Schleife fortgesetzt wird.

MfG
Binärbaum

[Luckie]

Zitat von Waldteufel:

Ja, den gibt es.

Delphi-Quellcode:

procedure NurDieHaelfte;
begin
  { ein bischen code }
  Exit;
  { noch ein bischen code }
end;

Jetzt wird nur der Teil ausgeführt, der vor dem "Exit;" steht. Der Teil danach wird übersprungen.

Und warumn sollte ich jetzt Code schreiben, der eh nie ausgeführt wird?

[Binärbaum]

Zitat von Luckie:

Und warum sollte ich jetzt Code schreiben, der eh nie ausgeführt wird?

Ich nehme mal an, dass das nur ein Beispiel war, um zu verdeutlichen, dass der nachfolgende Code nicht ausgeführt wird.
Und evtl. kann man das Exit ja noch an eine Bedingung knöpfen, damit der Code doch noch ausgeführt werden kann:

Delphi-Quellcode:

procedure NurDieHaelfte_OderAlles;
var abbruch: Boolean;
begin
  { ein bischen code }
  if abbruch then Exit;
  { noch ein bischen code, der sogar ausgeführt werden könnte }
end;

MfG
Binärbaum

[sECuRE]

Hi,

oder man spart sich mittels exit; das Auskommentieren von viel danach folgendem Code

cu

[Binärbaum]

Zitat von sECuRE:

Hi,

oder man spart sich mittels exit; das Auskommentieren von viel danach folgendem Code

cu

Auch ne Variante.
Aber das macht keinen Sinn. Wenn man weiß, dass Exit immer aufgerufen wird, kann man sich den nachfolgenden Code sparen. Exit macht IMHO nur Sinn, wenn es an eine Bedingung geknüpft ist.

MfG
Binärbaum

[SubData]

Zum Debuggen kann sowas aber ganz nützlich sein :>