jueves, 21 de diciembre de 2006

Programando con .Net Framework 3.0 en VB

Bueno el día de hoy comenzaba con interés (como un niño con zapatos nuevos) puesto que tenía que programar con las extensiones de .Net Framework 3.0 para Visual Studio 2005 (WPF, WCF). La verdad es que el día ha acabado siendo un infierno. Algo tan simple como un par de paneles separados por un split se ha convertido en algo difícil de hacer.

Me he quedado algo desilusionado puesto que la facilidad que me proporciona VS 2005 para el desarrollo se ve reducida, cierto es que por el momento con lo que estamos trabajando son versiones Beta, que contienen ciertos bugs por depurar (por ejemplo, si añadimos un control en tiempo de diseño, me he dado cuenta que si intentamos implementar código para ese control, no podemos. Tenemos que o cerrar el proyecto y volverlo a abrir o compilarlo, y al volver voilá ya podemos, en fin esperemos que se solucione).

Otra de las cosas que no entiendo es, si el Framework 3.0 es un complemento del 2.0 puesto que no lo sustituye, porqué han desaparecido en las plantillas de WPF la gran mayoría de controles del Framework 2.0 (p.ej: NumericUpDown, ...)

En fin a lo largo del día de hoy intentaré cargar un formulario mdi con un TreeView. Ya os contaré mis evoluciones con este invento.

viernes, 24 de noviembre de 2006

Cargar un Combobox con archivos de un directorio

Para cargar el combo necesitamos decirle en que directorio se encuentran los archivos que vamos a cargar. Después declaramos un array de cadenas donde almacenaremos los nombres de los archivos. En el caso de que necesitemos borrar uno de los archivos tendremos eliminar los ítems del combo y volver a recargarlo, si no hacemos esto tendremos nombres de archivos en el combo que no existen en el directorio, con lo que nos puede llevar a la confusión.
Por último añadimos al combo los nombres de los ficheros sin la extensión y hacemos que salgan ordenados.

Try
Dim Directorio As String = Application.StartupPath & "\MODELOS"
'Filtramos el tipo de archivos que queremos añadir al combo
Dim DirFiles() As String = Directory.GetFiles(Directorio, "*.rtf")
'Borramos los ítems para no añadir repetidos al recargarlo
cbModelos.Items.Clear()
For x As Integer = 0 To DirFiles.Length - 1
'Añadir al combo
cbModelos.Items.Add(DirFiles(x).Substring(Directorio.Length + 1, DirFiles(x).Length - Directorio.Length - 5))
Next
cbModelos.Sorted = True
Catch ex as Exception
msgbox (ex)
End Try

Desarrollo de Aplicaciones

Este blog surge como respuesta a mis inquietudes en el mundo de la programación y por el momento estará enfocado al desarrollo con Visual Basic 2005.