Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB6: VB Picture scaalaus + Talletus

JoreSoft [14.06.2005 20:38:33]

#

Elikkä olis ongelma. ;)
kuinka saan kuvan koon muutettua siten että voin tallettaa siitä vain osan ?
Isoon kuvaan on vasempaan yläkulmaan laitettu grafiikkaa bitblt-funktiolla. Alla oleva koodi kyllä muuttaa kuvan oikeaan kokoon, mutta tallettaa siitä huolimatta kuvan isona.

fAddObj!p1.Width = (Objekti(CurObj).SizeX + 1) * 20 * 15
fAddObj!p1.Height = (Objekti(CurObj).SizeY + 1) * 20 * 15
SavePicture fAddObj!p1.Image, PrjPath & "\" & Objekti(CurObj).S & ".bmp"

Olen yrittänyt muuttaa kuvan width,height ja scalewidth/scaleheight arvoja, mutta mikään ei tunnu auttavan....
Kuvassa fAddObj!p1 ei ole "pohjalla" kuvaa...

tuomas [14.06.2005 20:55:12]

#

En ole nyt varma ymmärsinkö oikein ongelmasi. Savepicture taitaa tallettaa kuvan sen kokoisena, kuin picturelaatikko on. Mikäli siis virheenä oli se, että myös tyhjää tallentuu, muuta myös laatikon kokoa. Kuvan koon muuttelussa kannattaa käyttää StretchBlt apia: https://www.ohjelmointiputka.net/koodivinkit/24429-vb6-stretchblt

JoreSoft [14.06.2005 21:13:01]

#

Olet oikeassa, juuri se on ongelma.
Vaikka kokoa on jälkikäteen muutettu vastaamaan aluetta, joka pitäisi saada talletettua omana kuvanaan.
Kunka saan ton laatikon koon muutettua kans vastaamaan talletusaluetta..?

Merri [14.06.2005 23:56:00]

#

Humm... kokeile piruuttaan

Set fAddObj!p1.Picture = fAddObj!p1.Image
SavePicture fAddObj!p1.Picture ...

Itse tosin suosisin API:n käyttöä vähän enemmänkin.

JoreSoft [15.06.2005 12:19:58]

#

CreateCompatibleBitmap APIa yritin käyttää, mutta sekään ei tuonut toivottua tulosta...

JoreSoft [15.06.2005 20:07:27]

#

Eikö kukaan ole halunnut tallettaa pictureboxista jotain osaa? ;)
Gurut auttakaa ihmeessä...

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta