掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数で得た動的配列を戻り値にするには? (ID:699)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
初めまして、昔vbで作ったものdelphiでを再び作り出したのですが、delphi 難しいですね 質問なのですが、あるフォルダ内に入ってるファイル名を全て配列で取得 して、そのファイル名が全て入ってる配列を戻したいのですがやり方がよく分 かりません 見にくくなるのですが var strOldName:array of string; intValFile:integer; begin intValFIle:=0; if 0=FindFirst(strFolderPath+'*.*', faAnyFile, SearchRec) then begin repeat if (SearchRec.Attr and faDirectory = 0) and (SearchRec.Attr and faHidden = 0) then begin SetLength(strOldName,intValFile+1); strOldName[intValFile]:=SearchRec.Name; intValFile:=intValFile+1; end; until 0<>FindNext(SearchRec); FindClose(SearchRec); end; Result:=strOldName; ←ここでエラーが出ます end; また呼び出し元の宣言は var strOldName:array of string; strFolderPath:string;//対象フォルダパス begin strOldName:=MaeShori(strFolderPath);//上の関数呼び出し end; みたいな感じでstrOldNameは動的配列宣言してるのですが、配列数がこの時点 では分からないため決めれません このままでいいのでしょうか? 長文で申し訳ないのですが、お願いします
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.