hur fixar ja så att ja kan bestämma bild till en imagebox <code> hur gör jag för o spara bilden som jag har plockat frm till bildrutan? I princip efter detta.commondialog
med commondialog
jag behöver kunna öppna o välja en bild till en picture eller en image ruta
// TobbenSv: commondialog
Dim Pic As String
On Error GoTo OpenError
cmDialog.Filter = "Bild|*.jpg"
cmDialog.InitDir = PicFile
cmDialog.DefaultExt = "*.jpg"
cmDialog.DialogTitle = " Öppna Picfil"
cmDialog.Flags = &H1000
cmDialog.FileName = ""
cmDialog.ShowOpen
Pic = cmDialog.FileName
Picture1.Picture = LoadPicture(Pic) ' Alt
'Image1.Picture = LoadPicture(Pic)
</code>Sv:commondialog
///tobbenSv: commondialog
<code>
CmDialog.DialogTitle = " Spara som..."
CmDialog.Flags = &H2
CmDialog.FileName = ""
CmDialog.ShowSave
SaveNamePic = CmDialog.FileName
</code>