Delphi 함수 중첩 정의 및 호출

187 단어 delphi
procedure TForm1.btn1Click(Sender: TObject);
var
   str:string;
procedure test();
begin
  ShowMessage(str);
end;
begin
  str:='hello world';
  test();
end;

좋은 웹페이지 즐겨찾기