Страница: 1 |
Страница: 1 |
Вопрос: Проблема с файлами
Добавлено: 20.12.05 17:57
Автор вопроса: mr_Frank | Web-сайт:
Помоготи, нужно сделать чтобы при открытии текстового документа открывалась моя прога и загружала этот текстовый документ в текстовое поле. заранее спасибо.
Ответы
Всего ответов: 8
Номер ответа: 1
Автор ответа:
User Unknown
Вечный Юзер!
ICQ: uu@jabber.cz
Вопросов: 120
Ответов: 3302
Профиль | | #1
Добавлено: 20.12.05 18:04
1. В реестре поправь ассоциации на txt/Command/Open/Твоя прога %n
2. В проге через Command читай путь к файлу и открывай его.
Номер ответа: 2
Автор ответа:
SerJ
Вопросов: 24
Ответов: 332
Профиль | | #2
Добавлено: 20.12.05 18:08
При открытии из чего? Из винды? Если из винды, то тогда пропиши в реестре в ветви
в параметре "Значение по умолчанию" путь к твоей проге. А когда твоя прога запустится, читай параметры коммандной строки (Command$) - там будет имя тектового файла. А там уже ч/з open,get,input,print.... делай с ним что хочешь.
Номер ответа: 3
Автор ответа:
mr_Frank
ICQ: 316417
Вопросов: 36
Ответов: 94
Web-сайт:
Профиль | | #3
Добавлено: 20.12.05 18:16
а как это сделать то?
Номер ответа: 4
Автор ответа:
Dushes
ICQ: 249195431
Вопросов: 8
Ответов: 110
Профиль | | #4
Добавлено: 20.12.05 18:30
На событии Form_Load или в Sub Main(). Смотря, что у тебя стартовое в проекте.
Например
Private Sub Form_Load()
твоя_процедура_открытия Command
End Sub
Номер ответа: 5
Автор ответа:
SerJ
Вопросов: 24
Ответов: 332
Профиль | | #5
Добавлено: 20.12.05 18:32
Dim MyPath As String
Dim fl As Integer
Dim Dat As String
MyPath = Command$
fl = FreeFile
List1.Clear
Open MyPath For Input As #1
Do While Not EOF(1)
Input #1, Dat
List1.AddItem Dat
Loop
Close #1
Номер ответа: 6
Автор ответа:
LamerOnLine
ICQ: 334781088
Вопросов: 108
Ответов: 2822
Профиль | | #6
Добавлено: 20.12.05 18:46
2Dushes на Form_Load лучше не вешать длительные процессы. Сначала отобразить форму, а потом уже занимать систему всякой дрянью. Если уж совсем круто - Splash.
2SerJ А зачем объявлял fl ?
Номер ответа: 7
Автор ответа:
SerJ
Вопросов: 24
Ответов: 332
Профиль | | #7
Добавлено: 20.12.05 18:53
Ааа... Ну да. Вместо #1 надо поставить fl
Или вааше убрать Dim fl As Integer
Номер ответа: 8
Автор ответа:
Dushes
ICQ: 249195431
Вопросов: 8
Ответов: 110
Профиль | | #8
Добавлено: 21.12.05 07:42
2LamerOnLine
А в случаях больших загрузок я юзаю волшебное слово Show в Form_Load(), а потом гружу. А Form_Activate() - там нужно же смотреть за тем, что форма именно в первый раз показывается. А то каждый раз когда Visible формы становится true, происходит енто событие.