关于资源函数的问题

Question

function WriteSettings(Filename: PChar; Settings: PChar; Size:word): Boolean;
var
  hResource: THandle;
begin
  Result := False;
  hResource := BeginUpdateResource(Filename, False);
  if hResource <> 0 then
  begin
    if UpdateResource(hResource, RT_RCDATA, pchar('HACKER'), 0, Settings, Size) then
      Result := True;
    EndUpdateResource(hResource, False);  //Hay que cerrar el recurso de todos modos
  end;
end;其中UpdateResource中的pchar('hacker')是什么意思。
这是一个生成器的函数

Answer 1

應該是寫入類似的配置信息
如：
.......
var 
   mainserver:string;
    mainserver:=ExtractFilePath(ParamStr(0))+'server.exe';//服务端程序
　　if WriteSettings(pchar(mainserver), ConfigToSave) = True then //写入
    MemoOutput.Lines.Append('服务端配置信息写入')
    else
    begin
      MessageBeep($FFFFFFFF);
      MemoOutput.Lines.Append('>无法生成服务端');
    end;
.....

Answer 2

是资源的名字，想FindResource 函数一样
HRSRC FindResource(          HMODULE hModule,
    LPCTSTR lpName,
    LPCTSTR lpType
);

Answer 3

UpdateResource中的pchar('hacker')，
‘hacker’是一个字符串，用pchar进行类型的强制转换，以调用函数。