Visual Basicで、引数を省略できる関数を作る場合は
private function func( ByVal lngPrmA As Long, _
Optinal lngPrmB As long = 0 ) As long
Optinalを使いlngPrmBを省略した場合lngPrmBは0が使われます。
Delphiではこれと同じように引数を省略できるようにしたい関数を作る場合、デフォルトパラメータを使います。
使用例
function func(nPrmA : Integer; nPrmB: Integer = 0): Boolean;
begin
if ntPrmA > nPrmB then
begin
result:=True;
end
else
begin
result:=False;
end;
end;
C言語 C++ Delphi Visual Basic Windows サンプル Oracle 自作プログラム お勧め書籍 TOPページ