Ĺadny brzuch
Witam wszystkich.
Mam w Memo1 pare linijek wyrazów (dokładnie to są to nazwy katalogów). I chciałbym te nazwy katalogów przenieść do TreeView jako Itemy, ale nie umiem przekonwertować tych stringów z Memo na TreeNode.
W ogóle to chcem użyć takiego kodu:
procedure TForm1.Button2Click(Sender: TObject);
begin
with TreeView1.Items do
???? := Add(nil, '????');
end;
I właśnie nie wiem co wstawić w miejsca tych znaków "????".
Pozdrawiam.
procedure TForm1.Button2Click(Sender: TObject);
begin
with TreeView1.Items.add(nil, 'text') do
Text := 'dddddd';
end;
i dodaje item....
Look for: http://strefa_progra...ia.w.interia.pl
Dzięki wielkie Mickers!
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Mam w Memo1 pare linijek wyrazów (dokładnie to są to nazwy katalogów). I chciałbym te nazwy katalogów przenieść do TreeView jako Itemy, ale nie umiem przekonwertować tych stringów z Memo na TreeNode.
W ogóle to chcem użyć takiego kodu:
procedure TForm1.Button2Click(Sender: TObject);
begin
with TreeView1.Items do
???? := Add(nil, '????');
end;
I właśnie nie wiem co wstawić w miejsca tych znaków "????".
Pozdrawiam.
procedure TForm1.Button2Click(Sender: TObject);
begin
with TreeView1.Items.add(nil, 'text') do
Text := 'dddddd';
end;
i dodaje item....
Look for: http://strefa_progra...ia.w.interia.pl
Dzięki wielkie Mickers!