Делаю прогу по работе с реестром с апишными функциями.
И пытаюсь просмотреть параметры ключа.

procedure TForm1.Button1Click(Sender: TObject);
var Rkey:pchar;
mykey:hkey;
err, index: longint;
Buffer: array[0..1000] of char;
begin
RegEnumValue(HKEY_LOCAL_MACHINE,0,Buffer,0,NULL,NULL,NULL,NULL);
RKey:=PChar(Edit1.Text);
memo1.Lines.Clear;
if Combobox1.Text=('HKEY_LOCAL_MACHINE') then begin
Err:=RegEnumValue(HKEY_LOCAL_MACHINE,RKey,MyKey); end;
end;


А эта зараза выдаёт ошибку на 5-м и 8-м параметрих функции.(первый и последний параметры NULL).
Где там чего не правильно