Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: Ever Cerna en Julio 12, 2013, 04:18:15 pm
-
Buenas, x acá molestándolos nuevamente
Esta vez necesito sacar la nombre de una imagen ya cargada en un PICTURE o IMAGE, osea extraerla, Por ejemplo si cargo una imagen de C:\Imagenes\Foto.jpg en un PICTURE, necesito que muestre en un LABEL, el nombre de la imagen ya cargada osea Foto. Estuve buscando por google y no encontre un ejemplo claro.
Espero sus ayudas, muchas gracias
Salu2.
-
no, para mi eso es imposible.
Lo que podes hacer es al momento de cargar la imagen, guardar en la propiedad "TAG" del control Picture, o Image, la ruta de la imagen y desp leerla
-
Se me ocurre asi:
Private Sub Form_Load()
Dim xFile As String
xFile = "c:\foto.jpg"
Picture1.Picture = LoadPicture(xFile)
Picture1.Tag = xFile
MsgBox xFile
End Sub
Saludos...
-
por lo que entendi, el quiere solo sacar el nombre del path, no el path entero...
para hacer eso hay muchisimas formas, desde apis que ya hacen eso hasta funciones comunes, aca te dejo algunas:
Private Declare Sub PathStripPath Lib "shlwapi.dll" Alias "PathStripPathA" (ByVal pszPath As String)
Public Function StripPath(ByVal sPath As String) As String
Call PathStripPath(sPath)
StripPath = sPath
End Function
otra forma:
Function getFileName(ByVal path As String) As String
getFileName = Mid$(path, InStrRev(path, "\") + 1)
End Function
otra forma.
Public Function GetFileName(ByRef vPath As String) As String
GetFileName = Right$(vPath, Len(vPath) - InStrRev(vPath, "\"))
End Function
saludos.