Miten tallennetaan screenshotti jpg muotoon, tai miten tallennetaan screenshotti ylipäätäänsä?
Toi koodi ottaa kuvan ja tallentaa.
edit:Kannattaa pitää image lootassa kuva, muuten tulee vain picture Boksin kokoinen kuva.
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Const myScreen = 0 Const myForm = 1 Private Sub Command1_Click() 'Ottaa Sreenshotin keybd_event vbKeySnapshot, myScreen, 0&, 0& Image1.Picture = Clipboard.GetData(vbCFBitmap) 'Tallentaa kuva SavePicture Image1.Picture, "c:\Kuva.bmp" End Sub
VB:llä ei voi tallentaa (muuntaa) jpg-muotoon. Tarvitaan jokin kuvankäsittelyohjelma.
taikka vaikka joku kirjasto joka auttaa. muistin joskus jonkun mutten enää... mut kyllä se mahdollista on.
Jeps, Googlellahan se löytyi heti (visual basic, jpg)
oki, täytyy mennä testailemaan, kiitos
Petrinm, tosta sun koodista puuttuu savepicture funkkarin määrittely. Eli mikä se määrittely on...sori oon vähän tyhmä en jaksa mistään ettii enkä vääntää.
SavePicture on VB:n oma käsky.
Saves a graphic from the Picture or Image property of an object or control (if one is associated with it) to a file.
Syntax
SavePicture picture, stringexpression
Aihe on jo aika vanha, joten et voi enää vastata siihen.