掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数の戻り値に配列を指定するには？ (ID：1626)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
みなさん、回答ありがとうございました。 以下のようにプログラムを変更してみましたが、 TMyArray = array[1..3] of String; のところで、":が必要ですが、=が見つかりました"というエラーになってしまいました。 そこで、"="の部分を":"に変えてみたら、今度は"識別子が必要ですが、ARRAYが見つかりました"というエラーになってしまいました。 お手数ですが、対処法が分かる方がいましたら、またご教授お願いします。 type TForm1 = class(TForm) TMyArray = array[1..3] of String; procedure FormShow(Sender: TObject); private { Private 宣言 } public { Public 宣言 } Function ArrayFunc() : TMyArray; end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.FormShow(Sender: TObject); var SArr : TMyArray; begin SArr := ArrayFunc(); end; Function ArrayFunc():TMyArray; var SArr : TMyArray; begin SArr[1] := 'Name'; SArr[2] := 'Address'; SArr[3] := 'Tel'; ArrayFunc := SArr; end.
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.