Mczy ktos moze mi powiedziec dlaczego taki kod(znalazlem go gdzies na forum):
var
wartosci: array[1..4] of byte;
reg:TRegistry;
begin
wartosci[1]:=$01;
wartosci[2]:=$00;
wartosci[3]:=$00;
wartosci[4]:=$00;
reg:=TRegistry.Create;
reg.OpenKey('Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System', True);
reg.WriteBinaryData('nodispcpl', wartosci, 4);
reg.CloseKey;
reg.Free;
end;
dziala, a gdy chce utworzyc tablice dynamicznie
var
wartosci: array of byte;
reg:TRegistry;
begin
setlength(wartosci, 4);
wartosci[0]:=$01;
wartosci[1]:=$00;
wartosci[2]:=$00;
wartosci[3]:=$00;
reg:=TRegistry.Create;
reg.OpenKey('Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System', True);
reg.WriteBinaryData('nodispcpl', wartosci, 4);
reg.CloseKey;
reg.Free;
end;
zapisuje do rejestru jakies totalne piedroly i chyba losowo wybrane liczby?
Gdzies widzialem ze mozna zapisac to za pomoca writeInteger ale nie wiem jak;
ten temat wqrwia mnie maxymalnie bo praktycznie na zadnym forum nie jest wyjasnione do konca jak to zrobic...