| Вопрос: Деревья в VB | Добавлено: 17.10.04 18:02 |
Автор вопроса:  Kevin Mitnik | ICQ: 205559551 |
| Ответы | Всего ответов: 34 |
|
Номер ответа: 16 Автор ответа:  CyRax   Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #16 | Добавлено: 21.10.04 05:16 |
| Проверил тут. Мой упаковщик пакует в 2 раза быстрее чем тот что ты мне выслал. | ||
|
Номер ответа: 17 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #17 | Добавлено: 21.10.04 10:48 |
|
CyRax, можешь мне эти GIF-заготовки скинуть, я все мучаюсь с ASP
Response.WriteBinary, можно зделать чтобы АСП выводила динамически формируемый рисунок, но вот карту рисунка я найти так и не могу 
Есть карта BMP, но там какое-то смещение - нифига не получается Скить примеры по форматам рисунков на zagzag2003@mail.ru, PLS! |
||
|
Номер ответа: 18 Автор ответа: mc-blackICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #18 | Добавлено: 21.10.04 16:02 |
|
2 CyRax: Спасибо, за статью. Читал, читал.. Проверить в работе пока не было возможности - на работе VB нет
|
||
|
Номер ответа: 19 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #19 | Добавлено: 21.10.04 16:30 |
|
2ZagZag: вообще, для рисования картинок в ASP применяют ActiveX...
А вот в ASP .NET с этим намного проще! |
||
|
Номер ответа: 20 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #20 | Добавлено: 21.10.04 17:55 |
|
Павел, а у тебя есть пример на ASP.NET? Я повозился, но там же практически
другой синтаксис, ежели на VB 
А контролы я сторонние не люблю, стандартных вроде нет
Да и ставить свои контролы не везде разрешено Эхх... как мы с тобой вдвоем темы с курса сбивать любим
|
||
|
Номер ответа: 21 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #21 | Добавлено: 21.10.04 18:02 |
|
Особо конкретного нет... Но вот кусок кода из жизни.
Dim counter As New clsSimpleCounter(Server.MapPath("counters\simple.bmp"
 )
Dim pic() As Byte = counter.PaintSimlpeCounter(Convert.ToInt64(dr.Item("hosts" ), Convert.ToInt64(dr.Item("hits"), Convert.ToInt64(dr.Item("allhits"))
Response.Clear() Response.BinaryWrite(pic) Response.ContentType = "image/png" Response.End() Класс clsSimpleCounter рисует картинку средствами GDI+ и конвертит ее в png. А далее просто выводим ее в Response. Рисование картинки ничем особо замечательным не выделяется: используются классы Drawing, Bitmap, Image и т.д. |
||
|
Номер ответа: 22 Автор ответа: CyRax Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | | #22 | Добавлено: 22.10.04 02:00 |
|
Упустил один важный момент при написании статьи.
Вот здесь: Пример: 55...0...24...[99...133]...125...44...178...1...102...[999... Нужно уточнить что при расширении типа должна обязательно идти пара [Максимальное число текущего диапазона...Число следующего диапазона]. Причём Максимальное число текущего диапазона может встречаться в текущем диапазоне только один раз. Сразу же за ним должно идти число расширяющее тип. В противном случае упаковщик и распаковщик не поймут друг друга. Максимальное число текущего диапазона можно потом применять в следующем диапазоне. Оно уже не повлияет на расширение типа. При паковке данных следует учесть это правило. Примечание. Данное правило никак не связанно с алгоритмом LZW, так как в нём данные идут строго последовательно и меньшее число не может идти после большего. Каюсь. Надеюсь добрая администрация (ну не подхалим ли я? ) разрешит сделать обновления в статье.
|
||
|
Номер ответа: 23 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #23 | Добавлено: 23.10.04 18:16 |
|
ПАВЕЛ, ну скинь пожалуйста пример на ASP.NET!!!
Я целый час мучаюсь только с одной вещью: Как мне рисунок сгенерировать/загрузить из файла и отобразить средствами ASP.NET в браузере??? Ну не знаю я этого ASP.NET! Никак не могу из Drawing.Image в массив из Byte перевести
Скажи как хоть это сделать? |
||
|
Номер ответа: 24 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #24 | Добавлено: 23.10.04 20:45 |
|
Насколько я помню, можно прямо в Response.OutputStream сохранить
содержимое Image с помощью Image.Save... Если не так, то скажи, проверю в MSDN... |
||
|
Номер ответа: 25 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #25 | Добавлено: 24.10.04 11:04 |
|
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load 'Put user code to initialize the page here Dim img As Drawing.Image Dim strm As IO.Stream img.FromFile(Server.MapPath("simple.jpg" )
Response.Clear() Response.ContentType = "image/jpeg" img.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg) ' <= ОШИБКА Response.End() End Sub Если делать так как я тебя понял Выдает ошибку "Object reference not set to an instance of an object" Чего там SET надо? |
||
|
Номер ответа: 26 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #26 | Добавлено: 24.10.04 11:32 |
|
img = Image.FromFile(Server.MapPath("simple.jpg")
|
||
|
Номер ответа: 27 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #27 | Добавлено: 24.10.04 20:29 |
|
Павел, я это уже делал - работало... НО
Я ведь еще и обрабатывать хочу. Типа циферки дописать, буковки... Следовательно - надо его сначала в image загружать, обрабатывать, а потом записывать в response |
||
|
Номер ответа: 28 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #28 | Добавлено: 25.10.04 08:52 |
|
Я тебе просто ответил, где в твоем коде ошибка...
Плиз, поконкретнее вопросы задавай... А-то на вопрос вроде "как нарисовать картинку" я корректно ответить не могу. |
||
|
Номер ответа: 29 Автор ответа: ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #29 | Добавлено: 25.10.04 11:12 |
|
Понимаю... математики
Я ведь и не спрашивал как мне нужно рисовать картинку...
Я спрашивал вот про что Этот код позволяет ЗАГРУЗИТЬ картинку и СОХРАНИТЬ ее В другой ФАЙЛ, так? Да! Dim img As System.Drawing.Image img = System.Drawing.Image.FromFile(Server.MapPath("simple.jpg" )
img.Save(Server.MapPath("!simple.jpg" )
А мне нужен код чтобы ЗАГРУЗИТЬ картинку, МОДИФИЦИРОВАТЬ* ее и СОХРАНИТЬ в Response (т. е. бинарно отправить браузеру файл в таком виде, в катором он бы сохранился на диске) * - Модифицировать прийдется обязательно, но этот код можешь не подсказывать Если сможешь пришли класс clsSimpleCounter из твоего примера PS А если совсем конкретизировать вопрос, то я делаю счетчик, который за основу берет файл из папки (JPEG взят просто для примера, я понимаю что он не подходит для хороших счетчиков) |
||
|
Номер ответа: 30 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #30 | Добавлено: 25.10.04 11:29 |
|
Создай экземпляр класса Bitmap, из этого Bitmap'а создай Graphics, и уже на нем рисуй.
Вот пример:  im img As Image = Image.FromFile(Pattern)
im bmp As Bitmap
bmp = New Bitmap(img.Width, img.Height) im G As Graphics
G = Graphics.FromImage(bmp) G.DrawImage(img, 0, 0) im myFont As New Font("Tahoma", Single.Parse(6.5), FontStyle.Regular)
im strTemp As String = "Test"
G.DrawString(strTemp, myFont, New SolidBrush(Color), 0, 22) bmp.Save(Response.OutputStream) |
||