Jag hittade en kod på filarean för att zooma en bild men får den inte att fungera. Vet någon en korrekt kod och där inte den zoomade bilden visas i en ny form?

_KAn du inte berätta vilken fil du använder. Så vi kan hjälpa dig?

<tomt>

JA det var ju mycket enklare än att hålla på en massa deklarationer i modul. Tack så mycket.

Man kan använda PaintPicture för att förstor. Du kan då använda ett formulär eller PictureBox's Image egenskap som källa.

Laggt upp ett litet exempel i filarena som visar en miniatyr i ett separat fönster av huvudfönstret:
Programarkivet:Zooma med PaintPicture

Är det nåt mer du önskar då det gäller
zoomandet, så kan du väl precisera detta.

Annars är det väl idé att markera tråden
som LÖST?

(Tyvärr får jag ett felmeddelande när jag
försöker köra Andreas proj.
Nån fler som får detta?
Dessutom ser jag inte vad det är som du
vill tillföra egentligen, Andreas?)

/ChristerGbg

<tomt>

Egentligen är det väl t o m lite överambitiöst med
en app. i Filarean, enbart för att förklara hur man
zoomar en bild i VisualBasic.

Man...

... lägger bilden i en ImageBox (Image1)

...sätter <code> Image1.Stretch = True</code>
...skriver in i koden:
<code>Image1.Height = Image1.Height * K
Image1.Width = Image1.Width * K </code>
där K>1 om man vill zooma ut (större bild)
eller K<1 om man vill zooma in (mindre bild).

"Voila", som en franseuse skulle ha uttryckt det. :-)

/ChristerGbg

Tagit bort den för att gör er glad.
Hittar ni något mer att klaga över så är det bara att säga till.

<tomt>