Конференция VBStreets

**Kovu** » 01.02.2006 (Ср) 17:43

Почему если сделать

Код: Выделить всё: Dim rc As RECTf With rc .Left = 100 .Bottom = 300 .Right = 400 .Top = 100 End With Call GdipCreateFromHDC(mDC, graphics) Call GdipLoadImageFromFile(StrConv(pngPath, vbUnicode), img) Call GdipGetImageHeight(img, lngHeight) Call GdipGetImageWidth(img, lngWidth) Call GdipDrawString(graphics, "Xardas", 6, 0&, rc, ByVal 0&, 0&) Call GdipDrawImageRect(graphics, img, 0, 0, lngWidth, lngHeight)

Тескт так и не появляется, тогда как изображение нормально загружается ? :roll:

**Kovu** » 02.02.2006 (Чт) 12:22

Как всегда никто не знает, или знает но молчит как партизан... :roll:

**Viper** » 02.02.2006 (Чт) 12:24

версия: а изображение строку не перекрывает часом?

**Kovu** » 02.02.2006 (Чт) 12:43

Версия правильная, строка должна рисоваться НА изображении =)
Но тем не менее её там нема

P.S. Строка же рисуется после загрузки изображения, разве не так?

**GSerg** » 02.02.2006 (Чт) 14:30

Разве загрузка до рисования строки.
А разве рисование после.

**Kovu** » 02.02.2006 (Чт) 15:49

Код: Выделить всё: Call GdipLoadImageFromFile(StrConv(pngPath, vbUnicode), img) ' загружаем изображение в img Call GdipGetImageHeight(img, lngHeight) 'узнаем высоту изображения Call GdipGetImageWidth(img, lngWidth) 'узнаем ширину изображения Call GdipDrawString(graphics, "Xardas", 6, 0&, rc, ByVal 0&, 0&) 'рисуем строку Call GdipDrawImageRect(graphics, img, 0, 0, lngWidth, lngHeight) ' рисуем изображение 'если 2 последние строки поменять результат не изменится и появится только изображение, без текста

Скажите чего я не догоняю

**Kovu** » 02.02.2006 (Чт) 18:47

Ну помогите пожааалуйста :roll:

**GSerg** » 03.02.2006 (Пт) 5:45

Ты не указываешь font и brush.

**Kovu** » 03.02.2006 (Пт) 14:07

Хы помогло, спасибо

Очень порадовал автомультилайн

**Kovu** » 03.02.2006 (Пт) 15:39

Ещё вопросик: как сделать чтоб Alignment каждой строки был по центру, ибо вот этот код:

Код: Выделить всё: Call GdipStringFormatGetGenericDefault(LAlign) Call GdipSetStringFormatLineAlign(LAlign, StringAlignmentCenter) Call GdipDrawString(graphics, StrConv(ConstStr, vbUnicode), Len(ConstStr), hFont, rc, ByVal LAlign, hBrush)

рисует только первую часть строки по центру заданного ректа, а остальное под началом первой части ?

**Kovu** » 04.02.2006 (Сб) 18:21

Обидно, что никто не знает....
Ладно придется разбивать текст :roll:

**Amed** » 04.02.2006 (Сб) 18:26

Разбить текст на строки и выводить каждую в свой, рассчитанный, Rect? :/

**Kovu** » 04.02.2006 (Сб) 20:34

Разбить текст на строки,один раз определить рект а потом по нему OffsetRect'om проходится, правда гхм это не самый удачный выход

GdipDrawString