delphi怎么声明函数

delphi如何声明函数?
我想在delphi自定义一个没有参数的函数，该怎么写呢？如果不行，那声明一个过程不知道行不行？

[解决办法]
procedure MyProc()
begin
ShowMessage('Hello, Delphi.');
end;

[解决办法]
function aaa:integer
begin
 result:=1;
end;

procedure bbb
begin
 showmessage('OK');
end;