Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.08;
Скачать: CL | DM;

Вниз

TreeVIew SOOS!   Найти похожие ветки 

 
Лиза   (2005-12-20 17:07) [0]

Подскажите пожалуйста с treeview! как занести в дерево, формируемое пользователем какой-либо файл из OpenDialog?причем чтоб он был единичным файлом, то есть как бы ему нельзя было создать подпапку. Это вроде AddObject надо как-то использовать??Что значит Pointer в AddObject(TTreeNode, Str, POINTER)? и как потом при щелчке на ноду отображать файл в RichEdit?


 
umbra ©   (2005-12-20 18:10) [1]

Лиза, а Вам нравитсЯ группа "АукцЫон"?

а чтобы лабел некого нода в тривью отображал имя файла совершенно не нужен
AddObject. Можете описать проблему подробнее?


 
Лиза   (2005-12-20 22:03) [2]

в общем проблема за вечер сдвинулась немного:).я пишу

procedure TForm1.AddDocumentClick(Sender: TObject);
begin
if OpenDialog2.Execute then begin
 try
  if not FileExists (OpenDialog2.FileName)then
   raise OpenException.Create ("????????? ???? ?? ??????????!??????? ????");
  TreeView1.Items.Add (TreeView1.Selected, OpenDialog2.FileName);
 except
  on E:OpenException do begin
   Msg := MessageDlg (E.Message, mtWarning, [mbYes, mbNo], 0);
     if Msg = mrNo then exit
      else TreeView1.Items.Add (TreeView1.Selected, OpenDialog2.FileName);
 end;
 end;
 Path_list[i] := OpenDialog2.FileName;
 inc(i);
end
else exit;
end;

Документ добавляется в treeview. но мне надо, чтобы теперь пользователь не смог к нему добавить подпапку (поднода в общем), т к в проге в дерево добавлять можно папки, подпапки и документы *.RTF.это №1. потом при щелке на ноду содержимое файла надо отобразить в RichEdit. не название а то, что храниться в нем. так вот как потом найти эту ноду?в path_list я сохраняю директории к файлам.это №2. и №3 как в дереве отображать не весь путь до файла а только название?ну вот вроде бы подробно))


 
Лиза   (2005-12-20 22:04) [3]

причем тут Аукцыон?



Страницы: 1 вся ветка

Текущий архив: 2006.01.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
14-1134403412
Igorek
2005-12-12 19:03
2006.01.08
А у Вас в стране политики проводят Интернет чаты?


2-1134841831
Делфёст
2005-12-17 20:50
2006.01.08
Помогите а?


8-1123179611
Logun
2005-08-04 22:20
2006.01.08
Управление Winamp-ом


3-1132063817
Ega23
2005-11-15 17:10
2006.01.08
Как работают курсоры?


2-1134845614
Exploit
2005-12-17 21:53
2006.01.08
Мышь