goto-befehl in delphi?

[Dax]

Zitat von Luckie:

Code:

if Belegnummer = 0 then
  exit
if Belegdatum = 0 then
  exit
if x = 0 then
  exit
if y = 0 then
  exit

Delphi-Quellcode:

if not ((Belegnummer = 0) or (Belegdatum = 0) or (x = 0) or (y = 0)) then
begin
  ...
end;