Страница: 1 |
Страница: 1 |
Вопрос: Блокнот
Добавлено: 20.09.05 06:17
Автор вопроса: Dron | ICQ: 331667224
Делаю програмку типа стндартного блокнота
застрял на одном месте в реестре прописал
путь к зтому блокноту при открытии "txt"
файлов он запускается но не отображает
содержимое текстового файла на могу понять
как надо дальше делать может кто знает
Ответы
Всего ответов: 6
Номер ответа: 1
Автор ответа:
Morpheus
Вопросов: 224
Ответов: 3777
Web-сайт:
Профиль | | #1
Добавлено: 20.09.05 06:25
а я задавал уже кажись. вот:
http://www.vbnet.ru/forum/show.aspx?id=18425
кстати, а как ты собираешься обрабатывать AcceptFiles, когда фалйы перетаскиваются на прогу мышкой??
Номер ответа: 2
Автор ответа:
Dron
ICQ: 331667224
Вопросов: 7
Ответов: 10
Профиль | | #2
Добавлено: 20.09.05 11:12
Совсем забыл про командную строку.
При открытии текстового файла передается путь к файлу.
Не знаю правильно ли я сделал, но код работает
Может кому-нибудь пригодится.
Dim L As Long ' Количество символов
Dim D As String 'Путь к файлу
Private Sub Form_Load()
F = FreeFile
If Len(Command) Then
L = Len(Command) 'определяем количество символов
  = Mid(Command, 2, L - 3) 'убераем ковычки
Open D For Input As F
txtText.Text = Input(LOF(F), F) 'Считываем текст из файла в текстовое поле
Close F
Else
Exit Sub
End If
End Sub
Номер ответа: 3
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #3
Добавлено: 20.09.05 11:23
Надо в реестр записывать ""disk:\path\exename.exe" "%1"". У тебя так?
Номер ответа: 4
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #4
Добавлено: 20.09.05 11:23
Аперидил
Номер ответа: 5
Автор ответа:
Dron
ICQ: 331667224
Вопросов: 7
Ответов: 10
Профиль | | #5
Добавлено: 21.09.05 05:36
Да у меня так но это прога будет просто запускаться
не отображая текст файла.
Смотри мой код выше я думаю, что так далжно быть
в принцепе гловное что он работает
Номер ответа: 6
Автор ответа:
BV
ICQ: 302392161
Вопросов: 2
Ответов: 28
Профиль | | #6
Добавлено: 26.09.05 06:36
Командные строки парсить надо. Если не на несколько файлов, то как минимум на несколько ключей.
Ко всем, кто делает "Блокнот".
Решили вы таки как задавать поля текста при печати на принтер?