קבלת פוקוס

[oferusa]

קבלת פוקוס

שלום יש לי תוכניות ללא כותרת (כלומר ללא הסגרל שנמצא למעלה שיש בו את ה סגור מזער וכו)DrawStyle=0 ויש לי בתוך התוכנית תיבת טקסט.. כאשר מפעילים אותה היא מופיע והכל בסדר אני רוצה שמתי שהפוקוס לא על התוכנית ואני ילחץ על רצף מקשים מסויים התוכנית תקפוץ לי ותיבת הטקסט תיהיה מסומת .. הבעיה שלי שאני מקפיץ אותה ( על ידי כך שאנ אומר שהיה תיהיה החלון העליון אולי פה הבעיה) התיבה לא מסומנת.. אני יודע שהניסוח לא משהו אם מישהו יכול בבקשה לעזור לי או לדבר איתי ב MSN אני אודה לו מאוד! תודה

 

[שלמה47]

תנסה לקבוע לתיבת הטקסט

ערך של 0 לתכונה tabindex

 

[oferusa]

לא עוזר ...

שאני מריץ זה עובד .. אבל שאני קורה להציג את החלון אז החלון מוצג אבל אני צריך לסמן את התיבה כדי לכתוב בה.. מישהו פה יכול דבר איתי ב MSN אולי לעזור לי אחד על אחד?

 

[מיקי256]

השמת פוקוס

txtBox.SetFocus אמור לעשות את העבודה.

 

[oferusa]

אם אתה מתכוון ל...

Text1.SetFocus זה גם לא עוזר ניסיתי את כל אלה: *ביחד* Dim lForm As Long cmdHide_Click lForm = Me.hwnd 'Put form on top SetWindowPos lForm, HWND_TOPMOST, 0, 0, 0, 0, 1 Me.SetFocus Text1.SetFocus ולא עוזר