Delphi - Sprawdzanie danych

0

Witam mam bardzo duży problem z którym nie moge se poradzić....

Jak sprawdzić czy istniejeją jakieś dane w wartości jak istanieją to zrob coś else tez cos zrób...

chodzi mi o coś takiego: (to wlasnie nie działa tutaj: if Reg.ValueExists('', '131473') then):

Reg:=Tregistry.Create;
Reg.RootKey:=HKEY_CLASSES_ROOT;
Reg.OpenKey('CLSID{D27CDB6E-AE6D-11cf-96B8-444553540000}\MiscStatus\1', true);
if Reg.ValueExists('', '131473') then
CheckBox12.Checked:=false
else
CheckBox12.Checked:=true;

  1. Ma sprawdzić wartość '' (to akurat jest wartośc domyślna)
  2. Ma sprawdzić dane w Wartości Domyślnej - czyli jeśli to: '131473' istnieje to zrob to else tamto...

bardzo proszę o pomoc... z góry dziękuje...

Mile widziane sa również maile: adsoft(at)gazeta(dot)pl

0
  Reg:=Tregistry.Create;
  Reg.RootKey:=HKEY_CLASSES_ROOT;
  Reg.OpenKey('CLSID\{D27CDB6E-AE6D-11cf-96B8-444553540000}\MiscStatus\1', true);
  if Reg.ValueExists('nazwa wartości') and (Reg.ReadString('nazwa wartości')=='131473') then
    CheckBox12.Checked:=false
  else
    CheckBox12.Checked:=true;

o coś takiego chodzi ?

0

do końca oto nie chodziło ale przerobiłem to co mogłem i już mam wszystko :)

1 użytkowników online, w tym zalogowanych: 0, gości: 1