| Вопрос: Графика и picture box | Добавлено: 02.08.04 18:30 |
Автор вопроса:  LD | ICQ: 336327056 |
|
Всем привет!
Люди подскажите как сделать, чтобы при каждом открытие формы, на которой имеется picture box, picture box выбирал любой графический файл из папки на локальном компе, и грузил его (каждый раз разный), Заранее спасибо |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа: Kodo Разработчик Offline Client ICQ: 293048085 Вопросов: 37 Ответов: 457 |
Профиль | | #1 | Добавлено: 02.08.04 18:43 |
|
Ставишь на форму FileList, имя flsFiles
PictureBox с Name'ом picBox, AutoRedraw = True [Код] FileDir = "C:\Dir\" 'Типа твоя папка с картинками flsFiles.Pattern = "*.jpg;*.bmp" 'Картинки ... flsFiles.Path = FileDir rndImage = Int(rnd * flsFiles.listcount - 1) picBox.picture = LoadPicture(FileDir & flsFiles.List(rndImage)) [Конецъ] |
||
|
Номер ответа: 2 Автор ответа: KodoРазработчик Offline Client ICQ: 293048085 Вопросов: 37 Ответов: 457 |
Профиль | | #2 | Добавлено: 02.08.04 18:45 |
|
И, ЗАБЫЛ !!!!!
В начало кода напиши Randomize Timer '!!! А то картинка не случайной будет 
|
||
Страница: 1 |