这个程序怎么错了？

Question

下面的程序代码相信大家都能看的明白！
可是有错误，不知道怎么解决，所以向大家请教！
希望大家能帮帮，谢谢大家！代码：unit Unit1;interface
{$R face.res}
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormMouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    procedure FormMouseUp(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
screen.Cursors[1] := LoadCursor(hInstance , PChar('faceleft')) ;
screen.Cursors[2] := LoadCursor(hInstance , PChar('faceright')) ;
screen.Cursors[3] := LoadCursor(hInstance , PChar('plainface')) ;
screen.Cursors[4] := LoadCursor(hInstance , PChar('leftshrink')) ;
screen.Cursors[5] := LoadCursor(hInstance , PChar('rightshrink')) ;
screen.Cursor := 3 ;end;procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if Button = MbLeft then
     begin
        screen.cursor := 4 ;
     end ;
  if Button = MbRight then
     begin
        screen.Cursor := 5 ;
     end ;
end;procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  screen.cursor := 3 ;
end;end.
//错误提示：File not found 'face.res'

Answer 1

你都知道了错误提示。。CSDN论坛浏览器:浏览、发帖、回复、结贴自动平均给分,下载地址:http://CoolSlob.ys168.com

Answer 2

但是我已经用了这个编译命令{$R face.res}还是出现错误，为什么呢？
希望大家帮帮忙呀？谢谢

Answer 3

face.res这个资源放哪儿了?------------------------------啥叫签名?

Answer 4

是不是要放在Delphi安装目录呀？
请指示？