![]() |
|
#1
|
|||
|
|||
![]() Добрый день))) Такой вопросик, можно ли к веткам TreeView прикрепить определенные файлы для скачивания?
Вот такой кодик Код:
procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode); begin Memo1.Lines.Clear; if (node.Text = '1') then Memo1.Lines.LoadFromFile ('c:\1.txt'); Код:
procedure TForm1.Button1Click(Sender: TObject); var TargetFileName: String; begin if SaveDialog1.Execute then TargetFileName:= SaveDialog1.FileName; end; Как прикрепить к ветки файл допустим exe или rar, что бы выбрав определенную ветку и нажав кнопку копировался этот файл? |