Res: [delphi-br] TVirtualTreeView
Blz... Seguinte... não sei se vai lhe ajudar... mas que seja um começo procedure PopulaTreeView; var i, x: Integer; lForm, lComp: TTreeNode; begin TreeView.Items.Clear; for I := 0 to 10 do begin lForm := TreeView.Items.AddChild(nil, 'Formulario ' + IntToStr(i)); for x := 0 to 4 do begin lComp := TreeView.Items.AddChild(lForm, 'Componente ' + IntToStr(i)); end; end; end; Abraços... e qualquer duvidas... estamos ai!!! De: Murilo Cunha mcscu...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 9 de Junho de 2010 8:14:22 Assunto: [delphi-br] TVirtualTreeView Pessoal, Realmente preciso de ajuda para resolver esta pendencia em meu sistema. Insisto em perguntar se ha alguem que possa me ajudar com esse assunto abaixo... Obrigado MuriloCunha Pessoal, Tenho a seguinte estrutura em meu TVirtualTreeView para D2010: - Node 1 Node 1.1 Node 1.2 Node 1.3 + Node 2 - Node 3 Node 3.1 Node 3.2 + Node 4 + Node 5 Como eu faço para trocar os CAPTIONS destes Nodes?? Este meu TVirtualTreeView exibe todos os forms que tenho em minha aplicacao e, dentro destes nodes, exibe o nome de todos os componentes que existem em cada form. Quero colocar o nome dos forms no primeiro nivel e os componentes no segundo nivel, como fazer?? Obrigado MuriloCunha -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM [As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] TVirtualTreeView
Luiz, Esta implementacao serve para TTreeView. O q estou procurando eh para TVirtualTreeView. Ele tem um comportamento um tanto estranho para mim. Alguem poderia nos ajudar nesta implementacao? Sei que tenho que mexer no OnGetText mas nao sei como usa-lo. Obrigado MuriloCunha On 09/06/2010 08:31, Luiz Carlos wrote: Blz... Seguinte... não sei se vai lhe ajudar... mas que seja um começo procedure PopulaTreeView; var i, x: Integer; lForm, lComp: TTreeNode; begin TreeView.Items.Clear; for I := 0 to 10 do begin lForm := TreeView.Items.AddChild(nil, 'Formulario ' + IntToStr(i)); for x := 0 to 4 do begin lComp := TreeView.Items.AddChild(lForm, 'Componente ' + IntToStr(i)); end; end; end; Abraços... e qualquer duvidas... estamos ai!!! De: Murilo Cunhamcscu...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 9 de Junho de 2010 8:14:22 Assunto: [delphi-br] TVirtualTreeView Pessoal, Realmente preciso de ajuda para resolver esta pendencia em meu sistema. Insisto em perguntar se ha alguem que possa me ajudar com esse assunto abaixo... Obrigado MuriloCunha Pessoal, Tenho a seguinte estrutura em meu TVirtualTreeView para D2010: - Node 1 Node 1.1 Node 1.2 Node 1.3 + Node 2 - Node 3 Node 3.1 Node 3.2 + Node 4 + Node 5 Como eu faço para trocar os CAPTIONS destes Nodes?? Este meu TVirtualTreeView exibe todos os forms que tenho em minha aplicacao e, dentro destes nodes, exibe o nome de todos os componentes que existem em cada form. Quero colocar o nome dos forms no primeiro nivel e os componentes no segundo nivel, como fazer?? Obrigado MuriloCunha
Res: Res: [delphi-br] TVirtualTreeView
Ops por não conhecer o componente, acreditei que pudesse ser util Olha... fazendo algumas pesquisa na net... encontrei esse link http://mrbool.devmedia.com.br/Novo/Revista/cd71-michael-treeview.zip , faz parte de um artigo publicado na revista ClubeDephi, ed. 71. Mais, uma vez... veja se pode ser util e desculpa ai.. vlw!!! De: Murilo Cunha mcscu...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 9 de Junho de 2010 8:46:06 Assunto: Re: Res: [delphi-br] TVirtualTreeView Luiz, Esta implementacao serve para TTreeView. O q estou procurando eh para TVirtualTreeView. Ele tem um comportamento um tanto estranho para mim. Alguem poderia nos ajudar nesta implementacao? Sei que tenho que mexer no OnGetText mas nao sei como usa-lo. Obrigado MuriloCunha On 09/06/2010 08:31, Luiz Carlos wrote: Blz... Seguinte... não sei se vai lhe ajudar... mas que seja um começo procedure PopulaTreeView; var i, x: Integer; lForm, lComp: TTreeNode; begin TreeView.Items.Clear; for I := 0 to 10 do begin lForm := TreeView.Items.AddChild(nil, 'Formulario ' + IntToStr(i)); for x := 0 to 4 do begin lComp := TreeView.Items.AddChild(lForm, 'Componente ' + IntToStr(i)); end; end; end; Abraços... e qualquer duvidas... estamos ai!!! De: Murilo Cunhamcscu...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 9 de Junho de 2010 8:14:22 Assunto: [delphi-br] TVirtualTreeView Pessoal, Realmente preciso de ajuda para resolver esta pendencia em meu sistema. Insisto em perguntar se ha alguem que possa me ajudar com esse assunto abaixo... Obrigado MuriloCunha Pessoal, Tenho a seguinte estrutura em meu TVirtualTreeView para D2010: - Node 1 Node 1.1 Node 1.2 Node 1.3 + Node 2 - Node 3 Node 3.1 Node 3.2 + Node 4 + Node 5 Como eu faço para trocar os CAPTIONS destes Nodes?? Este meu TVirtualTreeView exibe todos os forms que tenho em minha aplicacao e, dentro destes nodes, exibe o nome de todos os componentes que existem em cada form. Quero colocar o nome dos forms no primeiro nivel e os componentes no segundo nivel, como fazer?? Obrigado MuriloCunha [As partes desta mensagem que não continham texto foram removidas]