From VB.NET to Delphi7 convert.

[Piterek]

Hello. I have a question, did someone can convert from VB.NET source
code to Delphi7 code?

Dim n, x As Double
Dim tab() As Double = {-3, 0.5, -0.05}
-------------------------------------------------
Sub licz()
Dim i As Integer
x = 0
For i = 0 To 2
x = x * n + tab(2 - i)
Next
End Sub
--------------------------------------------------

I really don't understand how convert
[code:1:7020b1dc b8]
Dim tab() As Double = {-3, 0.5, -0.05}
[/code:1:7020b1dc b8]
to Delphi7 :(
Please, help me!
Posted at: http://www.groupsrv.co m

Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com

[Ken Tucker [MVP]]

Hi,

Take a look at babbelfisken.
http://web.telia.com/~u31115556/desc/programs.htm

Ken
---------------------------
"Piterek" <pi*****@o2-dot-pl.no-spam.invalid> wrote in message
news:42******** **@127.0.0.1...
Hello. I have a question, did someone can convert from VB.NET source
code to Delphi7 code?

Dim n, x As Double
Dim tab() As Double = {-3, 0.5, -0.05}
-------------------------------------------------
Sub licz()
Dim i As Integer
x = 0
For i = 0 To 2
x = x * n + tab(2 - i)
Next
End Sub
--------------------------------------------------

I really don't understand how convert
[code:1:7020b1dc b8]
Dim tab() As Double = {-3, 0.5, -0.05}
[/code:1:7020b1dc b8]
to Delphi7 :(
Please, help me!
Posted at: http://www.groupsrv.co m

Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com

[Doug Taylor]

On 25 Mar 2005 15:36:14 -0600, pi*****@o2-dot-pl.no-spam.invalid
(Piterek) wrote:

Hello. I have a question, did someone can convert from VB.NET source
code to Delphi7 code?

Dim n, x As Double
Dim tab() As Double = {-3, 0.5, -0.05}
VAR
n,x : Integer;
tab : array of Integer = (-3,0.5,-0.05);

Procedure licz;

Var
I : Integer;
Begin
X := 0;
for i := 0 to 2 do
x::= x * n + tab[2-i];
End;

It is years since I programmed in Pascal, so the filling of the array
may be wrong and also the use of Global variables is frowned in the
Pascal world;

Doug Taylor
-------------------------------------------------
Sub licz()
Dim i As Integer
x = 0
For i = 0 To 2
x = x * n + tab(2 - i)
Next
End Sub
--------------------------------------------------

I really don't understand how convert
[code:1:7020b1dc b8]
Dim tab() As Double = {-3, 0.5, -0.05}
[/code:1:7020b1dc b8]
to Delphi7 :(
Please, help me!
Posted at: http://www.groupsrv.co m

Posted Via Usenet.com Premium Usenet Newsgroup Services
----------------------------------------------------------
** SPEED ** RETENTION ** COMPLETION ** ANONYMITY **
----------------------------------------------------------
http://www.usenet.com