Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Delphi - Modifica treeview
Forum - Delphi - Modifica treeview

Avatar
carmelo (Normal User)
Pro


Messaggi: 100
Iscritto: 15/06/2007

Segnala al moderatore
Postato alle 13:17
Lunedì, 22/07/2013
Salve a tutti,
cerco di spiegare quello che voglio fare.
Vorrei aggiungere un numero preciso di SubItem, all'interno di una treeview, numero che assegno tramite un edit.
Spero sia chiaro...
Grazie mille
carmelo

PM Quote
Avatar
dvdansl (Normal User)
Newbie


Messaggi: 9
Iscritto: 26/06/2013

Segnala al moderatore
Postato alle 11:55
Mercoledì, 24/07/2013
Se non ho capito male tu vuoi una cosa del genere (immagine allegata).

Per fare ciò bastano poche righe di codice:

Codice sorgente - presumibilmente Delphi

  1. procedure TForm1.Button1Click(Sender: TObject);
  2. var
  3.   Padre: TTreeNode;
  4.   Figlio: TTreeNode;
  5.   i: Integer;
  6. begin
  7.   Padre := TreeView1.Items.AddChild(nil, 'Padre');
  8.   for i := 1 to (StrToInt(Edit1.Text)) do
  9.     Figlio := TreeView1.Items.AddChild(Padre, 'Figlio ' + IntToStr(i));
  10. end;





dvdansl ha allegato un file: img.png (57917 bytes)
Clicca qui per guardare l'immagine
PM Quote