Загрузка пути к файлу в ЭдитБокс

Страница 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, я так написал, потому что был какой-то косяк. А какой - щас не вспомню

Жизнь оказалась не такой уж и забавной, как поначалу...

Sower

Дата: Суббота, 23 Января 2010, 05:43 | Сообщение # 5

Ветеран форума

Группа: Проверенные

Сообщений: 916

Репутация: 11

Награды: 3

Статус: Offline

Quote (toizy)

Sower, я так написал, потому что был какой-то косяк. А какой - щас не вспомню

Бывает

Загрузка пути к файлу в ЭдитБокс

Страница 1 из 1
1