Problem with putting table into procedure

[Mighty]

I have smth like that:

Code: [Select]

var
   ArrayInt: array[0..50] of integer;

Procedure HelpMe(Source: array[0..50] of integer);
begin
   WriteLn('This line doesnt work');
(...)
end;

function OnPlayerCommand(ID: Byte; Text: string): boolean;
begin
(...)
   WriteLn('This line works');
   HelpMe(ArrayInt);
   WriteLn('This line doesnt work');
(...)
end;


No compilation mistakes, but when i use the command:

• [Error] ScriptName -> (OnPlayerCommand): Type Mismatch

My question is: how can i use table in procedure?
I tried with Source: TStringArray & ArrayStr: TStringArray and then converting ArrayStr to ArrayInt, but then i was getting Out Of Range error

[mich1103]

First wath you want to do ?

[Mighty]

My question is: how can i use table in procedure?

Anyways it doesn't really matter what i want to do specificly, i just want to use procedure using table. and i have no idea how. tried all ideas.

I've written in code which line works and which doesnt.

[squiddy]

Code: (pascal) [Select]

Var
 MyArray: Array[0..50] of Integer;

Procedure HelpMe(Source: Array of Integer); //You cant determine the length of the array inside the parameters. :)
 Begin
  WriteLn('Yo dawg, this s.. is working!');
 WriteLn('Length of your array: '+IntToStr(GetArrayLength(Source)));
end;

Function OnPlayerCommand(ID: Byte; Text: String): Boolean;
 Begin
 if LowerCase(Text) = '/hey' Then HelpMe(MyArray);
end;

//Doing /hey would output this:

//"Yo dawg, this s.. is working!
//Length of your array: 51"

//~~~~~~~~

//I don't know if that is what you seek, I just fixed the problems with it. :)


[Mighty]

Very big -THANKS-, that's exactly what i needed

[squiddy]

You are welcome.