Res: [delphi-br] Ajuda com treeview

2009-01-22 Por tôpico Coutinho - Yahoo
Andressa...
Estou te enviando um segundo código para vc sobrepor ao que te enviei 
antes... acho que resolve seu problema...


Em tempo...

Neste segundo código, enviei hoje, mais cedo um com um pequeno bub que 
consertei...
Veja a segunda mensagem com anexo!!

Silvio Clécio... Te enviei também para vc disponibilizar no teu blog, 
camarada!!!

Sds

__
Emanuel Coutinho
Salvador-Ba-Brasil




Andresa Ferreira escreveu:

 Oi Coutinho...

 Eu fiz assim:

 procedure TfrmMenuModulos.tvMenuExpanded(Sender: TObject; Node: 
 TTreeNode);
 begin
   inherited;
   with tvMenu do
 Select(Node);
 end;
 procedure TfrmMenuModulos.tvMenuCollapsed(Sender: TObject;
   Node: TTreeNode);
 begin
   inherited;
   with tvMenu do
 Select(Node);
 end;

 E deu super certo... o único detalhe agora, e que qdo abre a tela o 
 menu está vindo aberto.
 O AutoExpand está False.
 Ele está vindo aberto por causa do evento vMenuCollapsed. Mas se eu 
 não colocar esse, e colocar apenas o tvMenuExpanded, quando eu clico 
 no (+) fica certinho, mas qdo eu clico p/ fechar (-) ele ainda abre 
 uma tela que abri, e não deveria.

 GRata,
 Andresa

  
 .


  


-- 





Re: Res: Res: [delphi-br] Ajuda com treeview

2009-01-21 Por tôpico Coutinho - Yahoo
Aí Andressa.
Recebeu o exemplo do Treeview, ajudou para o que vc queria?

Sds
Emanuel Coutinho



Res: Res: Res: [delphi-br] Ajuda com treeview

2009-01-21 Por tôpico Andresa Ferreira
Oi Coutinho. Eu repondi seu e-mail Acho que não deve ter ido.

Assim, o exemplo foi ótimo, e me fez entender bastante coisa.

O problema, que acontece, é que qdo vc clica no mais (+) ele não muda o foco, 
só muda o foco se vc clicar na descrição, sendo assim ele traz as informações 
do último que foi aberto (aquele que ficou com o foco). 

Tem algum jeito de qduando eu clicar no (+) ele já mudar o foco p/ essa linha???

Andresa





De: Coutinho - Yahoo emanuelcouti...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 21 de Janeiro de 2009 11:28:38
Assunto: Re: Res: Res: [delphi-br] Ajuda com treeview


Aí Andressa.
Recebeu o exemplo do Treeview, ajudou para o que vc queria?

Sds
Emanuel Coutinho

 


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] Ajuda com treeview

2009-01-21 Por tôpico Coutinho - Yahoo
Andressa,

O absolute index funciona, do jeito que eu coloquei, tanto para quando 
clica, quanto para quando navega com as teclas...
Quando vc clica no + está abrindo os children do parent node... 
assim, o foco ainda está no parent node...
Vou verificar um teste aqui, se tem como fazer selecionar o primeiro 
child node qudando vc expande os children nodes...

Abaixo está o código com as alterações que fiz para uncionar como necessita.
Deixe o Auto-Expand Desligado, senão não vai funcionar legal

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls;

type
  TForm1 = class(TForm)
TreeView1: TTreeView;
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
procedure Button1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure TreeView1Change(Sender: TObject; Node: TTreeNode);
procedure TreeView1Expanded(Sender: TObject; Node: TTreeNode);
  private
{ Private declarations }
  public
{ Public declarations }
Diretorio: String;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
with Treeview1 do
   begin
 LoadFromFile(diretorio+'Treeitems.txt');
 SetFocus;
 Select(TreeView1.Items.GetFirstNode);
   end;
end;

procedure TForm1.FormShow(Sender: TObject);
begin
  Diretorio := extractFilePath(application.ExeName);

end;

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  Label1.Caption := 'Este é o Absolute Index: ' + 
IntToStr(Treeview1.Selected.AbsoluteIndex);
  Label2.Caption := 'Este é o  Index: ' + 
IntToStr(Treeview1.Selected.Index);

end;

procedure TForm1.TreeView1Expanded(Sender: TObject; Node: TTreeNode);
begin
with Treeview1 do
   begin
 Select(Node);
 Select(Selected.getFirstChild);
   end;

end;

end.

Vejaí no código anterior, as alterações que fiz aqui, e manda ver!!!

Sds,

__
Emanuel Coutinho
Salvador-Ba-Brasil



Andresa Ferreira escreveu:

 Oi Coutinho. Eu repondi seu e-mail Acho que não deve ter ido.

 Assim, o exemplo foi ótimo, e me fez entender bastante coisa.

 O problema, que acontece, é que qdo vc clica no mais (+) ele não muda 
 o foco, só muda o foco se vc clicar na descrição, sendo assim ele traz 
 as informações do último que foi aberto (aquele que ficou com o foco).

 Tem algum jeito de qduando eu clicar no (+) ele já mudar o foco p/ 
 essa linha???

 Andresa

 


  


-- 





Re: Res: [delphi-br] Ajuda com treeview

2009-01-21 Por tôpico Coutinho - Yahoo
Testei depois com o autoexpand true e ficou legal... desculpe...

Sds
Emanuel Coutinho





Res: [delphi-br] Ajuda com treeview

2009-01-20 Por tôpico Andresa Ferreira
Oi Lucas

Então meu código está assim:

  For i := 0 to tvMenu.Items.Count - 1 do
  begin
    if tvMenu.Items[i].Selected then
    begin
  if not tvMenu.Items[i].HasChildren then
  begin
    {$IFDEF IF_MILLENIUM}
    Exec_Form_IF(pMenu(tvMenu.Items[i].Data)^.sNm_Form);
    {$ENDIF}
    {$IFDEF CTRL}
    Exec_Form_CTRL(pMenu(tvMenu.Items[i].Data)^.sNm_Form);
    {$ENDIF}
  end;
  Break;
    end;
  end;


Me parece que essa parte tvMenu.Items[i].Selected não faz certo Olha o 
exemplo:

Configurações
  - Empresa
Parametros

Qdo eu clico em Cofigurações ele não abre nada, aí eu clico em Empresas ele 
abre a tela correta. Aí eu clico em Parametros e ele abre a tela de Empresas de 
novo. Qdo ele passa no for, ele acha que o i que está selecionado é o da 
empresa...

Preciso de ajuda

Andresa





De: Lucas Neves lucas_del...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 19 de Janeiro de 2009 17:36:04
Assunto: Re: [delphi-br] Ajuda com treeview


Se isso for regra para todos os nos que tem subdivisoes, use a 
propriedade HasChildren.

if not Node.HasChildren then
// coloque aqui a funcao que chama o form...

Espero que ajude

Lucas

Andresa Ferreira escreveu:

 Olá pessoal

 Tô precisando de um help.

 Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da 
 árvore, ele abre o último frm que foi aberto.

 Como faria para qdo clicar no mais (+) não abrir nenhum frm???

 Andresa

  _ _ __
 De: Rubem Nascimento da Rocha djpardalrocha@ hotmail.com 
 mailto:djpardalroc ha%40hotmail. com
 Para: delphi-br delphi...@yahoogrup os.com.br 
 mailto:delphi- br%40yahoogrupos .com.br
 Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
 Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7

 É expressamente proibida qualquer menção à pirataria na lista! Está 
 fazendo uma solicitação ilegal na lista, pedindo pra ser banido daqui!

 Sds.

 To: delphi...@yahoogrup os.com.br
 From: rafaelpinto@ cdsol.com. br
 Date: Mon, 19 Jan 2009 18:27:38 +
 Subject: [delphi-br] Perdi o Meu CD do Delphi 7

 Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
 conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
 fazer o Downloade dele Rapidinho??? ?

 Estou precisando muito!!!
  _ _ _ _ _ _
 Confira vídeos com notícias do NY Times, gols direto do Lance, 
 videocassetadas e muito mais no MSN Video!
 http://video. msn.com/? mkt=pt-br

 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbusca dos..yahoo. com http://br.maisbusca dos..yahoo. com

 [As partes desta mensagem que não continham texto foram removidas]

 
 


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



Re: Res: [delphi-br] Ajuda com treeview

2009-01-20 Por tôpico Coutinho - Yahoo
Colega,
Você tentou usar
Selected.absoluteindex para associar com a sua janela?


Sds
Emanuel Couitnho



Andresa Ferreira escreveu:

 Oi Lucas

 Então meu código está assim:

   For i := 0 to tvMenu.Items.Count - 1 do
   begin
 if tvMenu.Items[i].Selected then
 begin
   if not tvMenu.Items[i].HasChildren then
   begin
 {$IFDEF IF_MILLENIUM}
 Exec_Form_IF(pMenu(tvMenu.Items[i].Data)^.sNm_Form);
 {$ENDIF}
 {$IFDEF CTRL}
 Exec_Form_CTRL(pMenu(tvMenu.Items[i].Data)^.sNm_Form);
 {$ENDIF}
   end;
   Break;
 end;
   end;

 Me parece que essa parte tvMenu.Items[i].Selected não faz certo 
 Olha o exemplo:

 Configurações
   - Empresa
 Parametros

 Qdo eu clico em Cofigurações ele não abre nada, aí eu clico em 
 Empresas ele abre a tela correta. Aí eu clico em Parametros e ele abre 
 a tela de Empresas de novo. Qdo ele passa no for, ele acha que o i que 
 está selecionado é o da empresa...

 Preciso de ajuda

 Andresa

 
 De: Lucas Neves lucas_del...@yahoo.com.br 
 mailto:lucas_delphi%40yahoo.com.br
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 19 de Janeiro de 2009 17:36:04
 Assunto: Re: [delphi-br] Ajuda com treeview

 Se isso for regra para todos os nos que tem subdivisoes, use a
 propriedade HasChildren.

 if not Node.HasChildren then
 // coloque aqui a funcao que chama o form...

 Espero que ajude

 Lucas

 Andresa Ferreira escreveu:
 
  Olá pessoal
 
  Tô precisando de um help.
 
  Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da
  árvore, ele abre o último frm que foi aberto.
 
  Como faria para qdo clicar no mais (+) não abrir nenhum frm???
 
  Andresa
 
   _ _ __
  De: Rubem Nascimento da Rocha djpardalrocha@ hotmail.com
  mailto:djpardalroc ha%40hotmail. com
  Para: delphi-br delphi...@yahoogrup os.com.br
  mailto:delphi- br%40yahoogrupos .com.br
  Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
  Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7
 
  É expressamente proibida qualquer menção à pirataria na lista! Está
  fazendo uma solicitação ilegal na lista, pedindo pra ser banido daqui!
 
  Sds.
 
  To: delphi...@yahoogrup os.com.br
  From: rafaelpinto@ cdsol.com. br
  Date: Mon, 19 Jan 2009 18:27:38 +
  Subject: [delphi-br] Perdi o Meu CD do Delphi 7
 
  Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
  conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
  fazer o Downloade dele Rapidinho??? ?
 
  Estou precisando muito!!!
   _ _ _ _ _ _
  Confira vídeos com notícias do NY Times, gols direto do Lance,
  videocassetadas e muito mais no MSN Video!
  http://video. msn.com/? mkt=pt-br
 
  Veja quais são os assuntos do momento no Yahoo! +Buscados
  http://br.maisbusca dos..yahoo. com http://br.maisbusca dos..yahoo. 
 com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 


 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbuscados.yahoo.com http://br.maisbuscados.yahoo.com

 [As partes desta mensagem que não continham texto foram removidas]

  




Re: Res: [delphi-br] Ajuda com treeview

2009-01-20 Por tôpico Coutinho - Yahoo
Use tmMenu.Items.Selected.Absoluteindex...
Ok?


Andresa Ferreira escreveu:

 Oi Lucas

 Então meu código está assim:

   For i := 0 to tvMenu.Items.Count - 1 do
   begin
 if tvMenu.Items[i].Selected then
 begin
   if not tvMenu.Items[i].HasChildren then
   begin
 {$IFDEF IF_MILLENIUM}
 Exec_Form_IF(pMenu(tvMenu.Items[i].Data)^.sNm_Form);
 {$ENDIF}
 {$IFDEF CTRL}
 Exec_Form_CTRL(pMenu(tvMenu.Items[i].Data)^.sNm_Form);
 {$ENDIF}
   end;
   Break;
 end;
   end;

 Me parece que essa parte tvMenu.Items[i].Selected não faz certo 
 Olha o exemplo:

 Configurações
   - Empresa
 Parametros

 Qdo eu clico em Cofigurações ele não abre nada, aí eu clico em 
 Empresas ele abre a tela correta. Aí eu clico em Parametros e ele abre 
 a tela de Empresas de novo. Qdo ele passa no for, ele acha que o i que 
 está selecionado é o da empresa...

 Preciso de ajuda

 Andresa

 
 De: Lucas Neves lucas_del...@yahoo.com.br 
 mailto:lucas_delphi%40yahoo.com.br
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 19 de Janeiro de 2009 17:36:04
 Assunto: Re: [delphi-br] Ajuda com treeview

 Se isso for regra para todos os nos que tem subdivisoes, use a
 propriedade HasChildren.

 if not Node.HasChildren then
 // coloque aqui a funcao que chama o form...

 Espero que ajude

 Lucas

 Andresa Ferreira escreveu:
 
  Olá pessoal
 
  Tô precisando de um help.
 
  Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da
  árvore, ele abre o último frm que foi aberto.
 
  Como faria para qdo clicar no mais (+) não abrir nenhum frm???
 
  Andresa
 
   _ _ __
  De: Rubem Nascimento da Rocha djpardalrocha@ hotmail.com
  mailto:djpardalroc ha%40hotmail. com
  Para: delphi-br delphi...@yahoogrup os.com.br
  mailto:delphi- br%40yahoogrupos .com.br
  Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
  Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7
 
  É expressamente proibida qualquer menção à pirataria na lista! Está
  fazendo uma solicitação ilegal na lista, pedindo pra ser banido daqui!
 
  Sds.
 
  To: delphi...@yahoogrup os.com.br
  From: rafaelpinto@ cdsol.com. br
  Date: Mon, 19 Jan 2009 18:27:38 +
  Subject: [delphi-br] Perdi o Meu CD do Delphi 7
 
  Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
  conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
  fazer o Downloade dele Rapidinho??? ?
 
  Estou precisando muito!!!
   _ _ _ _ _ _
  Confira vídeos com notícias do NY Times, gols direto do Lance,
  videocassetadas e muito mais no MSN Video!
  http://video. msn.com/? mkt=pt-br
 
  Veja quais são os assuntos do momento no Yahoo! +Buscados
  http://br.maisbusca dos..yahoo. com http://br.maisbusca dos..yahoo. 
 com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 


 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbuscados.yahoo.com http://br.maisbuscados.yahoo.com

 [As partes desta mensagem que não continham texto foram removidas]

  




Re: Res: Res: [delphi-br] Ajuda com treeview

2009-01-20 Por tôpico Coutinho - Yahoo
Andressa
O componente treeview padrão do delphi tem a propriedade selected
e a propriedade selected tem a AbsoluteIndex.

vou preparar uma coisinha aqui e te envio em PVT para vc poder dar uma 
olhada... ok?
aguarde hoje à noite
sds
Emanuel Coutinho



Andresa Ferreira escreveu:

 Então Coutinho, não consegui achar essas propriedades no componente 
 treeview. O Delphi não aceita essa linha de codigo.

 Vc pode me explicar melhor?

 Andresa

 
 De: Coutinho - Yahoo emanuelcouti...@yahoo.com.br 
 mailto:emanuelcoutinho%40yahoo.com.br
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Enviadas: Terça-feira, 20 de Janeiro de 2009 11:57:51
 Assunto: Re: Res: [delphi-br] Ajuda com treeview

 Use tmMenu.Items. Selected. Absoluteindex. ..
 Ok?

 Andresa Ferreira escreveu:
 
  Oi Lucas
 
  Então meu código está assim:
 
  For i := 0 to tvMenu.Items. Count - 1 do
  begin
  if tvMenu..Items[ i].Selected then
  begin
  if not tvMenu.Items[ i].HasChildren then
  begin
  {$IFDEF IF_MILLENIUM}
  Exec_Form_IF( pMenu(tvMenu. Items[i]. Data)^.sNm_ Form);
  {$ENDIF}
  {$IFDEF CTRL}
  Exec_Form_CTRL( pMenu(tvMenu. Items[i]. Data)^.sNm_ Form);
  {$ENDIF}
  end;
  Break;
  end;
  end;
 
  Me parece que essa parte tvMenu.Items[ i].Selected não faz certo
  Olha o exemplo:
 
  Configurações
  - Empresa
  Parametros
 
  Qdo eu clico em Cofigurações ele não abre nada, aí eu clico em
  Empresas ele abre a tela correta. Aí eu clico em Parametros e ele abre
  a tela de Empresas de novo. Qdo ele passa no for, ele acha que o i que
  está selecionado é o da empresa...
 
  Preciso de ajuda
 
  Andresa
 
   _ _ __
  De: Lucas Neves lucas_delphi@ yahoo.com. br
  mailto:lucas_ delphi%40yahoo. com.br
  Para: delphi...@yahoogrup os.com.br mailto:delphi- br%40yahoogrupos 
 .com.br
  Enviadas: Segunda-feira, 19 de Janeiro de 2009 17:36:04
  Assunto: Re: [delphi-br] Ajuda com treeview
 
  Se isso for regra para todos os nos que tem subdivisoes, use a
  propriedade HasChildren.
 
  if not Node.HasChildren then
  // coloque aqui a funcao que chama o form...
 
  Espero que ajude
 
  Lucas
 
  Andresa Ferreira escreveu:
  
   Olá pessoal
  
   Tô precisando de um help.
  
   Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da
   árvore, ele abre o último frm que foi aberto.
  
   Como faria para qdo clicar no mais (+) não abrir nenhum frm???
  
   Andresa
  
    _ _ __
   De: Rubem Nascimento da Rocha djpardalrocha@ hotmail.com
   mailto:djpardalroc ha%40hotmail. com
   Para: delphi-br delphi...@yahoogru p os..com.br
   mailto:delphi- br%40yahoogrupos .com.br
   Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
   Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7
  
   É expressamente proibida qualquer menção à pirataria na lista! Está
   fazendo uma solicitação ilegal na lista, pedindo pra ser banido daqui!
  
   Sds.
  
   To: delphi...@yahoogrup os.com.br
   From: rafaelpinto@ cdsol.com. br
   Date: Mon, 19 Jan 2009 18:27:38 +
   Subject: [delphi-br] Perdi o Meu CD do Delphi 7
  
   Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
   conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
   fazer o Downloade dele Rapidinho??? ?
  
   Estou precisando muito!!!
    _ _ _ _ _ _
   Confira vídeos com notícias do NY Times, gols direto do Lance,
   videocassetadas e muito mais no MSN Video!
   http://video. msn.com/? mkt=pt-br
  
   Veja quais são os assuntos do momento no Yahoo! +Buscados
   http://br.maisbusca dos..yahoo. com http://br.maisbusca dos..yahoo.
  com
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
 
 
  Veja quais são os assuntos do momento no Yahoo! +Buscados
  http://br.maisbusca dos.yahoo. com http://br.maisbusca dos.yahoo. com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 

 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbuscados.yahoo.com http://br.maisbuscados.yahoo.com

 [As partes desta mensagem que não continham texto foram removidas]

  




Res: Res: [delphi-br] Ajuda com treeview

2009-01-20 Por tôpico Andresa Ferreira
Então Coutinho, não consegui achar essas propriedades no componente treeview. O 
Delphi não aceita essa linha de codigo.

Vc pode me explicar melhor?

Andresa





De: Coutinho - Yahoo emanuelcouti...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 20 de Janeiro de 2009 11:57:51
Assunto: Re: Res: [delphi-br] Ajuda com treeview


Use tmMenu.Items. Selected. Absoluteindex. ..
Ok?

Andresa Ferreira escreveu:

 Oi Lucas

 Então meu código está assim:

 For i := 0 to tvMenu.Items. Count - 1 do
 begin
 if tvMenu..Items[ i].Selected then
 begin
 if not tvMenu.Items[ i].HasChildren then
 begin
 {$IFDEF IF_MILLENIUM}
 Exec_Form_IF( pMenu(tvMenu. Items[i]. Data)^.sNm_ Form);
 {$ENDIF}
 {$IFDEF CTRL}
 Exec_Form_CTRL( pMenu(tvMenu. Items[i]. Data)^.sNm_ Form);
 {$ENDIF}
 end;
 Break;
 end;
 end;

 Me parece que essa parte tvMenu.Items[ i].Selected não faz certo 
 Olha o exemplo:

 Configurações
 - Empresa
 Parametros

 Qdo eu clico em Cofigurações ele não abre nada, aí eu clico em 
 Empresas ele abre a tela correta. Aí eu clico em Parametros e ele abre 
 a tela de Empresas de novo. Qdo ele passa no for, ele acha que o i que 
 está selecionado é o da empresa...

 Preciso de ajuda

 Andresa

  _ _ __
 De: Lucas Neves lucas_delphi@ yahoo.com. br 
 mailto:lucas_ delphi%40yahoo. com.br
 Para: delphi...@yahoogrup os.com.br mailto:delphi- br%40yahoogrupos .com.br
 Enviadas: Segunda-feira, 19 de Janeiro de 2009 17:36:04
 Assunto: Re: [delphi-br] Ajuda com treeview

 Se isso for regra para todos os nos que tem subdivisoes, use a
 propriedade HasChildren.

 if not Node.HasChildren then
 // coloque aqui a funcao que chama o form...

 Espero que ajude

 Lucas

 Andresa Ferreira escreveu:
 
  Olá pessoal
 
  Tô precisando de um help.
 
  Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da
  árvore, ele abre o último frm que foi aberto.
 
  Como faria para qdo clicar no mais (+) não abrir nenhum frm???
 
  Andresa
 
   _ _ __
  De: Rubem Nascimento da Rocha djpardalrocha@ hotmail.com
  mailto:djpardalroc ha%40hotmail. com
  Para: delphi-br delphi...@yahoogru p os..com.br
  mailto:delphi- br%40yahoogrupos .com.br
  Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
  Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7
 
  É expressamente proibida qualquer menção à pirataria na lista! Está
  fazendo uma solicitação ilegal na lista, pedindo pra ser banido daqui!
 
  Sds.
 
  To: delphi...@yahoogrup os.com.br
  From: rafaelpinto@ cdsol.com. br
  Date: Mon, 19 Jan 2009 18:27:38 +
  Subject: [delphi-br] Perdi o Meu CD do Delphi 7
 
  Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
  conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
  fazer o Downloade dele Rapidinho??? ?
 
  Estou precisando muito!!!
   _ _ _ _ _ _
  Confira vídeos com notícias do NY Times, gols direto do Lance,
  videocassetadas e muito mais no MSN Video!
  http://video. msn.com/? mkt=pt-br
 
  Veja quais são os assuntos do momento no Yahoo! +Buscados
  http://br.maisbusca dos..yahoo. com http://br.maisbusca dos..yahoo. 
 com
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 


 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbusca dos.yahoo. com http://br.maisbusca dos.yahoo. com

 [As partes desta mensagem que não continham texto foram removidas]

 

 


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Ajuda com treeview

2009-01-19 Por tôpico Andresa Ferreira
Olá pessoal

Tô precisando de um help.

Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da árvore, 
ele abre o último frm que foi aberto.

Como faria para qdo clicar no mais (+) não abrir nenhum frm???

Andresa





De: Rubem Nascimento da Rocha djpardalro...@hotmail.com
Para: delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7



É expressamente proibida qualquer menção à pirataria na lista! Está fazendo uma 
solicitação ilegal na lista, pedindo pra ser banido daqui!

Sds.

To: delphi...@yahoogrup os.com.br
From: rafaelpinto@ cdsol.com. br
Date: Mon, 19 Jan 2009 18:27:38 +
Subject: [delphi-br] Perdi o Meu CD do Delphi 7

Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
fazer o Downloade dele Rapidinho??? ?

Estou precisando muito!!!
 _ _ _ _ _ _
Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas 
e muito mais no MSN Video!
http://video. msn.com/? mkt=pt-br 


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados..yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com treeview

2009-01-19 Por tôpico Lucas Neves
Se isso for regra para todos os nos que tem subdivisoes, use a 
propriedade HasChildren.

if not Node.HasChildren then
  // coloque aqui a funcao que chama o form...

Espero que ajude

Lucas

Andresa Ferreira escreveu:

 Olá pessoal

 Tô precisando de um help.

 Tenho um treeview com ponteiro, porém quando eu clico no mais (+) da 
 árvore, ele abre o último frm que foi aberto.

 Como faria para qdo clicar no mais (+) não abrir nenhum frm???

 Andresa

 
 De: Rubem Nascimento da Rocha djpardalro...@hotmail.com 
 mailto:djpardalrocha%40hotmail.com
 Para: delphi-br delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 19 de Janeiro de 2009 16:44:12
 Assunto: RE: [delphi-br] Perdi o Meu CD do Delphi 7

 É expressamente proibida qualquer menção à pirataria na lista! Está 
 fazendo uma solicitação ilegal na lista, pedindo pra ser banido daqui!

 Sds.

 To: delphi...@yahoogrup os.com.br
 From: rafaelpinto@ cdsol.com. br
 Date: Mon, 19 Jan 2009 18:27:38 +
 Subject: [delphi-br] Perdi o Meu CD do Delphi 7

 Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
 conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
 fazer o Downloade dele Rapidinho??? ?

 Estou precisando muito!!!
  _ _ _ _ _ _
 Confira vídeos com notícias do NY Times, gols direto do Lance, 
 videocassetadas e muito mais no MSN Video!
 http://video. msn.com/? mkt=pt-br

 Veja quais são os assuntos do momento no Yahoo! +Buscados
 http://br.maisbuscados..yahoo.com http://br.maisbuscados..yahoo.com

 [As partes desta mensagem que não continham texto foram removidas]