C++-Anweisung in Delphi umschreiben

[Quebbeck]

Hallo,
kann mir wer sagen, wie die folgende C++-Anweisung in Delphi lauten würde?

Code:

th = (ax+ay == 0) ? 0 : (double) dy/(ax+ay);

[Apollonius]

In Delphi gibt es den hier verwendeten ternären Operator nicht.

Delphi-Quellcode:

if ax + ay = 0 then
  th := 0
else
  th := dy / (ax + ay)

[DeddyH]

Delphi-Quellcode:

if (ax+ay) = 0  then
  th := 0
else
  th := dy/(ax+ay);

[edit] Zu langsam :? [/edit]

[Quebbeck]

Danke für die schnelle Antwort!
(War ständig am herumrätseln :-D )