ќтладка серверных Web-приложений


 онтроль настройки реестра NT при отладке Web-приложений под управлением IIS 4.0


var Reg: TRegistry; begin try Reg:=TRegistry.Create; Reg.RootKey:=HKEY_CLASSES_ROOT; Label1.Caption := СLocalServer32Т; if Reg.OpenKey(С\CLSID\{A9E69610-B80D- 11d0-B9B9-00A0C922E750}Т,False) then begin if not Reg.OpenKey(С\CLSID\{A9E69610- B80D-11d0-B9B9-00A0C922E750}Т+ С\Т + СLocalServer32Т,False) then Edit1.Text := СТ else Edit1.Text := Reg.ReadString(СТ); end; Reg.CloseKey; finally Reg.Free; end; //try Reg:=TRegistry.Create;




Ќачало  Ќазад  



 нижный магазин