webrodex 0 Denunciar post Postado Fevereiro 12, 2006 E assim quando o usuario abre o form tipo ele digita o nick e cadastra isso eu consegui fazer so nao conseguir fazer para poder listar tipo precisaria que listava assim no combo-box todas pastas que comtem no chat exemplo > a pessoa digita o nickname exemplo : nick1 ai cadastraria assim [HKEY_CURRENT_USER\Software\chat\nick1] e assim vai ai tudo bem mas eu preciso que lista todos automaticamente igual aki ficaria assim no comboQuero que o resultado apareça assim !nickname > nick1 > nick2// Essa e minha funnão dos registro ums exemplos //[HKEY_CURRENT_USER\Software\chat] // tabela principal //[HKEY_CURRENT_USER\Software\chat\nick1] // nickname 1 cadastrado //"nickname"="nick1""senha"="senha1"[HKEY_CURRENT_USER\Software\chat\nick2] // nickname 2 cadastrado //"nickname"="nick2""senha"="senha2" Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Fevereiro 14, 2006 Uma das forma que você pode fazer é a seguinte: var x: integer; reg: TRegistry; lista: TStringList;beginComboBox1.Clear;lista:=TStringList.Create;reg:=TRegistry.Create;reg.RootKey:=HKEY_CURRENT_USER;reg.OpenKey('Software\chat', False);reg.GetKeyNames(lista);reg.CloseKey;reg.Free;for x:=1 to lista.Count do begin reg:=TRegistry.Create; reg.RootKey:=HKEY_CURRENT_USER; if reg.OpenKeyReadOnly('Software\chat\nick' + IntToStr(x)) then ComboBox1.Items.Add(reg.ReadString('nickname')); reg.CloseKey; reg.Free; end;lista.Free; Compartilhar este post Link para o post Compartilhar em outros sites