כיצד ניתן

[progger]

כיצד ניתן

להחיל מאפיינים זהים על כל האובייקטים מאותו הסוג? לדוגמה, נגיד שאני רוצה שכל ה Labels יהיו מודגשות, כיצד ניתן לבצע זאת מבלי לעבור על כל לייבל ולסמן את האפשרות bold ?

 

[nscom2k]

לא ניסיתי אפשרות זאת ....

TypeName(Control)​

יזהה את סוג הפקד

dim ctrl as object for each ctrl in me.controls if TypeName(ctrl)="Label" then ´...... end if next​

 

[eyalk5]

אם הם במערך:

for i=0 to האיבר האחרון במערך lable1.font.bold=true next

 

[eyalk5]

התבלבלתי

...lable1(i).font

 

[מי זה?]

שתי אפשרויות

יש לך את הפקודה FOR EACH בה תוכל להשתמש... או ליצור TAG זהה לכולם. אם זה לא בזמן ריצה- בחר אותם (אתה לוחץ על CTRL בזמן הבחירה) ושנה את המאפיין.