انتخاب treeView با تک کلیک

[hamid_isf_1360]

با سلام خدمت دوستان
همان طور که می دانید کنار هر گره در treeview یک علامت + وجود دارد که محتوای درختواره را باز و بسته می کند.و همچنین می توان بر روی خود متن هر گره نیز دابل کلیک کرد تا گره باز شود.

حالا سوال بنده اینه که چطور می شه به جای دابل کلیک کردن بر روی هر گره یه تک کلیک زد و گره را باز کرد

یعنی تک کلیک به جای دابل کلیک

[یوسف زالی]

سلام.
این رو تست کنید:


procedure TForm1.TreeView1Click(Sender: TObject);
begin
mouse_event(MOUSEEVENTF_LEFTDOWN, mouse.CursorPos.X, mouse.CursorPos.Y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, mouse.CursorPos.X, mouse.CursorPos.Y, 0, 0);

end;

[hamid_isf_1360]

ممنون از شما دوست عزیز
کد شما جواب داد
ولی عمالکرد علامت + در کنار هر گره از کار افتاد و کار نمی کنه