Componente TreeView

Delphi

03/02/2003

Gostaria de saber se alguem poderia me ajudar, pois necessito realizar a criacao do TreeView em tempo de execucao do sistema. Ajudaria se me mandassem um pequeno trecho de programacao para que possa analisar.
OBS.: Preciso do Nivel Principal e seu SubNivel
Grato


A.fracassi

A.fracassi

Curtidas 0

Respostas

Leafar

Leafar

03/02/2003

{Fracassi, basicamente o código de criação de componentes é o mesmo para os componentes nativos, então utilize este como esqueleto, o que vc vai mudar é a inclusão dos itens da árvore através dos eventos e a classe e propriedades básicas do componente:

.Items.Insert(contador)
.Items.Item[contador].SubItems.Add(Fields[indiceCampoIdentificador].Value);}

//segue exemplo
...
var
...
Instance : TControl = nil;

implementation

procedure...
var
Reference : TControlClass;
...
Reference:=TStaticText;
Instance := Reference.Create(Self);
Instance.Parent := pgcAreas.ActivePage;
TStaticText(Instance).Left:=0;
TStaticText(Instance).Top:=10;
TStaticText(Instance).Width:=70;
TStaticText(Instance).Font.Style:=[fsBold];
TStaticText(Instance).Caption:=´Expectativa´;

//espero ter ajudado


GOSTEI 0
POSTAR