Migrar desde VB6 a Delphi

[compuin]

La funcion en VB6 pinta asi


Public Function LBR_For_Venus(At_JDE)
' LEVEL 0

Dim L As Double
Dim B As Double
Dim R As Double
Dim T As Double

' Compute T as Julian millennia since J2000.0
T = (At_JDE - 2451545#) / 365250

' Compute heliocentric, ecliptical Longitude L in radians
L = Venus_L01(T) + Venus_L11(T) + Venus_L21(T) + Venus_L31(T) _
+ Venus_L41(T) + Venus_L51(T)

B = Venus_B01(T) + Venus_B11(T) + Venus_B21(T) + Venus_B31(T) _
+ Venus_B41(T) + Venus_B51(T)

R = Venus_R01(T) + Venus_R11(T) + Venus_R21(T) + Venus_R31(T) _
+ Venus_R41(T) + Venus_R51(T)

' Convert longitude and latitude from radians into degrees.
L = L * 45 / Atn(1)
If Abs(L) >= 360 Then L = L - 360 * Int(L / 360)
If L < 0 Then L = L + 360

B = B * 45 / Atn(1)

' Return the L,B,R values in a data vector string
LBR_For_Venus = L & "|" & B & "|" & R

End Function

Esto es lo que estoy tranado de migrar a Delphi