שאלה

[the king 2oo6]

שאלה

אני עושה picture viewer ורציתי לדעת איך אפשר שהמציג קבצים-filelistbox יתעדכן בהתאם למציג תיקיות-dirlistbox, הצלחתי לעשות זאת עם המציג דרייבים-drivelistbox בעזרת הקוד הבא: dir1.path=drive1.drive מה הקוד של השניים האחרים ואיפו המיקום הנכון שלו? תודה מראש לכל העונים...

 

[the king 2oo6]

מקפיץ

 

[פאשה0]

באירוע Change של DirListBox

תרשום

File1.Path = Dir1.Path​

 

[the king 2oo6]

תודה זה עבד!

 

[the king 2oo6]

עוד משהו...

סליחה שאני קצת משגע אותכם עם שאלת... איך עושים שה-picture box יציג את מה שכתוב ב-filelistbox? תודה מראש לכל העונים.

 

[עצמונאי]

תשובה.

ME.Picture1.Print=Me.File1.Path

 

[פאשה0]

הוא בטח התכוון שהתמונה עצמה תהיה

ב-pictureBox

תעשה ככה:

Picture1.Picture = LoadPicture(Filename)​

יתכן שצריך להוסיף מילה Set לפני זה, אבל נראה לי שזה יעבוד גם בלי

 

[the king 2oo6]

מה המיקום הנכון?

 

[פאשה0]

מיקום של מה? לא הבנתי אותך...

 

[the king 2oo6]

המיקום של הקוד...

 

[פאשה0]

תשים את הקוד איפה שצריך לעלות

תמונה, למשאל אם אתה רוצה שתמונה תופיע ב-PictureBox ברגע שאתה בוחר את הקובץ מ-FileListBox, אז תשים את הקוד באירוע Click של FileListBox. ככה:

Private Sub File1_Click() Picture1.Picture = LoadPicture(File1.Path + "\" + File1.List(0)) End Sub​

 

[פאשה0]

תיקון

במקום

File1.List(0)​

אמור להיות

File1.List(File1.ListIndex)​

 

[the king 2oo6]

תודה זה עבד בלי התיקון...