Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Resize slike (.jpg)

[es] :: Visual Basic 6 :: Resize slike (.jpg)

[ Pregleda: 2235 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

dava
Banja Luka

Član broj: 27208
Poruke: 893



+384 Profil

icon Resize slike (.jpg)28.02.2008. u 13:27 - pre 196 meseci
Da li neko zna na koji nacin bih mogao izvrsiti resize slike (jpg fajl) i snimanje iz VB koda?
SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: Resize slike (.jpg)28.02.2008. u 14:08 - pre 196 meseci
pa trebalo bi ovako nekako:
Code:

Dim pic As StdPicture

Set pic = LoadPicture("c:\slika.jpg", 0, 0, 400, 600) ' resizujes na 400x600
SavePicture pic, "c:\slika_resized.jpg"

mada nisam probao, to bi u teoriji tako radilo :)

inace ja sam za te stvari korisito gdi+
 
Odgovor na temu

dava
Banja Luka

Član broj: 27208
Poruke: 893



+384 Profil

icon Re: Resize slike (.jpg)28.02.2008. u 16:52 - pre 196 meseci
Ma probao sam ja tako ali nisam dobio zeljeni rezultat. Doduse nisam ti detaljnije objasnio problem. Imam gomilu slika (jpg fajlovi velicine ~2 MB) i nalaze se po folderima. Ja bih htio da pustim programcic koji ce protrcati kroz sve foldere (to sam napravio) i smanjiti im pixele sa 1600x1200 na 1024x768 pa i po mogucnosti DPI.

Code:

Set pic = LoadPicture("c:\Slika.jpg", 0, 0, 400, 600)
SavePicture pic, "c:\Slika_resized.jpg"

Ovako dobijem fajl pet puta veci???

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
91.148.113.*



+7 Profil

icon Re: Resize slike (.jpg)28.02.2008. u 17:24 - pre 196 meseci
SavePicture metod snima sliku u bmp (nekompresovanom) formatu bez obzira na ekstenziju koju stavis.
Tebi treba neki kod koji konvertuje i moze da snimi u JPG.
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: Resize slike (.jpg)28.02.2008. u 18:31 - pre 196 meseci
e da, to sam zaboravio da napomenem :)
SavePicture cuva fajl u formatu BMP, kao sto rece Eurora3D Team.

kao sto sam ti rekao, ja sam za te stvari koristio GDI+, potrazi na www.pscode.com i na www.vbaccelerator.com gdi+ type library, i videces kako mozes da koristis GDI+ u vb-u, ako ne nadjes u tim primerima to sto ti treba (risajzovajne slike) pogledaj na MSDN-u i trazi GDI+ Flat API, tu su ti objasnjene sve funkcije koje mozes da nadjes u pomenutoj type biblioteci
 
Odgovor na temu

[es] :: Visual Basic 6 :: Resize slike (.jpg)

[ Pregleda: 2235 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.