Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 | 3 |

 

  Вопрос: Деревья в VB Добавлено: 17.10.04 18:02  

Автор вопроса:  Kevin Mitnik | ICQ: 205559551 

Ответить

  Ответы Всего ответов: 34  

Номер ответа: 31
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #31 Добавлено: 25.10.04 12:37
ПАВЕЛ! Вот переработал твой пример и... заработало! Спасибо тебе большое!

[CODE]Dim img As System.Drawing.Image =
System.Drawing.Image.FromFile(Server.MapPath("simple.jpg"))

Dim G As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(img)

G.DrawImage(img, 0, 0)

G.DrawString("Хе-хе-хе!", New Font("Tahoma", 8), New
SolidBrush(System.Drawing.Color.Red), 10, 10)

img.Save(Response.OutputStream,
System.Drawing.Imaging.ImageFormat.Jpeg)[CODE]



Но... :)

Появилась пара проблемок

1. Почему-то, если надпись выходит за пределы рисунка или просто длинная -
ASP.NET перестает отвечать браузеру и он попросут очень долго ждет

2. У меня не получилось поменять формат рисунка (я ведь не буду счетчик
JPEG'ом дклать :) )

Ответить

Номер ответа: 32
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #32
Добавлено: 25.10.04 15:28
Дебаггером по коду пройдись... Или заключи код в Try...Catch...End Try
и в блоке Catch выводи на страницу описание ошибки...

Ответить

Номер ответа: 33
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #33
Добавлено: 25.10.04 15:29
Про формат файла забыл ответить :)

Во втором параметре метода Save можно свободно выбирать формат
рисунка.

Ответить

Номер ответа: 34
Автор ответа:
 ZagZag



ICQ: 295002202 

Вопросов: 87
Ответов: 1684
 Профиль | | #34 Добавлено: 25.10.04 17:11
Получилось!!!


Dim bmp As New System.Drawing.Bitmap(88, 31)

Dim G As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(bmp)

G.DrawString("Павел, ты молодец!", New Font("Small Fonts", 7), New
SolidBrush(System.Drawing.Color.White), 0, 0)

G.DrawString("Спасибо огромное!!!", New Font("Small Fonts", 7), New
SolidBrush(System.Drawing.Color.Red), 0, 10)

bmp.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Gif)



Ответить

Страница: 1 | 2 | 3 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам