Temas

[SharkTube]

SharkTube es una utilidad o aplicación gratuita que te permite descargar vídeos de YouTube.

NOTA: Esta utilidad se encuentra registrada en SafeCreative bajo la licencia Creative Commons Reconocimiento-NoComercial-CompartirIgual 3.0.

Sus características y mejoras son:

   
• Más servidores de YouTube.
     
• Disponibilidad de formatos FLV, MP4, entre otros. *
     
• Ejecutable por línea de comandos y alternativa con Interfaz web.
     
• Mejor rendimiento en la búsqueda de servidores.
     
• Extracción de título, descripción y enlace corto.
     
• Posibilidad de compartir el vídeo en servicios sociales.
  

Shark.py

Código (python) [Seleccionar] Expandir

#!/usr/bin/env python
# -*- coding: utf-8 -*-
# @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
#   Written by SebastiᮠCastaᯠ(.:WindHack:.)
#             DaW - Labs & Cibernodo
#   - www.daw-labs.com | | www.cibernodo.net  -
#           Version: 1.1 ( Renaissance )
#              Interactive Console
# @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

import urllib
import re

bLogo = '''
.--. .-.               .-.   .-----.    .-.
: .--': :               : :.-.`-. .-'    : :
`. `. : `-.  .--.  .--. : `'.'  : :.-..-.: `-.  .--.
_`, :: .. :' .; ; : ..': . `.  : :: :; :' .; :' '_.'
`.__.':_;:_;`.__,_;:_;  :_;:_;  :_;`.__.'`.__.'`.__.'
(C) DaW - Labs & Cibernodo.

Welcome!
NOTE: Enter -e or --end to exit the application.
       '''

Char = ['%3A','%2F','%26','%2C','%3D','%252C','%253A','%7C','%3F']
By =   [':','/','&',',','=',',',':','<begin>','?']


def URLDecode(sURL):
   for i in range(len(Char)):
       sURL = sURL.replace(Char[i],By[i])
   return sURL

def CleanData(sData,IsHTML=True):
   if IsHTML == True:
       rReg = re.compile(r'\&.*?;')
   else:
       rReg = re.compile(r',[0-9].?')
   return rReg.sub('',sData)

def GetSourceCode(sURL):
   try:
       URL = urllib.urlopen(sURL)
       sSource = URL.read()
       URL.close()
       return sSource
   except:
       print '[+] Connection error.'
       exit()

def GetIndexVideo(sSource,Tags):
   return sSource.find(Tags)

def GetVideoInformation(sSource):
   sSource = sSource[2000:4500]
   sInfo = []
   #Title...
   sReg = re.findall(r'<meta property="og:title" content="(.+)">',sSource)
   sInfo.append(sReg[0])
   #Shortlink...
   sReg = re.findall(r'<link rel="shortlink" href="(.+)">',sSource)
   sInfo.append(sReg[0])
   #Description...
   sReg = re.findall(r'<meta property="og:description" content="(.+)">',sSource)
   sInfo.append(CleanData(sReg[0]))
   return sInfo

def GetDownloadURL(sSource,sTitle):
   sSource = sSource[10000:18000]
   Begin = GetIndexVideo(sSource,'width="640" id="movie_player" height="390"    flashvars=')+57
   sSource = sSource[Begin:]
   End = GetIndexVideo(sSource,'allowscriptaccess="always" allowfullscreen="true"')+49
   sSource = sSource[:End].split('<begin>')
   lClean = []
   sTitle = '&title='+sTitle.replace(' ','%20')+'%20[SharkTube]'
   for i in sSource:
       if i.startswith('http://v') and len(i) < 400:
           lClean.append(CleanData(i,IsHTML=False)+sTitle)
   return lClean

def __main__():
   print bLogo
   while 1:
       Id = raw_input('Please, enter the YouTube Id. >> ')
       if Id == '-e' or Id == '--end':
           print 'Thank you for using SharkTube. Goodbye'
           exit(1)
       else:
           if len(Id) == 11:
               try:
                   Source = URLDecode(GetSourceCode('http://www.youtube.com/watch?v='+Id))
                   lInfo = GetVideoInformation(Source)
                   URL = GetDownloadURL(Source,lInfo[0])
                   print '''

           -*- Video Information -*-

Title: %s
Shortlink: %s
Description:
%s

Link(s) available(s) to download:
%s

         ''' % (lInfo[0],lInfo[1],lInfo[2],'\n\n'.join(URL))
               except IndexError:
                   print 'Wrong Id. Please, try again...'
           else:
               print 'The ID must be eleven characters. Try again...'

if __name__ == "__main__":
  __main__()

Captura


Para usar la versión de Interface Web ( Captura superior ) se debe de descargar el proyecto con todo lo necesario del siguiente enlace: http://db.tt/Jtq2sAA

Más información:
- DaW - Labs | SharkTube: ¡Descarga vídeos de YouTube!
- Cibernodo | SharkTube: ¡Descarga vídeos de YouTube!

Eso es todo, espero les sea de ayuda y le puedan sacar provecho.
Por último, agradecimiento especial a 5475UK1 por la ayuda en el diseño y creación del logo.




Saludos.,

[Clic aquí]

Hola a todos.



Bueno, hoy presento un «Crackme» que he desarrollado en Pascal. Es muy sencillo pero no es como los comunes ya que, para poder superar el reto es necesario realizar una secuencia en el teclado, por lo cual su validación es sólo por esta vía. Tal vez no dure ni diez o veinte minutos vivo, pero el objetivo es entretenerse un rato. Cuando lo resuelvan se darán cuenta que es muy conocido lo que han realizado.,

• Clic aquí para descargar.

Nota: Quien lo resuelva, si puede dejar un tutorial de cómo lo hizo estaría muy agradecido.

¿Conocían los efectos y consecuencias de algunas drogas en las arañas?
Si la respuesta es "No", simplemente mira el vídeo...

[youtube=425,350]http://www.youtube.com/watch?v=M-gxtf0qUQw&feature=related[/youtube]



P.D.: Algo de humor no viene mal... ¡Jajajaja!

[Más Información:]

Código (python) [Seleccionar] Expandir

#!/usr/bin/env python
# -*- coding: utf-8 -*-
# WS Downloader.py - v0.1 (Beta)
# Autor(es): .:WindHack:. & swik
# www.daw-labs.com | www.cibernodo.net
# Registrado en SafeCreative
# Licencia: Creative Commons Reconocimiento-NoComercial-CompartirIgual 3.0
# 17/11/2010

import sys, urllib, os

#
# @Charset
#
Char = ['%3A','%2F','%26','%2C','%3D','%252C','%253A','%7C','%3F']
By =   [':','/','&',',','=',',',':','<begin>','?']

#
# URLDecode(sURL)
# Descifra la URL teniendo en cuenta el Charset.
#
def URLDecode(sURL):
   for i in range(len(Char)):
    sURL = sURL.replace(Char[i],By[i])
   return sURL

#
# GetSourceCode(sURL)
# Obtiene el código de fuente del vídeo (sitio).
#
def GetSourceCode(sURL):
   try:
    URL = urllib.urlopen(sURL)
    sSource = URL.read()
    URL.close()
    return sSource
   except:
       print 'Error de conexión.'
       exit()

#
# GetIndexVideo(sSource,Tags)
# Obtiene la posición de un "Tag" o etiqueta.
#
def GetIndexVideo(sSource,Tags):
   return sSource.find(Tags)

#
# GetVideoTitle(sSource)
# Obtiene el título del vídeo.
#
def GetVideoTitle(sSource):
   sSource = sSource[2000:5500]
   Begin = GetIndexVideo(sSource,'<meta name="title" content="')+28
   sSource = sSource[Begin:]
   End = GetIndexVideo(sSource,'>')-1
   sSource = sSource[:End]
   if ' ' in sSource:
sSource = sSource.replace(' ','_')
   return sSource

#
# GetVideoURL(sSource)
# Obtiene la URL de descarga del vídeo.
#
def GetVideoURL(sSource):
   sSource = sSource[9000:30000]
   Begin = GetIndexVideo(sSource,'<begin>')+7
   sSource = sSource[Begin:]
   End = GetIndexVideo(sSource,'id=')+19
   sSource = sSource[:End]+'&title=Video(WS_Downloader)'
   return sSource


#
# GetSavePath(Title)
# Obtiene la ruta en la cual se guardará el vídeo, teniendo en cuenta
# el sistema operativo.
#
def GetSavePath(Title):
   if os.name == 'posix':
return os.getenv('HOME')+'/'+Title+'.flv'
   if os.name == 'nt':
return os.getenv('HOMEDRIVE')+'\\'+Title+'.flv'

#
# DownloadStatus(Bloque, Tamano, Total)
# Muestra el estado de la descarga.
#
def DownloadStatus(Bloque, Tamano, Total):
   Cantidad = Bloque * Tamano / 1024000.0
   Total = Total / 1024000.0
   print 'Cantidad descargada: %s MB de %s MB ...' % (round(Cantidad,1),round(Total,1))
   if Cantidad >= Total:
       print 'Descarga finalizada.'

#
# DownloadVideo(sURL, sName, sStatus)
# Descarga el vídeo de los servidores de YouTube.
#
def DownloadVideo(sURL, sName, sStatus):
   try:
       Download = urllib.urlretrieve(sURL, sName, sStatus)
       return Download[0]
   except:
       print 'Error el descargar.'
       exit()

def __main__():
   __Help__ = '''
__        ______    ____                      _                 _
\ \      / / ___|  |  _ \  _____      ___ __ | | ___   __ _  __| | ___ _ __
\ \ /\ / /\___ \  | | | |/ _ \ \ /\ / / '_ \| |/ _ \ / _` |/ _` |/ _ \ '__|
 \ V  V /  ___) | | |_| | (_) \ V  V /| | | | | (_) | (_| | (_| |  __/ |  
  \_/\_/  |____/  |____/ \___/ \_/\_/ |_| |_|_|\___/ \__,_|\__,_|\___|_|  
   © Cibernodo & DaW - Labs
   Uso:
   ./WS_Downloader.py <Opción> <Id>
   
   Opciones:
       -D     : Descargar video directamente.
       -G     : Obtener URL de descarga.
       -help  : Ver Ayuda.
              '''

   try:
       Opt = sys.argv[1]
       if Opt == '-help':
           print __Help__
           
       if len(sys.argv) > 2:
           Id = URLDecode(GetSourceCode('http://www.youtube.com/watch?v='+sys.argv[2]))
           Title = GetSavePath(GetVideoTitle(Id))
           URL = GetVideoURL(Id)

           if Opt == '-G':
               print '======== Video URL ========\n',URL

           elif Opt == '-D':
               DownloadVideo(URL,Title,DownloadStatus)
               
   except:
       print __Help__
             
if __name__ == "__main__":
  __main__()





Más Información:
DaW - Labs | WS Downloader: ¡Descarga vídeos de YouTube!
Cibernodo | WS Downloader: ¡Descarga vídeos de YouTube!

[FlipString]

FlipString es un script desarrollado en Python que permite girar la cadena que se pase como parámetro 180º.

Por el momento sólo se ha probado en GNU/Linux, así que no puedo establecer a ciencia cierta cómo se comporta en otros entornos.

Su funcionamiento es sencillo, tan sólo se debe pasar como parámetro el texto que deseamos invertir. Por ejemplo:

Código (bash) [Seleccionar] Expandir

windhack@windhack-desktop:~$ python 'flipstring.py' Hola

Nos devuelve como resultado: ɐloɥ
Para convertir una cadena de texto más larga y que contenga espacios se deben usar las comillas dobles ("").

Aquí adjunto el código fuente.

Código (python) [Seleccionar] Expandir

#!/usr/bin/python
# -*- coding: utf-8 -*-
# FlipString.py - DaW - Labs & Cibernodo
# Autor: .:WindHack:.
# 20/09/2010 - www.daw-labs.com & www.cibernodo.net
# Puede usar, modificar y redistribuir éste código
# siempre y cuando respete los derechos de autor.

from sys import argv

# Diccionario de equivalencia en caracteres.

FlipCharset = { 'a' :u'\u0250',
                'b' :'q',
                'c' :u'\u0254',
                'd' :'p',
                'e' :u'\u01DD',
                'f' :u'\u025F',
                'g' :u'\u0183',
                'h' :u'\u0265',
                'i' :u'\u0131',
                'j' :u'\u027E',
                'k' :u'\u029E',
                'l' :'l',
                'm' :u'\u026F',
                'n' :'u',
                'o' :'o',
                'p' :'d',
                'q' :'b',
                'r' :u'\u0279',
                's' :'s',
                't' :u'\u0287',
                'u' :'n',
                'v' :u'\u028C',
                'w' :u'\u028D',
                'x' :'x',
                'y' :u'\u028E',
                'z' :'z',
                ' ' :' ',
                '1' : '\u21C2',
                '2' : '\u1105',
                '3' : '\u1110',
                '4' : '\u3123',
                '5' : '\u078E',
                '6' : '9',
                '7' : '\u3125',
                '8' : '8',
                '9' : '6',
                '0' : '0',
                '.' : '\u02D9',
                ',' : "\'",
                ';' : '\u061B',
                '!' : '¡',
                '¡' : '!',
                '?' : '¿',
                '¿' : '?',
                '[' : ']',
                ']' : '[',
                '(' : ')',
                ')' : '(',
                '{' : '}',
                '}' : '{',
                '<' : '>',
                '>' : '<',
                '_' : '\u203E' }

# Función para girar el texto.

def FlipString(String):
    Result = ''
    String = String.lower()
    for i in String:
        Result += FlipCharset[i]
    return Result[::-1]

def __main__():
    __Help__ =  '''
_____ _ _      ____  _        _
|  ___| (_)_ __/ ___|| |_ _ __(_)_ __   __ _
| |_  | | | '_ \___ \| __| '__| | '_ \ / _` |
|  _| | | | |_) |__) | |_| |  | | | | | (_| |
|_|   |_|_| .__/____/ \__|_|  |_|_| |_|\__, |
          |_|                          |___/

© 2010. DaW - Labs & Cibernodo

Modo de uso:
    FlipString.py "Texto"
    '''
    try:
        HasText = argv[1]
        print '''
%s
              ''' % FlipString(HasText)
    except:
        print __Help__

if __name__ == '__main__':
    __main__()

[Descarga:]

Bueno, un CrackMe que hice para entretenerme un rato.

Ya sé que lo resolveran en muy poco tiempo pero hace tiempo que no hacía uno.

---

• Contraseña por MP
• Un tutorial de cómo lo resolvieron

Descarga:
http://www.box.net/shared/opzact9v3o

[Más Información:]

Un script que hice para descargar videos de Metacafe, DailyMotion, y muchos sitios más.

Código (python) [Seleccionar] Expandir

#!/usr/bin/python
# -*- coding: utf-8 -*-
# VideoDown.py - DaW - Labs
# Autor: .:WindHack:.
# 22/07/2010 - www.daw-labs.com
# Puede usar, modificar y redistribuir este codigo
# siempre y cuando respete los derechos de autor.

import sys, urllib
from sgmllib import SGMLParser

class Parser(SGMLParser):
    def reset(self):
        SGMLParser.reset(self)
        self.urls = []

    def start_a(self, attrs):
        href = [v for k, v in attrs if k=='href']
        if href:
            self.urls.extend(href)

def DownloadStatus(Bloque,Tamano,Total):
    Cantidad = Bloque * Tamano / 1024
    Total = Total / 1024
    print 'Cantidad descargada: %s KB de %s KB ...' % (Cantidad,Total)
    if Cantidad > Total:
        print 'Descarga finalizada.'

def DownloadVideo(URL, Name, Status):
    try:
        Download = urllib.urlretrieve(URL, Name, Status)
        return Download[0]
    except:
        return 'Ha sucedido un error en la descarga.'


def GetDownloadURL(URL,Download):
    if len(URL) != 0:
        URLv = urllib.urlopen('http://www.flashvideodownloader.org/download2.php?u=%s' % URL)
        DownloadURL = Parser()
        DownloadURL.feed(URLv.read())
        DownloadURL.close()
        URLv.close()
        URL = DownloadURL.urls[8]
        if Download == True:
            DownloadVideo(URL,'C:\Video_By_VideoDown.flv',DownloadStatus)
        else:
            return 'La URL de descarga es:\n%s' % URL
    else:
        return 'URL invalida...'

def __main__():
    __Ayuda__ = '''
_ _  _    _            ___                   _
| | |<_> _| | ___  ___ | . \ ___  _ _ _ ._ _ | |
| ' || |/ . |/ ._>/ . \| | |/ . \| | | || ' ||_/
|__/ |_|\___|\___.\___/|___/\___/|__/_/ |_|_|<_>
    © 2010. DaW - Labs          -           www.daw-labs.com
    Uso:
    VideoDown.py <OPCION> <URL>
    Opciones:
    -D  : Descarga un video.
    -O  : Obtiene solo la URL de descarga.
    -H  : Muestra la ayuda.
    -----------------------------------------------------------
    Para ver la lista de sitios soportados abra el archivo:
    Supported Sites.txt
            '''
    try:
        Opc = sys.argv[1]
        if Opc == '-H':
            print __Ayuda__
        elif Opc == '-D':
            GetDownloadURL(sys.argv[2],True)
        elif Opc == '-O':
            print GetDownloadURL(sys.argv[2],False)
        else:
            print 'Se esperaba un parametro...'
    except:
        print __Ayuda__

if __name__ == "__main__":
    __main__()

Más Información:  http://daw-labs.com/videodown-descarga-videos-de-metacafe-dailymotion-y-muchos-sitios-mas/

P.D.: No puedo poner tildes, el GeShi me las modifica. 

[youtube=425,350]http://www.youtube.com/watch?v=iEWh6XBBei0&feature=player_embedded[/youtube]

Pues me provocó algo de curiosidad éste comercial.

[Windows Live Messenger® (WLM)]

Últimamente se han desarrollado varios parches para el Windows Live Messenger® (WLM), así que decidí hacer mi versión.

El FoxyMSN, es un parche que permite abrir múltiples instancias del WLM, y así poder conectarte desde un mismo PC a cuentas distintas.

Próximamente publicaré la manera en la cual realizar uno de estos parches y el código fuente del FoxyMSN.



DaW - Labs

[Python]

Cifrado césar en Python.

Código (python) [Seleccionar] Expandir

###################################
#  Autor: .:WindHack:.            #
#  Sitio web: http://daw-labs.com #
#  Agradecimientos: Sifaw         #
###################################

def Cifrar_Cesar(String,Key):
    tmp = ''
    for i in String:
        tmp += chr(ord(i)+Key)
    return tmp

def Descifrar_Cesar(String,Key):
    return Cifrar_Cesar(String,-Key)

print " ================================= "
print "|        Des/Cifrar Cesar         |"
print "|          .:WindHack:.           |"
print "|       http://daw-labs.com       |"
print " ================================= "
Palabra = raw_input("Introduce la frase: ")
Clave = input("Introduce la clave: ")
print "Palabra cifrada: " + Cifrar_Cesar(Palabra,Clave)
print "Palabra descifrada: " + Descifrar_Cesar(Palabra,Clave)

[Delphi Prism]

Una navegador programado en Delphi Prism (Oxygen) o como me gusta decirle, Delphi.NET.
Usa el típico componente WebBrowser.



Descarga: http://www.box.net/shared/tgff4zrb41

Incluye el código fuente.

- Código:

Código (delphi) [Seleccionar] Expandir

namespace Reproductor;

interface

uses
  System.Drawing,
  System.Collections,
  System.Collections.Generic,
  System.Linq,
  System.Windows.Forms,
  System.ComponentModel;

type
  MainForm = partial class(System.Windows.Forms.Form)
  private
    method Nav(Address:String);
    method NavFile(FileName:String);
    method Navegador_Navigated(sender: System.Object; e: System.Windows.Forms.WebBrowserNavigatedEventArgs);
    method salirToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
    method toolSBack_Click(sender: System.Object; e: System.EventArgs);
    method toolSNext_Click(sender: System.Object; e: System.EventArgs);
    method toolSReload_Click(sender: System.Object; e: System.EventArgs);
    method toolSStop_Click(sender: System.Object; e: System.EventArgs);
    method toolSHome_Click(sender: System.Object; e: System.EventArgs);
    method toolSIr_Click(sender: System.Object; e: System.EventArgs);
    method Direccion_KeyDown(sender: System.Object; e: System.Windows.Forms.KeyEventArgs);
    method Navegador_Navigating(sender: System.Object; e: System.Windows.Forms.WebBrowserNavigatingEventArgs);
    method Navegador_DocumentCompleted(sender: System.Object; e: System.Windows.Forms.WebBrowserDocumentCompletedEventArgs);
    method abrirDirecciónToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
    method abrirArchivoToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
    method trabajarSinConexiónToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
    method pantallaCompletaToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
    method MainForm_Load(sender: System.Object; e: System.EventArgs);
    method acercaDeDiGiMeBrowserToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
  protected
    method Dispose(disposing: Boolean); override;
  public
    constructor;
  end;

implementation

{$REGION Construction and Disposition}
constructor MainForm;
begin
  InitializeComponent();
end;

method MainForm.Dispose(disposing: Boolean);
begin
  if disposing then begin
    if assigned(components) then
      components.Dispose();
  end;
  inherited Dispose(disposing);
end;
{$ENDREGION}

method MainForm.Nav(Address:String);
begin 
if Not Address.StartsWith('http://') And
      Not Address.StartsWith('https://') then
      Address := 'http://' + Address;
  try
    Navegador.Navigate(New Uri(Address));
  except
  on E:Exception do
     Navegador.DocumentText := '<h1><span style="font-weight: bold; font-family: Calibri;"><img alt="" src="http://cdn.iconfinder.net/data/icons/solarsystem/PNG/128x128/earth.png">&nbsp;</span></h1><h1><span style="font-weight: bold; font-family: Calibri;">Un error ha ocurrido... :(</span></h1>___________________________<span style="font-weight: bold; font-family: Calibri;">DaGiMe Explorer<br> v1.0 <br> Desarrollado por <a href="http://daw-labs.com">DaW - Labs</a><br></span>';
  end;
end;

method MainForm.NavFile(FileName: String);
begin
  if Not FileName.StartsWith('file:///') then
     FileName := 'file:///'+FileName;

     Navegador.Navigate(New Uri(FileName));
end;

method MainForm.Navegador_Navigated(sender: System.Object; e: System.Windows.Forms.WebBrowserNavigatedEventArgs);
begin
  Direccion.Text := Navegador.Url.AbsoluteUri;
  lbEstado.Text := Navegador.StatusText;
  Text := Navegador.Document.Title + ' - DaGiMe Explorer';
end;

method MainForm.salirToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
begin
  Close();
end;

method MainForm.toolSBack_Click(sender: System.Object; e: System.EventArgs);
begin
  if Navegador.CanGoBack = True then
     Navegador.GoBack;
end;

method MainForm.toolSNext_Click(sender: System.Object; e: System.EventArgs);
begin
  if Navegador.CanGoForward = True then
     Navegador.GoForward;
end;

method MainForm.toolSReload_Click(sender: System.Object; e: System.EventArgs);
begin
  Navegador.Refresh();
end;

method MainForm.toolSStop_Click(sender: System.Object; e: System.EventArgs);
begin
  Navegador.Stop();
end;

method MainForm.toolSHome_Click(sender: System.Object; e: System.EventArgs);
begin
  Nav(toolsHome.ToolTipText);
end;

method MainForm.toolSIr_Click(sender: System.Object; e: System.EventArgs);
begin
  Nav(Direccion.Text);
end;

method MainForm.Direccion_KeyDown(sender: System.Object; e: System.Windows.Forms.KeyEventArgs);
begin
  if (E.KeyCode = Keys.Enter) then
     Nav(Direccion.Text);
end;

method MainForm.Navegador_Navigating(sender: System.Object; e: System.Windows.Forms.WebBrowserNavigatingEventArgs);
begin
  lbEstado.Text := Navegador.StatusText;
end;

method MainForm.Navegador_DocumentCompleted(sender: System.Object; e: System.Windows.Forms.WebBrowserDocumentCompletedEventArgs);
begin
  lbEstado.Text := 'Página cargada con éxito';
end;

method MainForm.abrirDirecciónToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
begin
  Direccion.Focus;
  Direccion.SelectAll;
end;

method MainForm.abrirArchivoToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
begin
  if OpenFile.ShowDialog = DialogResult.OK then
     NavFile(OpenFile.FileName);
end;


method MainForm.trabajarSinConexiónToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
begin
  Navegador.ShowSaveAsDialog
end;

method MainForm.pantallaCompletaToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
begin
 
end;

method MainForm.MainForm_Load(sender: System.Object; e: System.EventArgs);
begin
  Nav(ToolSHome.ToolTipText);
end;

method MainForm.acercaDeDiGiMeBrowserToolStripMenuItem_Click(sender: System.Object; e: System.EventArgs);
var
  F:Form;
begin
  F := New DaGiMeF;
  F.Show;
end;

end.

[DaW Command]

DaW Command como su nombre lo indica, es un comando para el intérprete de Windows® CMD.
Para usarlo simplemente debe copiar el archivo DaW-Command.exe en la carpeta System32 y listo.

- Opciones
-?: Muestra la ayuda.
-m: Muestra un mensaje. Modo de uso: DaW-Command -m Mensaje
-mA: Muestra un MessageBox. Modo de uso: DaW-Command -mA Mensaje
-h: Muestra la hora.
-c: Copia un archivo. Modo de uso: DaW-Command -c RutaOrigen RutaDestino
-e: Obtiene el nombre del Computador.
-u: Obtiene el nombre de usuario.
-f: Muestra la fecha.
-n: Crea un archivo. Modo de uso: DaW-Command -n RutaYNombreArchivo
-iX: Convierte un número a Hexadecimal. Modo de uso: DaW-Command -iX Número
-hI: Convierte una cadena Hexadecimal a Número. Modo de uso: DaW-Command -hI Cadena
-sR Obtiene la raíz cuadrada de un número. Modo de uso: DaW-Command -sR Número
-A: Convierte una cadena a ASCII (Extendido). Modo de Uso: DaW-Command -A Cadena Separador (Opcional)
-DaW: Visita el sitio web de DaW - Labs.

- Vídeo de demostración
http://www.youtube.com/watch?v=wZw76ZtObgk

- Descargar


Sitio Oficial: http://daw-labs.com

[Delphi]

Ya había programado esta función en Delphi, así que me decidí a traducirla a C/C++.

Código (cpp) [Seleccionar] Expandir


/* DaW - Labs - http://daw-labs.com */

#include <windows.h>

int main(int argc, CHAR* argv[])
{
char Buffer[MAX_COMPUTERNAME_LENGTH + 1];
DWORD nSize = sizeof(Buffer);
if (GetComputerName(Buffer,&nSize))
{
MessageBox(0,Buffer,"Nombre de PC",MB_OK | MB_ICONINFORMATION);
}
return 0;

[C++]

Estaba aburrido, no tenía nada que hacer, así que me puse a programar algo en C++.

Éste es un bloc de notas sencillo, pero con las funcionalidades esenciales. Perdonen si hay errores o si el código no está completamente optimizado, pues no programo mucho en este lenguaje.

Espero sirva de base o mejor dicho de ejemplo.



Programado en: Borland C++ Builder

Descargar: Box.net – Notepad(C++).rar

Código:

Código (cpp) [Seleccionar] Expandir

//---------------------------------------------------------------------------//
//---------------------------------------------------------------------------//
//-------------------- Notepad(C++) by DaW - Labs  ----------------------//
//---------------------------------------------------------------------------//
//   Éste es un bloc de notas programado en C++ Builder.
//   Si deseas compartirlo o mejorarlo puedes hacerlo, pero respeta la
//   fuente y el autor del mismo.
//   Desarrollado por DaW - Labs®
//--------------------------------------------------------------------------//

#include <vcl.h>
#include <clipbrd.hpp>
#pragma hdrstop

#include "uMain.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmMain *frmMain;
UnicodeString FileName;

const
UnicodeString Espacio = " - ";
UnicodeString App = "Notepad (C++) ";
UnicodeString NuevoTexto = "Sin_título.txt";
//---------------------------------------------------------------------------
__fastcall TfrmMain::TfrmMain(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::FormCreate(TObject *Sender)
{
MemoEditor->Align = alClient;
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::Abrir1Click(TObject *Sender)
{
if (OpenDialog->Execute() == True) {
{
FileName = OpenDialog->FileName;
MemoEditor->Lines->LoadFromFile(FileName);
Caption = ExtractFileName(FileName)+Espacio+App;
MemoEditor->Modified = False;
}
}
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::Guardar1Click(TObject *Sender)
{
if (FileName == "")
{
if (SaveDialog->Execute())
  {
FileName = SaveDialog->FileName;
MemoEditor->Lines->SaveToFile(FileName);
Caption = ExtractFileName(FileName)+Espacio+App;
MemoEditor->Modified = False;
  }
}
else
{
MemoEditor->Lines->SaveToFile(FileName);
Caption = ExtractFileName(FileName)+Espacio+App;
MemoEditor->Modified = False;
}
}

//---------------------------------------------------------------------------
void __fastcall TfrmMain::Nuevo1Click(TObject *Sender)
{
if (MemoEditor->Modified == False)
{
MemoEditor->Clear();
FileName = "";
MemoEditor->Modified = False;
Caption = NuevoTexto+Espacio+App;
}
else
{
switch (MessageBox(Handle,"¿Desea guardar los cambios?","Información", MB_YESNO | MB_ICONQUESTION))
{
case IDYES:
Guardar1Click(Sender);
break;

case IDNO:
MemoEditor->Clear();
FileName = "";
MemoEditor->Modified = False;
Caption = NuevoTexto+Espacio+App;
break;
   }
}
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::Guardarcomo1Click(TObject *Sender)
{
if (SaveDialog->Execute())
{
FileName = SaveDialog->FileName;
MemoEditor->Lines->SaveToFile(FileName);
Caption = ExtractFileName(FileName)+Espacio+App;
MemoEditor->Modified = False;
}
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::Salir1Click(TObject *Sender)
{
Application->Terminate();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditCut1Execute(TObject *Sender)
{
MemoEditor->CutToClipboard();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditCopy1Execute(TObject *Sender)
{
MemoEditor->CopyToClipboard();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditPaste1Execute(TObject *Sender)
{
MemoEditor->PasteFromClipboard();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditSelectAll1Execute(TObject *Sender)
{
MemoEditor->SelectAll();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditUndo1Execute(TObject *Sender)
{
MemoEditor->Undo();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditDelete1Execute(TObject *Sender)
{
MemoEditor->ClearSelection();
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditCopy1Update(TObject *Sender)
{
EditCopy1->Enabled = MemoEditor->SelLength > 0;
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditPaste1Update(TObject *Sender)
{
EditPaste1->Enabled = Clipboard()->HasFormat(CF_TEXT);
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::EditUndo1Update(TObject *Sender)
{
EditUndo1->Enabled = MemoEditor->CanUndo;
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::FuenteClick(TObject *Sender)
{
FontDialog->Font->Assign(MemoEditor->Font);
if (FontDialog->Execute())
{
MemoEditor->Font->Assign(FontDialog->Font);
}
}
//---------------------------------------------------------------------------


Respeten la fuente y el autor (DaW - Labs).

[DaW Ultimate Notepad]

El DaW Ultimate Notepad es un editor de texto desarrollado por el equipo de DaW – Labs para  plataformas Microsoft Windows®.

En esta versión se ha implementado un nuevo formato llamado DaW Text File (.dxt). Además se ha mejorado tanto su interfaz, como su correcto funcionamiento.

- Características

   
• Soporte de arrastrar/soltar archivos.
     
• Completa funcionalidad en Windows Vista/7®.
     
• Formato para insertar fecha.
     
• Buscar y reemplazar texto en el archivo.
     
• Nuevo formato DXT.
     
• Transparencia de aplicación.
     
• Siempre visible.

- Vídeo de demostración
http://www.youtube.com/watch?v=_TLiOMD2UuA

- Descargar


Sitio Oficial: http://daw-labs.com

[DaW vContacts]

El DaW vContacts es un gestor de contactos desarrollado por el equipo de DaW – Labs para  plataformas Microsoft Windows®.

El gestor principalmente ha sido desarrollado para crear una base de datos en la cual podrás tener un control más organizado de tus contactos, y así en el momento oportuno exportarlos e importarlos a clientes de correo electrónico que permitan el manejo de vCard.

- Capturas de Pantalla




- Descargar