Paquete de iconos para Bennu

[josebita]

Una nueva aportación de iconos para BennuGD. Se aceptan comentarios/mejoras.


Un saludo

La verdad es que están muy bien y son muy elegantes, aunque hay un par de formatos que ni me suenan :)

Yo en linux uso un tema oscuro así que pegan bastante bien, lo que no sé es cómo pegarán con los colores supper-happy del windows.

[SplinterGU]

estan lindos, pero no le veo utilidad practica... en el sentido de que no se como instalarlos... estaria bien que vengan con un pack o un instructivo de instalacion...

[izubiaurre]

Tengo un paquete de iconos hecho desde esos gráficos, y lo uso como tales. En Linux no sé cómo se registran las extensiones con los iconos, pero en Win, yo me valgo del fbmx que lo hace automáticamente. Si os interesa los subo también, aunque no tenía intención de subirlo hasta que tuviese todo como debería. Por ejemplo, no estoy muy seguro de que los maps y fpgs estén muy conseguidos.


Un saludo

[SplinterGU]

si tenes alguna forma de registrarlos, quizas con un script, seria fantastico que lo incluyas... aunque sea para windows... asi no queda como un simple "que bonitos iconos!"

[izubiaurre]

si tenes alguna forma de registrarlos, quizas con un script, seria fantastico que lo incluyas... aunque sea para windows... asi no queda como un simple "que bonitos iconos!"

Hay meter unos keys en el registro de windows:

Code Select Expand



'ASSOCIATES A FILETYPE WITH YOUR PROGRAM. IT USES THE COMMAND, " %1", TO LOAD FILE IN YOUR PROGRAM
Public Sub RegisterType(ByVal sExt As String, ByVal sName As String, ByVal sConType As String, ByVal sDescription As String, ByVal Icon As String, Optional Executable As String)
    If Executable = "" Then
        Executable = App.Path & "/" & App.EXEName & ".exe %1"
    End If
   
    If Left(sExt, 1) <> "." Then sExt = "." & sExt


    Call CreateKey(HKEY_CLASSES_ROOT, sExt, "", sName)
    Call CreateKey(HKEY_CLASSES_ROOT, sExt, "Content Type", sConType)
    Call CreateKey(HKEY_CLASSES_ROOT, sName, "", sDescription)
    'Call CreateKey(HKEY_CLASSES_ROOT, sName & "\DefaultIcon", "", App.Path & "\" & App.EXEName & ".exe," & iResIcon)
    Call CreateKey(HKEY_CLASSES_ROOT, sName & "\DefaultIcon", "", Icon)
    Call CreateKey(HKEY_CLASSES_ROOT, sName & "\Shell", "", "")
    Call CreateKey(HKEY_CLASSES_ROOT, sName & "\Shell\Open", "", "")
    Call CreateKey(HKEY_CLASSES_ROOT, sName & "\Shell\Open\Command", "", Executable)
   
    SHChangeNotify SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0
End Sub



En fbmx hay una opción para registrarlos y se basa en esta función. Yo los hago así ya que es la forma más fácil. De otra manera hay que hacerlo manualmente, en WinXP, ya que en Win7 no lo he encontrado esa opción, en el explorador->opciones de carpeta->tipos de archivo-> e ir metiendo las extensiones a mano, y asignarle un icono y una aplicación que los abra. No sé cómo hacer un script sobre eso.


Un saludo

[SplinterGU]

puedes hacer un .vbs o luego intentare con un bat o cmd.

por favor, si me olvido para el fin de semana proximo, recuerdamelo.

[izubiaurre]

Tampoco tengo ni idea de VBscript. Bueno no sé si tengo o no. Supongo que será parecido a VB, pero nunca lo he probado. Además voy a estar inoperativo durante 3-4 semanas ya que tengo horario mañana-tarde y noche. Así que mi productividad a cuanto a esto va a ser cercano al 0%. Tengo que preparar las clases de mañana.


Un saludo

[SplinterGU]

igual a vb... y vb es algo que si sabes...

[hardyx]

Muy bonitos los iconos, para registrarlos se puede crear un fichero .reg con las claves de registro y con doble click se registran. Puede ser mejor que un script VBS, ya que algunos antivirus los bloquean.

[izubiaurre]

Muy bonitos los iconos, para registrarlos se puede crear un fichero .reg con las claves de registro y con doble click se registran. Puede ser mejor que un script VBS, ya que algunos antivirus los bloquean.

Estoy con ello. Además he pulido algunos de los iconos que estaban un poco fuera del estilo general.

[izubiaurre]

¿Al final se hizo algo con lo de los iconos?

[SplinterGU]

quedo olvidado entre mis pendientes...

anotare ya mismo...

[izubiaurre]

Hice pruebas para registrar los iconos pero no sabía cómo cambiar el directorio (path) de un archivo .reg

[SplinterGU]

con la info que pusiste yo me arreglo, la cosa es que tengo pilas de cosas atrasadas...

pero puedes armar las strings en runtime, y setearlas al directorio donde tengas los iconos desde el VB o tambien incluso poner los iconos en un directorio fijo y el .reg fijo.

[izubiaurre]

Estuve trasteando un poco con el registro y me suena que las cosas tenían que ser parecidos a este texto:

Code Select Expand


Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\.cpt]
@="FlameBird.ControlPoint"
"Content Type"="Text"

[HKEY_CLASSES_ROOT\.cpt\DefaultIcon]
@="Z:\\Users\\Imanol\\Desktop\\Bennu on Work\\Icons\\prg.ico"