Witam
W komponencie wyłączyłem ShowButton.
Czy można tak zmienić właściwość komponentu
by rozwijał się i zwijał po jednym Click-u ( a nie po DblClick ) stojąc kursorem myszy na tekscie.
Witam
W komponencie wyłączyłem ShowButton.
Czy można tak zmienić właściwość komponentu
by rozwijał się i zwijał po jednym Click-u ( a nie po DblClick ) stojąc kursorem myszy na tekscie.
procedure TForm1.TreeView1Click(Sender: TObject);
var
P: TPoint;
begin
GetCursorPos(P);
mouse_event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN, P.x, P.y, 0, 0);
mouse_event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP, P.x, P.y, 0, 0);
end;
Arthan wielkie dzięki. Super działa.
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.