I need to define a multidimensional array while working with TMS Scripter using Delphi. However, I'm having a bit of difficulty with this. Could you please explain how to define and use a multidimensional array?
Hello @Sezgin_Ozhan, thank you for the project. Here is the script you should use:
var
// iki boyutlu dizi tanımlaması
ikib_dizi;
i,j : Integer;
begin
ikib_dizi := VarArrayCreate([0, 2, 0, 2], 12);
for i := 0 to 2 do
begin
for j := 0 to 2 do
begin
ikib_dizi[i, j] := i * 10 + j;
end;
end;
// Diziyi yazdırma
for i := 0 to 2 do
begin
for j := 0 to 2 do
begin
ShowMessage(IntToStr(ikib_dizi[i,j]));
end;
end;
end;