Форум
Написать нам
  • Страница 1 из 1
  • 1
Модератор форума: as-master  
Загрузка пути к файлу в ЭдитБокс
toizyДата: Суббота, 07 Апреля 2007, 13:08 | Сообщение # 1
Студийная субстанция
Группа: Администраторы
Сообщений: 2309
Репутация: 29
Награды: 12
Статус: Offline
После команды OpenFile() пишем следующее:

Code
If (OpenFile$<>'') Then
LoadText("EditBox","STRING:OpenFile$")
End


Жизнь оказалась не такой уж и забавной, как поначалу...
 
Sam726Дата: Пятница, 22 Января 2010, 13:15 | Сообщение # 2
Поднаторевший
Группа: Проверенные
Сообщений: 141
Репутация: 0
Награды: 0
Статус: Offline
Поместить путь к папке в EditBox.
Code
BrowseForFolder("Выберите папку","")
open$=CBK_OpenDir
If (open$<>'') Then
     LoadText("EditBox","STRING:open$")
End




Сообщение отредактировал Mad-Dog - Пятница, 22 Января 2010, 20:29
 
SowerДата: Пятница, 22 Января 2010, 17:20 | Сообщение # 3
Ветеран форума
Группа: Проверенные
Сообщений: 916
Репутация: 11
Награды: 3
Статус: Offline
toizy, можно еще проще:
Code
If (OpenFile$<>'') Then
     DisplayValue("EditBox","OpenFile$")
End


Сообщение отредактировал Sower - Пятница, 22 Января 2010, 17:22
 
toizyДата: Суббота, 23 Января 2010, 01:02 | Сообщение # 4
Студийная субстанция
Группа: Администраторы
Сообщений: 2309
Репутация: 29
Награды: 12
Статус: Offline
Sower, я так написал, потому что был какой-то косяк. А какой - щас не вспомню :D

Жизнь оказалась не такой уж и забавной, как поначалу...
 
SowerДата: Суббота, 23 Января 2010, 05:43 | Сообщение # 5
Ветеран форума
Группа: Проверенные
Сообщений: 916
Репутация: 11
Награды: 3
Статус: Offline
Quote (toizy)
Sower, я так написал, потому что был какой-то косяк. А какой - щас не вспомню

Бывает :)
 
  • Страница 1 из 1
  • 1
Поиск: