StartprogrammingusingObjectPascal:Procedures
Jump to navigation
Jump to search
프로시저
이전 장에서 Writeln, Readln, Reset 등과 같은 프로시저를 이미 사용했지만, 이번에는 우리 프로그램에서 사용할 프로시저를 작성하려고 합니다.
다음 예제에서는 SayHello와 SayGoodbye 두 개의 프로시저를 작성했습니다.
Program Structured;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };
procedure SayHello;
begin
Writeln('Hello there');
end;
procedure SayGoodbye;
begin
Writeln('Good bye');
end;
begin // Here main application starts
Writeln('This is the main application started');
SayHello;
Writeln('This is structured application');
SayGoodbye;
Write('Press enter key to close');
Readln;
end.
작은 프로그램과 같은 begin .. end를 지닌 프로시저와 메인 프로그램 코드에서 이것을 호출하는 것을 보았습니다.