フォーム無しのユニットで、private宣言をして、他のユニットから見れなくしたいのですが、implementationの前で
private
function GetNm : String;
とprivate関数を定義したら、'不正なコンパイラ命令private'というエラーが出てしまいました。
フォームが無いと、private宣言はできないのでしょうか?
何か良い方法がありましたら、教えてください。
implementationの後に定義してやればプライベートな関数にできます。
編集 削除function GetNm : String;
をimplementationの後に定義することと、
implementationの前に関数を「定義しない」ければ良いかと思います。
↓こんな感じ。
...
function GetNm : String; <-ここに宣言したらダメ。
implementation
{$R hoge.res}
function GetNm : String;
begin
hogehoge();
end;
...
なるほど、ありがとうございました。
編集 削除