treeview

0

procedure TForm1.Button1Click(Sender: TObject);
var
t:ttreenode;
begin
TreeView1.Items.Add(t,edit1.text)
end;

co jest ne tak skoro po kliknieciu buttona wyskakuje blad:
"Access violation at address 0043B793 in module 'PROJECT1.EXE'. Read of address FFFFFFFF.

[???]

0

t nie jest tworzone: daj jeszcze linijki t := TTreeNode.Create na początku i t.free i na końcu

0

zrobilem tak i teraz dodaje ale blad ten sam jest dalej :-8

0

procedure TForm1.Button1Click(Sender: TObject);
begin
TreeView1.Items.Add(nil,edit1.text)
end;

:D

1 użytkowników online, w tym zalogowanych: 0, gości: 1