Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Eleкtro

#6101
Cita de: rochro en 18 Noviembre 2014, 17:57 PMse me ocurre si hay alguna manera de que grabe los datos del textbox y por mas que se cierre y vuelva a abrir aparece con esos valores hasta que se cambie.

Hay muchas maneras de hacer eso, lo que más sencillo te resultará es utilizar la infrastructura de My.Settings.

Puedes crear la propiedad desde las opciones del proyecto, y luego acceder a dicha propiedad en tiempo de ejecución para guardar/cargar valores.

Es muy sencillo, pero lee un poco acerca de ello para enterarte:

Managing Application Settings
Using My.Settings in Visual Basic 2005
How to: Change User Settings in Visual Basic

Saludos
#6103
Scripting / Re: Realizar una interfaz [Python]
18 Noviembre 2014, 00:51 AM
Cita de: Bundor en 17 Noviembre 2014, 20:25 PMLo que me interesa es que no salgan los 3 botones de minimizar, pantalla completa y la x de cerrar.

Para TKinter:
Cita de: http://stackoverflow.com/questions/17117156/create-a-python-tkinter-window-with-no-x-close-button
Código (python) [Seleccionar]
self.dlgWin.overrideredirect(1)
will remove all of the buttons (make a borderless window). Is that what you're looking for?

O...:
Cita de: http://stackoverflow.com/questions/2969870/removing-minimize-maximize-buttons-in-tkinter
Código (python) [Seleccionar]
import Tkinter as tk

root= tk.Tk()

root.title("wm min/max")

# this removes the maximize button
root.resizable(0,0)

# # if on MS Windows, this might do the trick,
# # but I wouldn't know:
# root.attributes(toolwindow=1)

# # for no window manager decorations at all:
# root.overrideredirect(1)
# # useful for something like a splash screen

root.mainloop()


PD: Las preguntas sobre lenguajes de Scripting van en su correspondiente sección...

Saludos!
#6104
Si, es lo que buscas, yo lo he testeado tanto en win7 x64 (en su día) y ahora en Win8.1 x64, en mi caso me ha funcionado.

De todas formas puedes hacerlo de forma manual y automatizar la tarea en un script, no es nada dificil.


Prueba a hacerlo de esta manera:

1) Utiliza el comando ASSOC de windows (no mi Assoc.bat) de esta manera:
assoc | find /I ".png"

Te saldrá la extensión, y a la derecha la clave de registro asociada, algo así:
.png=png.irfanview_file

Nota: También puedes ver la clave asociada en el valor por defecto de la clave de la extension:
HKEY_CLASSES_ROOT\.png


2) Abre el regedit, y ve a la ruta de la clave asociada:
HKEY_CLASSES_ROOT\{CLAVE ASOCIADA}\Shell\Open\Command

Ejemplo:
HKEY_CLASSES_ROOT\png.irfanview_file\Shell\Open\Command

Nota: Si la clave ...\Shell\Open\Command no existe, creala.


3) Modifica el valor por defecto de la clave "Command" por la aplicación con la que quieres abrir esa extensión.

Ejemplo:
"C:\Windows\System32\mspaint.exe" "%1"


¿Cómo automatizar la tarea?, con un script de registro, por ejemplo:

Código (ini) [Seleccionar]
Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\.png]
@="CustomAssociation.png"

[HKEY_CLASSES_ROOT\CustomAssociation.png\Shell\Open\Command]
@="\"C:\\Windows\\System32\\mspaint.exe\" \"%1\""

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.png\OpenWithProgids]
"CustomAssociation.png"=hex(0):


O con Batch:
Código (dos) [Seleccionar]
:: Converted with Reg2Bat by Elektro

@Echo OFF
REG ADD "HKCR\.png"                                     /V "" /D "CustomAssociation.png"                       /F
REG ADD "HKCR\CustomAssociation.png\Shell\Open\Command" /V "" /D "\"C:\Windows\System32\mspaint.exe\" \"%%1\"" /F
Pause&Exit



Si aun así eso no te sirve, puedes intentar buscar otra solución en Google, u otras herramientas más profesionales y que te permitan automatizar la tarea.


Saludos
#6105
Cita de: DekerMD en 17 Noviembre 2014, 21:33 PMAsociacion de archivo no encontrada para la extension -a .png

prueba a utilizar el parámetro "-c" en lugar de "-a", para forzar la creación de la asociación.

saludos
#6106
perdona, pero me he perdido un poco :xD ¿de donde sale ese executable?

Ahora veo que me confundí en mi comentario anterior y escribí la extensión "ASSOC7.exe" en lugar de "ASSOC7.bat", quizás hayas mal interpretado eso, perdon, es la costumbre.

Lo siento, hacia mucho que no lo utilizaba, reectifico y te explico de nuevo:

1) Copias el código en un archivo con extensión ".bat", con codificación ANSI (es la codificación por defecto si creas y guardas el archivo desde el Notepad)
2) Llamas al archivo "ASSOC.bat"
3) Ejecutas el siguiente comando (especificando la ruta completa del programa en el segundo parámetro):
ASSOC.bat -a ".png" "C:\Windows\System32\mspaint.exe"

Debería salirte algo parecido a esto (dependiendo de varios factores):

png.irfanview_file="C:\Windows\System32\mspaint.exe" "%1"

CORRECTO


Ahora si, ¿te ha funcionado?

Saludos
#6107
¡Ya ha finalizado el concurso!

Y así han quedado los puestos:



Hot Corners, por Eleкtro, ¡con 11 votos!



Emuleightor, por Christian010, ¡con 5 votos!



Masika, por El Benjo, ¡con 4 votos!

Felicidades a todos los ganadores, gracias a todos por participar en este concurso, y cómo no a los miembros del staff y otros que han hecho posible este concurso un año más...

PD: el-brujo contactará con ustedes para el tema de los envios (los premios), porfavor tengan algo de paciencia.

Saludos!
#6108
Batch es una herramienta simple, no es un lenguaje capacitado para procesar un String con las condiciones que precisas, se podría hacer, pero habría que invertir bastante tiempo en el desarrollo y elaboración del algoritmo para finálmente obtener un código muy engorroso e ineficiente a diferencia de cómo se podría llevar a cabo en un lenguaje de verdad.

Podrías partir la cadena según la cantidad de espacios entre palabra y palabra, pero dijiste algo de la longitud y no se si será respecto a los espacios, así que de todas formas te sugiero una solución más global, utilizar expresiones regulares (RegEx) ya que supongo que la fecha siempre tendrá el mismo formato: 19xx o 20xx y te puedes servir en eso, aunque para esto debes recurrir a cualquier otro lenguaje que soporte RegEx (VisualBasicScripting, por ejemplo, que está integrado en cualquier Windows, aunque es otro lenguaje simple e igual de inproductivo que Batch).

Esta podría ser una expresión regular que cumpliese con tus espectativas:
(^\w+)\s+([\w\.\,\;\-\s+]+?)\s+(\d{4})\s+(\w+$)

El interior de cada paréntesis representa un grupo, cada grupo captura una palabra/token de la frase, y hay 4 grupos (4 pares de paréntesis) ya que necesitas capturar 4 tokens.


Regular expression - Wikipedia, the free encyclopedia




Te muestro un ejemplo de utilización de esa expresión regular en VisualBasic.Net, tomatelo como un pseudo-code para implementarlo en el lenguaje que prefieras, ya que la mecánica de RegEx es casi idéntica en el resto de lenguajes (no su utilización, pero si el tema de la sintaxis y los grupos):

Código (vbnet) [Seleccionar]
Imports System.Text

Public Class Form1

#Region " Regular expression "

   ' La cadena de referencia.
   ReadOnly str As String = "09B321       Alberti Ramirez, Juan    1988    CASADO"

   ' Las partes de la expresion regular.
   ReadOnly regExToken1 As String = "^\w+" ' "09B321"
   ReadOnly regExToken2 As String = "[\w\.\,\;\-\s+]+?" ' "Alberti Ramirez, Juan"
   ReadOnly regExToken3 As String = "\d{4}" ' "1988"
   ReadOnly regExToken4 As String = "\w+$" ' "CASADO"

   ' La expresión regular completa.
   ' (^\w+)\s+([\w\.\,\;\-\s+]+?)\s+(\d{4})\s+(\w+$)
   ReadOnly fullEx = String.Format("({0})\s+({1})\s+({2})\s+({3})",
                                   regExToken1, regExToken2, regExToken3, regExToken4)

   ' La instancia del motor RegEx.
   ReadOnly regEx As New RegularExpressions.Regex(fullEx, RegularExpressions.RegexOptions.Singleline)

   ' Las capturas de cada token/grupo de la expresión regular.
   ReadOnly regExGroup1 As RegularExpressions.Group = regEx.Match(str).Groups(1)
   ReadOnly regExGroup2 As RegularExpressions.Group = regEx.Match(str).Groups(2)
   ReadOnly regExGroup3 As RegularExpressions.Group = regEx.Match(str).Groups(3)
   ReadOnly regExGroup4 As RegularExpressions.Group = regEx.Match(str).Groups(4)

#End Region

   Private Shadows Sub Load() Handles MyBase.Load

       Dim sb As New StringBuilder
       With sb
           .AppendLine(String.Format("Token 1: '{0}'", regExGroup1.Value))
           .AppendLine(String.Format("Token 2: '{0}'", regExGroup2.Value))
           .AppendLine(String.Format("Token 3: '{0}'", regExGroup3.Value))
           .AppendLine(String.Format("Token 4: '{0}'", regExGroup4.Value))
       End With

       MessageBox.Show(sb.ToString, "Capturas RegEx", MessageBoxButtons.OK, MessageBoxIcon.Information)

   End Sub

End Class





Saludos.
#6109
¿Por qué la necesidad de utilizar un Script?

Puedes cambiar la asociación de cualquier archivo mediante Windows:
Click derecho > Abrir con... > Elegir programa predeterminado

¿No te sirve eso para llevar a cabo tu propósito?, no se si te entendí bien pero no creo que vayas a querer establecer el programa predeterminado 300 veces al día...

De todas formas si sigues queriendo una herramienta para automatizar la tarea, puedes probar este Script que desarrollé hace años:
[Batch] (APORTE) ASSOC7 (Crea, Asocia, Y desasocia tipos de archivos)

1) Realiza un backup completo del registro.
2) Utiliza el siguiente comando:
Código (dos) [Seleccionar]
ASSOC7.exe -a ".png" "mspaint.exe"

Saludos
#6110
Foro Libre / Re: Sobre las pirámides egipcias
16 Noviembre 2014, 22:30 PM
Cita de: kub0x en 16 Noviembre 2014, 19:46 PMdocumentándome acerca de los detalles arquitectónicos de las pirámides he quedado sorprendido con algunos detalles sobre la precisión y error mínimo de la colocación de las piedras, así como los largos y kilométricos pasadizos que alberga en su interior, además del corto plazo de construción y las herramientas y materiales empleados para la misma.

No he visto el video, pero he visto decenas de documentales (algunos más fiables que otros) que hablan y documentan practicamente lo mismo, las asombromsas incongluencias tecnológicas de los egipcios, las mediciones exactas y (casi) perfectas que a cualquier arquitecto le resultarían su mayor reto en la vida, una auténtica pesadilla de "copiar".

Sólo puede haber una respuesta a estas incógnitas:
1) Estamos muy equivocados respecto a los conocimientos que adquirieron los arquitectos egipcios por si mismos, los hemos subestimado.
2) Los alienígenas nos enseñaron cómo construir edificaciones para nuestro desarrollo en La tierra, para nuestra evolución como seres humanos, ¿por qué no?.






Cita de: Senior++ en 16 Noviembre 2014, 20:16 PM
De hecho no se si sabras que lo egipcios inventaron la electricidad



@Senior++
Con todo mi respeto, ya sabes que yo apoyo la teoría de los alienígenas ancestrales, pero no de la forma en la que nos lo cuenta el señor Erich von Däniken ("autor" de la teoría) o como la cuenta la serie-documental de Ancient Aliens que está totalmente basada en las pamplinas de Erich von Däniken, este individuo solo cuenta mentiras para enriquecer las bases de su teoría y llenar su bolsillo, literalmente.

Esa imagen egipcia que muestras es un cuento, lo diré de otra manera: ¡ESO NO ES UNA BOMBILLA GIGANTE! y lo del interior no es el "filamento" de una bombilla, se trata de una simple serpiente y lo que lo rodea es una superficie que representa otras cosas... una flor de loto de la que brota una burbuja de "vida" de donde sale el primer Dios egipcio, Atum, representado en forma de serpiente, es una representación de la vida y de los dioses como cualquier otra representación egipcia, realmente no es nada fuera de lo normal en esta cultura, se está utilizando el mismo simbolismo egipcio.

Yo a pesar de ser bastante crédulo con este tipo de teorías siempre he intentado contrastar la información que me dan con otras fuentes de opiniones expertas e imparciales (egiptologos, arquitectos, textos antiguos, debunkers, en fin lo que se encuentre por internet), y te puedo asegurar que el 99% o el 100% de todo lo relacionado con la serie Ancient Aliens y con el libro de Erich von Däniken es una farsa, todo está manipulado de forma exagerada, y utilizando argumentos del hombre de paja, la mitad de palabras sacadas de textos antiguos se las inventan para enriquecer falsos argumentos (y esto se puede comparar con las transcripciones reales de textos antiguos).

Hay una verdad muy oculta y muy grande relacionada con los alienígenas y con las civilizaciones antiguas, pero no hay que confiar en todo lo que veamos en la TV.

Me gustaría que te tomases unos minutos para ver este video subtitulado al Castellano, a partir del minuto 4:00 lo comprenderás todo a la perfección:

Refutando "astronautas ancestrales": parte 10 Focos electricos Egipcios
[youtube=640,360]https://www.youtube.com/watch?v=gCH26Sd4S5I&index=10&list=PL5QEYuGZwBRWZ045BMskVRrYsyBEXdvKX[/youtube]

Saludos!