| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как перевести TreeView в режим редактирования? [D7, Win2k]

Denis555 ©   (2005-07-13 17:51:00) 

Доброго всем времени суток, не подскажет ли кто как програмно перевести TTreeView в режим редактирования узла, что то типа BeginEdit?

---

Игорь Шевченко   (2005-07-14 12:42:00) [1]

Странно, у меня работает:

unit main;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, ComCtrls;

type
 TfMain = class(TForm)
   TreeView: TTreeView;
   Button: TButton;
   procedure ButtonClick(Sender: TObject);
 end;

var
 fMain: TfMain;

implementation
uses
 CommCtrl;

{$R *.dfm}

procedure TfMain.ButtonClick(Sender: TObject);
begin
 TreeView.SetFocus;
 SendMessage(TreeView.Handle, TVM_EDITLABEL, 0,
   LPARAM(TreeView.Selected.ItemId));
end;

end.

Delphi2005, Win32 personality

---

Denis555   (2005-07-14 11:22:00) [2]

это максимум что там можно поставить ни D8 ни D9 там выбрать нельзя и честно говоря думал что от версии Делхи это не зависит

---

Ega23   (2005-07-14 11:18:00) [3]

Спасибо, но в Delphi2005 это не работает!

А нафига тогда ты в сабже D7 поставил???

---

Denis555   (2005-07-14 11:16:00) [4]

Спасибо, но в Delphi2005 это не работает!
работает следующий код:
PostMessage(TreeView1.Handle, TVM_EDITLABEL, 0, LPARAM(TreeView1.Selected.ItemID));
для тех кто будет использовать константа TVM_EDITLABEL лежит в модуле Commctrl

---

Игорь Шевченко   (2005-07-13 18:05:00) [5]

SendMessage (TreeView.Handle, TVM_EDITLABEL, 0, ItemHandle)

---

Наверх