Da li neko zna na koji nacin bih mogao izvrsiti resize slike (jpg fajl) i snimanje iz VB koda?
Potpis
SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
Resize slike (.jpg)
Zaključano
Zakačeno
pa trebalo bi ovako nekako:
mada nisam probao, to bi u teoriji tako radilo :)
inace ja sam za te stvari korisito gdi+
Code:
Dim pic As StdPicture
Set pic = LoadPicture("c:\slika.jpg", 0, 0, 400, 600) ' resizujes na 400x600
SavePicture pic, "c:\slika_resized.jpg"
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+
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.
Ovako dobijem fajl pet puta veci???
Code:
Set pic = LoadPicture("c:\Slika.jpg", 0, 0, 400, 600)
SavePicture pic, "c:\Slika_resized.jpg"
Set pic = LoadPicture("c:\Slika.jpg", 0, 0, 400, 600)
SavePicture pic, "c:\Slika_resized.jpg"
Ovako dobijem fajl pet puta veci???
Potpis
SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
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.
Tebi treba neki kod koji konvertuje i moze da snimi u JPG.
Potpis
HomePage http://www.eurora3d.com
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
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