בית
Top.Mail.Ru Yandeks.Metrika
פורום: "ראשי";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למטה

רכיב הניתן לגרירה מצא סניפים דומים


avr555   (2001-12-17 19:54) [0]

השאלה שלי היא:
אני רוצה ליצור רכיב שיכול להיות "גרר" בכושר.
כרכיב כזה החלטתי להשתמש ב- VirtualTreeView
אני משתמש בשלושה אירועים לצורך גרירה ושחרור: OnMouseDown, OnMouseMove, OnMouseUp.

כאשר השתמשתי ב- CheckListBox כרכיב שנגרר, כדי למנוע את פריצת הרכיב, התקשרתי לפונקציה SetCapture (self.Handle) והכל עבד.
וכאשר עוברים ל- VirtualTreeView לאחר התקשרות ל- SetCapture (self.Handle), הרכיב מפסיק לנוע. אם אתה לא מתקשר ל- SetCapture (self.Handle), הכל עובד, רק הרכיב "נשבר" מהמצביע בעת הגרירה.

מה לעשות?



DK   (2001-12-19 02:16) [1]

נסה להכניס למטפל OnMouseDown:
var
Control: TControl;
begin
try
Control := Sender as TControl;
ReleaseCapture;
Control.Perform(WM_SYSCOMMAND, $F012, 0);
finally
end;

הסוף;



עמודים: 1 ענף שלם

פורום: "ראשי";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למעלה





זיכרון: 0.54 MB
זמן: 0.021 c
4-22468
זאבל
2001-11-02 11:56
2002.01.08
זיכרון דולף


1-22111
מישהו עשה?
2001-12-14 08:12
2002.01.08
צור רשימה נפתחת ב- StringGride, הקלד חיפוש ב- DBGride


1-22199
T2
2001-12-16 07:16
2002.01.08
עשה תהליך


1-22017
בונה
2001-12-17 19:45
2002.01.08
איך לשים את הקו הנוכחי עריכה?


14-22393
פליקס
2001-11-08 21:54
2002.01.08
מה לעשות?





אפריקאנס אלבני ערבי אַרְמֶנִי אזרביג'אן הבסקים בלארוסית בולגרי קטלאנית הסיני (פשוט) סינית (מסורתית) קרואטית צ'כיה דני הולנדי אנגלית אסטוני פיליפיני פיני צרפתית
גליציה גאורגיה גרמני יווני קריאולית האיטית עברי הינדי הונגרי איסלנדי אינדונזי אירי איטלקי יפני קוריאני לטבי ליטאי מקדוניה מלאית מלטזית נורבגי
פרסי פולני פורטוגזי רומנית רוסי סרבית סלובקי סלובני ספרדי סוואהילית שבדי תאילנדי תורכי אוקראיני אורדו ויאטנמית וולשית יידיש בנגלית בוסנית
קבואנו אספרנטו גוג'ראטית האוסה המונג איגבו יָאוָנִי קנאדה לחמר לאו הלטינית מאורים מרתי מונגולי נפאלית פונג'בית סומליה טמילית טלוגו יורובה
זולו
Английский Французский Немецкий Итальянский Португальский Русский Испанский