| Вопрос: filelistbox | Добавлено: 25.10.04 22:03 |
Автор вопроса:  Brane | ICQ: 229-058-321 |
| может кто знает как запретить отображение расширения в filelistbox'e |
| Ответы | Всего ответов: 6 |
|
Номер ответа: 1 Автор ответа:  someone Вопросов: 215 Ответов: 1596 |
Web-сайт: Профиль | | #1 | Добавлено: 25.10.04 22:12 |
|
вобщем смотри:
отчитываем 4 символа Private Sub File_Click() Dim A A = LCase$(Right$(FileEdit.FileName, 4)) а дальше : добавляеш в обычный листбокс: найти и удалить переменную A из текста и добавить в листбокс через AddItem просто код писать лень... |
||
|
Номер ответа: 2 Автор ответа: someoneВопросов: 215 Ответов: 1596 |
Web-сайт: Профиль | | #2 | Добавлено: 25.10.04 22:12 |
|
вобщем смотри:
отчитываем 4 символа Private Sub File_Click() Dim A A = LCase$(Right$(FileEdit.FileName, 4)) а дальше : добавляеш в обычный листбокс: найти и удалить переменную A из текста и добавить в листбокс через AddItem просто код писать лень... |
||
|
Номер ответа: 3 Автор ответа:  Brane ICQ: 229-058-321 Вопросов: 7 Ответов: 15 |
Профиль | | #3 | Добавлено: 25.10.04 22:19 |
| спасибо за ответ ,а мож апишки какие есть? | ||
|
Номер ответа: 4 Автор ответа: someoneВопросов: 215 Ответов: 1596 |
Web-сайт: Профиль | | #4 | Добавлено: 25.10.04 22:20 |
|
клава глючит...
вот самый правильный код Private Sub File_Click() Dim A A = LCase$(Right$(File.FileName, 4)) List1.AddItem File.FileName |
||
|
Номер ответа: 5 Автор ответа: CyRax  Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #5 | Добавлено: 26.10.04 03:37 |
| По моему он показывает в зависимости от системных настроек. Если у тебя в Windows разрешено показывать расширения, то и в списке они будут, ну и наоборот. | ||
|
Номер ответа: 6 Автор ответа: someoneВопросов: 215 Ответов: 1596 |
Web-сайт: Профиль | | #6 | Добавлено: 26.10.04 11:35 |
|
ну значит апишниками в винде перставлять на время работы твоей программы, а при DisActivate откл.
:^)
|
||
Страница: 1 |