Главная страница
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.024 c
14-1134584063
lookin
2005-12-14 21:14
2006.01.08
Еще новость


11-1116454469
Vans
2005-05-19 02:14
2006.01.08
Дада про taskbar


2-1135069562
ANB
2005-12-20 12:06
2006.01.08
Нет ли здесь ошибки ?


2-1135170658
з. танька
2005-12-21 16:10
2006.01.08
Мешается экспоненциальная запись


1-1133632452
ST
2005-12-03 20:54
2006.01.08
Упрямый OleContainer