How to delete resource? - code don't working

[WojTec]

I have this:

Delphi-Quellcode:

var
  hResource: THandle;
  lpData: array [0..255] of Char;
  B: Boolean;
begin
  lpData := '';
  hResource := BeginUpdateResource(PChar(Edit1.Text), False);
  B := UpdateResource(hResource, 'RCDATA', 'DVCLAL', 0, @lpData[1], Length(lpData));
  EndUpdateResource(hResource, False);

  lpData := '';
  hResource := BeginUpdateResource(PChar(Edit1.Text), False);
  UpdateResource(hResource, 'RCDATA', 'PACKAGEINFO', MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), @lpData[1], Length(lpData));
  EndUpdateResource(hResource,False);
end;

File updated, but resource still inside I tried also with RT_RCDATA, but don't working too