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

למטה

האם מישהו השתמש בפונקציה PaintTo כדי לצייר s WinControl על הבד של מפת הסיביות? עזרה! אני לא יכול לעשות שום דבר. מצא סניפים דומים


Kost   (2001-12-14 14:10) [0]

האם מישהו השתמש בפונקציה PaintTo כדי לצייר תמונות של WinControl על הבד של מפת הסיביות? עזרה! אני לא יכול לעשות כלום.



valery_f   (2001-12-14 18:16) [1]

השתמש בזה. ה- "אך" היחיד - WinControl הבלתי נראה לראשונה אין לו ידית ונותן פעולה עם PaintTo. אם זה הרכיב שלך - התקשר ל- CreateHandle, אם לא - הפוך אותו לגלוי ואז הסתיר אותו - הידית תופיע ו- PaintTo יעבוד.



DK   (2001-12-15 03:52) [2]

2valery_f
אתה יכול לשאול:
איך זה? יש שליטה, אך אין ידית. איך זה יכול להיות?



Kost   (2001-12-15 13:05) [3]

יש טופס TForm1. BitBtn1 "כפתור ניסיוני" מונח עליו.
יש רצון, על ידי לחיצה על כפתור אחר - כפתור 1 לבצע את הפעולות הבאות:
- צייר תמונת BitBtn1 על הבד של מפת הסיביות באמצעות PaintTo
- פלט את מפת הסיביות שהתקבלה לבד הטופס

לא קיבל! BitBtn1 לא נמשך למפת הסיביות! למה! איפה אני צודק?

הליך TForm1.FormCreate (שולח: TObject);
להתחיל
// צור מפת סיביות
bmp: = TBitmap.Create;
bmp. רוחב: = 150;
bmp. גובה: = 150;
הסוף;

הליך TForm1.Button1Click (שולח: TObject);
להתחיל
// כשאתה לוחץ על הכפתור, צייר את BitBtn1 על הבד של מפת הסיביות
BitBtn1.PaintTo (bmp.Canvas.Handle, 0, 0);
לא תקף // כדי להכריח את הטופס מחדש
הסוף;

הליך TForm1.FormPaint (השולח: TObject);
להתחיל
// הדפיס את טופס מפת הסיביות על הבד
Canvas.Traw (0,0, bmp);
הסוף;



DK   (2001-12-16 02:26) [4]

הכל עובד !!!
אולי אתה פשוט לא מתמודד עם לחיצה על כפתור?
הליך TForm1. Button1Click(השולח: TObject);
הליך TForm1. BitBtn1Click(השולח: TObject);



Kost   (2001-12-16 12:12) [5]

ובכל זאת זה לא עובד. הכפתור במפת הסיביות אינו מצויר. TPanel נמשך אך TButton ו- TBitBtn אינם.



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

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

למעלה









זיכרון: 0.57 MB
זמן: 0.022 c
1-22235
DDDeN
2001-12-17 06:47
2002.01.08
שומר מסך


3-21939
SAN
2001-12-04 16:01
2002.01.08
MSSQL


1-22051
קיי
2001-12-18 22:22
2002.01.08
Richedit


4-22470
שבצ'נקו סרגיי
2001-11-02 13:32
2002.01.08
Внедрение


1-22188
אמנות
2001-12-14 13:09
2002.01.08
איך לקרוא קובץ גדול ???





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