くだすれDelphi(超初心者)その27
■ このスレッドは過去ログ倉庫に格納されています
0318デフォルトの名無しさん
2005/10/05(水) 13:09:37どなたかご教授お願いします。
procedure TForm1.Button1Click(Sender: TObject);
var
hoge : array of double;
hogehoge : array of array of double;
begin
SetLength(hoge, 2);
hoge[0] := 1; hoge[1] := 2;
Label1.Caption := FloatToStr(Sum(hoge)); //3が出力されます。
{ //以下のままだとエラーが出て実行できません。
SetLength(hogehoge, 2, 2);
hogehoge[0,0] := 1; hogehoge[0,1] := 2;
hogehoge[1,0] := 3; hogehoge[1,1] := 4;
Label2.Caption := FloatToStr(Sum(hogehoe)); // 10がでてきてほしい
}
end;
■ このスレッドは過去ログ倉庫に格納されています