テキストボックスに数字を入れて、ボタンをクリックすると、signが発動して正か負か判断してラベルに表示する、というつもりで書いたんだけど

procedure TForm1.Button1Click(Sender: TObject);
begin
label1.Caption := sign(val(edit1.Text));
end;

end.

[エラー] Unit1.pas(30): 未定義の識別子 : 'sign'
[エラー] Unit1.pas(30): 実パラメータが足りません
[致命的エラー] Project1.dpr(5): 'Unit1.pas' ユニットはコンパイルできませんでした

となります。