Hola foro,
Al abrir una carpeta en Windows se puede seleccionar una columna que te indica las dimensiones de una imagen.
Como puedo extraer ese dato desde FWH? o en otras palabras, como puedo saber la dimensiones de una imagen sin tener que abrirla?
De antemano gracias.
DEFINE IMAGE oTmp FILENAME cLogo
nLW := oTmp:nWidth()
nLH := oTmp:nHeight()
oTmp:End()
...
..
.Gracias por tu respuesta Willi, aunque no es lo que buscaba, se me hace buena idea lo que me sugieres.
Yo buscaba alguna funcion como el FileStats() de xHarbour que te da mas informacion de los archivos.
/*------------------------------------------------------------------------------*/
*STATIC Function GetPropFile( oWnd, cFile )
/*------------------------------------------------------------------------------*/
/*
LOCAL oActiveX, pStatus := Array( 11 )
oActiveX = TActiveX():New( oWnd, "MediaPlayer.MediaPlayer.1",0,0,0,0)
oActiveX:SetProp( "FileName", cFile )
oActiveX:Hide()
pStatus[1] := cFileNoPath( oActiveX:GetProp( "FileName" ) ) // Nombre del fichero
pStatus[2] := cFilePath( oActiveX:GetProp( "FileName" ) ) // Path
pStatus[3] := oActiveX:GetProp( "Duration" ) // Duracion
pStatus[4] := oActiveX:GetProp( "ImageSourceWidth" ) // Ancho fotograma
pStatus[5] := oActiveX:GetProp( "ImageSourceHeight" ) // Alto fotograma
pStatus[6] := oActiveX:GetProp( "BandWidth" ) // Velocidad de datos
pStatus[7] := oActiveX:GetProp( "Rate" ) // Velocidad fotogramas/s
pStatus[8] := oActiveX:GetProp( "SourceProtocol" ) // Protocolo de datos
pStatus[9] := FDate( oActiveX:GetProp( "FileName" ) ) // Fecha creacion
pStatus[10] := FTime( oActiveX:GetProp( "FileName" ) ) // Hora creacion
pStatus[11] := FSize( oActiveX:GetProp( "FileName" ) ) // Tamaño
oActiveX:DO( "Stop" )
oActiveX:End()
DeleteObject( oActiveX )
Return( pStatus ) @ 58,0 ACTIVEX oActiveX PROGID "MediaPlayer.MediaPlayer.1" OF oWndV SIZE 400,400