Модераторы: Partizan, gambit
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как записать данные в hex-формате? 
:(
    Опции темы
Dykson
Дата 15.7.2009, 22:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 15.7.2009

Репутация: нет
Всего: нет
Придумал я супер алгоритм сжатия - а толку то? До массивов не добрался (по самоучителю), а уже "хочется". Помогите, если нетрудно, парой строчкой кода. 


Код

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OpenFileDialog1.ShowDialog()
        Dim Файл As String = OpenFileDialog1.FileName
        Dim Чтение As New System.IO.StreamReader(Файл)
        Debug.WriteLine(Чтение.ReadToEnd)
        Чтение.Close()

    End Sub
End Class


После нажатия на кнопку "Открыть" - куда и как записать данные (в массив?), причём в hex-формате?..

Модератор: Название темы должно отражать ее суть!

Это сообщение отредактировал(а) Partizan - 16.7.2009, 23:13
PM MAIL   Вверх
wester
Дата 15.7.2009, 23:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 675
Регистрация: 27.2.2009

Репутация: 3
Всего: 13
так и не понял при чем тут архиватор....

а что тут не понятно , ты читаешь файл Stream -ом и выводишь его , больше ничего 

с помощью StreamWriter , можешь записать данные в файл....


ну или в String переменную
Код

String File = Чтение.ReadToEnd()


Это сообщение отредактировал(а) wester - 15.7.2009, 23:30
PM MAIL   Вверх
diadiavova
Дата 16.7.2009, 00:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 18
Всего: 142
Код

Function GetHexArray(ByVal flename As String) As String()
    Dim rdr As New SteamReader(filename)
    Dim hexList As New List(Of String)
    While Not rdr.EndOfStream
        hexList.Add(rdr.Read().ToString("x"))
    End While
    rdr.Close()
    Return hexList.ToArray()
End Function

Передашь этой функции имя файла - она возвратит нужный тебе массив ...в формате hex smile 


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Dykson
Дата 16.7.2009, 11:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 15.7.2009

Репутация: нет
Всего: нет
Короче я так понял , мне ещё читать и читать...   Ну что ж, пойду почитаю.
 smile smile 

Это сообщение отредактировал(а) Dykson - 16.7.2009, 11:03
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Прежде чем создать тему, посмотрите сюда:
Partizan
PashaPash
Используйте теги [code=csharp][/code] для подсветки кода. Используйтe чекбокс "транслит" если у Вас нет русских шрифтов.
Что делать если Вам помогли, но отблагодарить помощника плюсом в репутацию Вы не можете(не хватает сообщений)? Пишите сюда, или отправляйте репорт. Поставим :)
Так же не забывайте отмечать свой вопрос решенным, если он таковым является :)

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, mr.DUDA, Partizan, PashaPash.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | .NET для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.2047 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.