Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
 
Рейтинг 4.50/10: Рейтинг темы: голосов - 10, средняя оценка - 4.50
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
1

В PictureBox отобразить картинку, выбранную в FileListBox

04.11.2012, 14:54. Просмотров 1926. Ответов 21
Метки нет (Все метки)

Всем привет!
Спустя 5 лет после изучения visual basic решил написать прогу, которая упростила бы мне жизнь на работе!
И возникли такие вопросы:
Как сделать так, чтобы при нажатии на кнопку в picturebox показывалась картинка выбранная в filelistbox?
B еще такой вопрос: как ограничить возможность пользователя в навигации в drivelistbox и dirlistbox? т.е. необходимо сделать так, чтобы он мог лазить в определенной папке в корне программы?
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.11.2012, 14:54
Ответы с готовыми решениями:

А как отобразить картинку на экране?
Hi, All! Кто-нибудь знает, как программно вытащить на desktop картинку? Т.е., есть картинка, хочу...

Как загрузить картинку в PictureBox
Пыталась добавить на форму PictureBox1, а затем в properties импортировать изображение... но ничего...

Не получается загрузить картинку в PictureBox
Здесь брал код: http://msdn.microsoft.com/ru-ru/library/9dtfzwyx(v=vs.90).aspx В моем приложении...

Загрузить картинку в PictureBox по условию
If comp = 2 Then player = player + 1 и чтобы появилась картинка в пикче боксе 2.jpg If...

Как в PictureBox загрузить картинку
нужна помощь : Я ПользоватеЬ запускаю "эту" программу и ... 1)в picturebox вставить...

21
dev.Free
Заблокирован
04.11.2012, 15:09 2
Visual Basic
1
Picture1.Picture = LoadPicture("ТУТ ССЫЛКА ГДЕ ФАЙЛ + ЕГО РАСШИРЕНИЕ")
Ссылку надо брать из FileListBox.
0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 15:21  [ТС] 3
так а какая ссылка?...файл может быть разный и зависит от того какой выбрать в listbox
0
Апострофф
Заблокирован
04.11.2012, 15:22 4
Цитата Сообщение от gotemcity Посмотреть сообщение
как ограничить возможность пользователя в навигации в drivelistbox и dirlistbox? т.е. необходимо сделать так, чтобы он мог лазить в определенной папке в корне программы?
Если пользователю можно ползать в одной заданной наперёд папке, то зачем нужны drivelistbox и dirlistbox?
0
04.11.2012, 15:22
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 15:25  [ТС] 5
к примеру есть доступ к папке "Техника", которая содержит папки "Краны", "Буровые", "самосвалы" и тд...и я не хочу, чтобы пользователь мог подняться выше данной папки "Техника"...если это можно реализовать по другому то я готов выслушать!

пока больше необходимо разобраться с первым вопросом!
0
dev.Free
Заблокирован
04.11.2012, 15:25 6
Цитата Сообщение от gotemcity Посмотреть сообщение
Спустя 5 лет после изучения visual basic
Неужели при таком сроке, такой пустяк не был понят ?
0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 15:32  [ТС] 7
изучал в универе в течении 1 семестра...не програмист по образованию....так, точ не судите строго...


да и потом пока не одного внятного ответа не кто дал
0
dev.Free
Заблокирован
04.11.2012, 15:34 8
На пользуйся! Сразу говорю работал по x64 битной системой, ссылки на компоненты могут не срабатывать.

Всего 3 строчки кода !

По нажатию на кнопку произойдет загрузка картинки на которой в данный момент установлен курсор в FileListBox.
0
Вложения
Тип файла: rar Новая папка.rar (1.2 Кб, 22 просмотров)
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 15:45  [ТС] 9
не работает пишет ошибка 424 object required
0
dev.Free
Заблокирован
04.11.2012, 15:50 10
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Command1_Click()
    Picture1.Picture = LoadPicture(filFiles.Path + "\" + filFiles.FileName)
End Sub
 
Private Sub dirFolders_Change()
    filFiles.Path = dirFolders.Path
End Sub
 
Private Sub drvSelectDrive_Change()
    dirFolders.Path = drvSelectDrive.Drive
End Sub
Где:

drvSelectDrive - выбор диска он же DriverListBox
filFiles - выбор файла он же FileListBox
dirFolders - выбор папок он же DirListBox


Далее 1 компонент Picture1 и 1 кнопка!

Не по теме:

Надеюсь будет уже понятнее ? И не будет лишь бы нажать на кнопку и получить готовое, а попытаться хотя бы понять, что за ошибка и уже на примере моего кода сделать проект у себя?

0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 15:58  [ТС] 11
с иаким кодом как у тебя почему то перестает работать выбор директории и отображение файлов в папке...

если прописать совместно с твоим кодом так,то работает

Visual Basic
1
2
3
4
5
6
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
но картинка по прежнему не отображается
0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 16:05  [ТС] 12
Visual Basic
1
2
3
4
5
6
7
8
9
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub Command1_Click()
Picture1.Picture = LoadPicture(File1.Path + "\" + File1.FileName)
End Sub
рабочий код...так стало все работать!...спасибо за помощь!

остается второй вопрос...как ограничить навигацию?
0
dev.Free
Заблокирован
04.11.2012, 16:41 13
Visual Basic
1
2
3
Private Sub Form_Load()
filFiles.Pattern = "*.JPG;*.txt"
End Sub
ВНИМАНИЕ!!! БЕЗ ПРОБЕЛОВ!!! ПРИ УКАЗАНИИ МАСОК...
1
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 16:48  [ТС] 14
спасибо!)...только я так и не понял почему тот код, который вы дали не сработал сразу?
0
dev.Free
Заблокирован
04.11.2012, 16:50 15
gotemcity, А вы объекты назвали так как у меня? Ну и еще может быть отличия в версии Visual Basic у меня к примеру SP6 стоит 6.0 версии.
0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 16:52  [ТС] 16
Цитата Сообщение от inv.DS Посмотреть сообщение
Visual Basic
1
2
3
Private Sub Form_Load()
filFiles.Pattern = "*.JPG;*.txt"
End Sub
опять не получается...в какое место надо код вставить?...и он будет выводить файлы определенного разрешения как я понимаю в listbox....а как сделать чтобы определенные папки только выводились?
0
dev.Free
Заблокирован
04.11.2012, 16:53 17
Цитата Сообщение от gotemcity Посмотреть сообщение
Private Sub Form_Load()
Процедура при загрузки формы!
0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 16:59  [ТС] 18
так с этим вроде получилось, но все равно файлы с разрешением экселя, автокада выводит...хотя указал только bmp

и вопрос с директорией остается!

Спасибо за помощь!
0
gotemcity
0 / 0 / 0
Регистрация: 04.11.2012
Сообщений: 25
04.11.2012, 17:59  [ТС] 19
а как тут в личку написать то?

 Комментарий модератора 
Все обсуждения ведутся на форуме!


Добавлено через 46 минут
А можно каким-нибудь образом в filelistbox передать файлы лежащие в определенной папе...т.е. чтобы при запуске программы там сразу был список файлов...например при нажатии кнопки...filelistbox заполнялся бы файлами из определенной папки?
0
dev.Free
Заблокирован
04.11.2012, 19:45 20
Цитата Сообщение от gotemcity Посмотреть сообщение
А можно каким-нибудь образом в filelistbox передать файлы лежащие в определенной папе...т.е. чтобы при запуске программы там сразу был список файлов...например при нажатии кнопки...filelistbox заполнялся бы файлами из определенной папки?
Visual Basic
1
File1.Path = "ТУТ ПУТЬ К ПАПКЕ"
И опять таки при загрузке формы или при нажатии на кнопку.
1
04.11.2012, 19:45
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.11.2012, 19:45

Как отобразить графические объекты из БД в PictureBox через ADO
Ну, собственно, суть вопроса в названии темы. PictureBox тоже обладает свойствами DataSource и...

Программно отобразить картинку из формы на кнопке
Ребята! у меня не получается загрузить на кнопку картинку которая находится на форме, делаю так не...

Как вставить в PictureBox картинку из базы?
И как вставить? Например картинку,сохраненную в SQL Server в поле типа Image или в MS Access в поле...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.