Thema: Delphi 3D Dynamic Array

Einzelnen Beitrag anzeigen

nanix
(Gast)

n/a Beiträge
 
#8

Re: 3D Dynamic Array

  Alt 11. Jan 2010, 10:03
Yea look at this

Delphi-Quellcode:
unit Unit6;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
 const
   Days : array[0..6] of string =
   (
     'Win32_Processor',
     'Win32_OperatingSystem',
     'Win32_SystemSetting',
     'Win32_PerfRawData_PerfOS_Memory',
     'Win32_PerfRawData_PerfOS_Processor',
     'Win32_PerfRawData_PerfOS_System',
     'Win32_PerfRawData_PerfProc_Process'
   ) ;
type
  TForm6 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form6: TForm6;
  multiarray:array of array of array of string;
implementation

{$R *.dfm}

procedure TForm6.FormCreate(Sender: TObject);
var
i,j:integer;
begin
Setlength(multiarray,length(days),1,1);

  for j:=0 to 6 do //start to finish

multiarray[j,0,0]:=days[j];
end;

end.

I want to have first dimention const array days which i successfully loaded.
But how do i set first middle and last seperatly.

I want to have diffrent array contents per dimension.

Whats so hard to understand here?
  Mit Zitat antworten Zitat