Mensajes

[Tema Cerrado.]

En el foro no se hacen tareas, lo siento. Pero puedes publicar un nuevo post mostrando tus progresos y formulando una pregunta específica.

Tema Cerrado.

Claro... ahora imagina que lo mismo ocurre en EEUU, que se les "escapa" una nube de material radioactivo y se extiende sobre Mexico, Guatemala, Honduras, ¡ Cuba !

Toda internet estaría en llamas porque "el malvado imperio del mal contamina a sus vecinos"

Pero mira, lo hace Rusia... y no pasa nada, solo es una nubecilla  

Pues tienes razón, pero lo dices como si la gente fuese hipócrita por pensar así, cuando en realidad es que el gobierno de EEUU se ha ganado a pulso desde hace ya décadas la desconfianza de todo el mundo, ser propenso a considerar conspiración cuando se habla de EEUU, y el desprecio de la gente en general... creo que es normal por que es una gran potencia cuya abaricia sin límite afecta negativamente al resto de paises (tanto a los que se opongan a sus medidas, como a los que las favorezcan, por ejemplo aceptando el tratado TTIP de libre comercio de EEUU en Europa), y ahora más que nunca teniendo el tipo de presidente que tienen tan... racista (y otros 20 adjetivos descalificativos más).

Saludos

[PtInRect]

Para determinar si una posición (Point) del mouse está dentro de los límites de un rectángulo (RECT), no necesitas hacerlo como lo estás haciendo, puedes usar la función PtInRect. Cuando hayas evaluado que el botón derecho del mouse es presionado dentro de los límites de ese rectángulo, puedes usar la función WindowFromPoint pasándole como argumento la posición actual del mouse (si no conoces la posición exacta, puedes usar la función GetCursorPos ) para obtener un controlador (handle) a la ventana en la que se presionó el botón del mouse, y entonces puedes activar el foco de esa ventana con la función de VB AppActivate o la función de la API de Windows SetForegroundWindow, y por último ya podrías usar la función de VB SendKeys para enviar pulsaciones del teclado a la ventana activa con el input del teclado direccionado a ella.

No me importaría mostrarte un ejemplo, pero no programo en VB6 sino en VB.NET, así que te dejo solamente la documentación de las funciones de Windows:

• PtInRect
• WindowFromPoint
• GetCursorPos
• SetForegroundWindow

+

• RECT structure

Saludos!

[UserControl]

Como veran en la imagen, pude lograrlo con este codigo pero con ese codigo solo me figura el control al momento de correr la aplicacion, yo lo quiero ver desde la ventana de diseño para poder cambiar su ubicacion y no salir en un formulario en una ubicacion estandar

En el código que has mostrado, lo que estás haciendo es añadir un control al Form en tiempo de ejecución, evidentemente no lo puedes manipular en tiempo de diseño.

Para hacer lo que quieres, necesitas crear un control de usuario desde cero (heredando la clase UserControl), o bien extender un control por defecto. Esto último se hace declarando una clase que herede del control que quieres modificar/extender, en este caso DateTimePicker. Tu código adaptado quedaría más o menos de la siguiente manera:

Código (vbnet) [Seleccionar] Expandir

Imports System
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Runtime.InteropServices
Imports System.Windows.Forms

<ClassInterface(ClassInterfaceType.AutoDispatch)>
<ComVisible(True)>
<DefaultBindingProperty("Value")>
<DefaultEvent("ValueChanged")>
<DefaultProperty("Value")>
Public Class TimePicker : Inherits DateTimePicker

   <Bindable(True)>
   <Browsable(True)>
   <EditorBrowsable(EditorBrowsableState.Always)>
   <RefreshProperties(RefreshProperties.All)>
   Public Overloads Property Value As TimeSpan
       Get
           Return MyBase.Value.TimeOfDay
       End Get
       Set(value As TimeSpan)
           MyBase.Value = DateTime.Today + value
       End Set
   End Property

   Public Sub New()
       Me.Format = DateTimePickerFormat.Time
       Me.ShowUpDown = True
       Me.Value = TimeSpan.Zero ' Me.Value = MyBase.Value.TimeOfDay
       ' Me.Width = 100
   End Sub

End Class

Cuando hayas compilado esa clase por primera vez (y solo despues de haberla compilado) te aparecerá un control con nombre "TimePicker" arriba del todo junto a los demás controles que puedes arrastrar al Form.



Si quieres un control más personalizado, esto de aquí abajo lo acabo de hacer hoy (no lo he testeado en profundidad)...

Es un código muy simple, este código es practicamente lo mismo que el anterior que mostré, solo que denota una mejor representación del tiempo ya que no se puede representar una fecha en este control, tiene las propiedades de calendario eliminadas, y el formato personalizado de representación de fecha y hora (propiedad CustomFormat) está "bloqueado" a formato de 24 horas.

ElektroTimePicker.vb

Código (vbnet) [Seleccionar] Expandir

' ***********************************************************************
' Author   : Elektro
' Modified : 06-December-2017
' ***********************************************************************

#Region " Public Members Summary "

#Region " Constructors "

' New()

#End Region

#Region " Properties "

' Value As TimeSpan

#End Region

#End Region

#Region " Option Statements "

Option Strict On
Option Explicit On
Option Infer Off

#End Region

#Region " Imports "

Imports System
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Drawing
Imports System.Runtime.InteropServices
Imports System.Windows.Forms
Imports System.Windows.Forms.Design

' Imports ElektroKit.UserControls.Designers

#End Region

#Region " ElektroTimePicker "

' Namespace ElektroKit.UserControls

   ''' ----------------------------------------------------------------------------------------------------
   ''' <summary>
   ''' Represents a control that allows the user to select an hour,
   ''' and to display the time with a specified format.
   ''' </summary>
   ''' ----------------------------------------------------------------------------------------------------
   <DisplayName("ElektroTimePicker")>
   <Description("A extended DateTimePicker control that only displays the time.")>
   <DesignTimeVisible(True)>
   <DesignerCategory("UserControl")>
   <ToolboxBitmap(GetType(DateTimePicker), "DateTimePicker.bmp")>
   <ToolboxItemFilter("System.Windows.Forms", ToolboxItemFilterType.Require)>
   <ClassInterface(ClassInterfaceType.AutoDispatch)>
   <ComVisible(True)>
   <DefaultBindingProperty("Value")>
   <DefaultEvent("ValueChanged")>
   <DefaultProperty("Value")>
   <Designer(GetType(ElektroTimePickerDesigner))>
   Public Class ElektroTimePicker : Inherits DateTimePicker

#Region " Properties "

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Gets or sets the time value assigned to the control.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       ''' <value>
       ''' The time value assigned to the control.
       ''' </value>
       ''' ----------------------------------------------------------------------------------------------------
       <Bindable(True)>
       <Browsable(True)>
       <EditorBrowsable(EditorBrowsableState.Always)>
       <RefreshProperties(RefreshProperties.All)>
       Public Overloads Property Value As TimeSpan
           Get
               Return MyBase.Value.TimeOfDay
           End Get
           Set(value As TimeSpan)
               MyBase.Value = DateTime.Today + value
           End Set
       End Property

#End Region

#Region " Constructors "

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Initializes a new instance of the <see cref="ElektroTimePicker"/> class.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       Public Sub New()
           Me.CustomFormat = "HH:mm:ss" ' 24-hour format.
           Me.Format = DateTimePickerFormat.Custom
           Me.ShowUpDown = True
           Me.Value = TimeSpan.Zero
           ' Me.Value = MyBase.Value.TimeOfDay

           Me.Width = Me.MinimumSize.Width
           Me.AdjustControlWidth()
       End Sub

#End Region

#Region " Event Invocators "

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Raises the <see cref="ElektroTimePicker.FontChanged"/> event.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       ''' <param name="e">
       ''' An <see cref="EventArgs"/> that contains the event data.
       ''' </param>
       ''' ----------------------------------------------------------------------------------------------------
       Protected Overrides Sub OnFontChanged(ByVal e As EventArgs)
           If (Me.DesignMode) Then
               Me.AdjustControlWidth()
           End If

           MyBase.OnFontChanged(e)
       End Sub

#End Region

#Region " Overridable Methods "

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Grows the control width to fit the text displayed.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       Protected Overridable Sub AdjustControlWidth()
           Using g As Graphics = Me.CreateGraphics()
               Dim textSize As SizeF = g.MeasureString(Me.Text, Me.Font)

               If (textSize.Width > Me.Width) Then
                   Me.Width = CInt(Math.Ceiling(Size.Width)) * 2
               End If
           End Using
       End Sub

#End Region

   End Class

' End Namespace

#End Region

+

ElektroTimePickerDesigner.vb

Código (vbnet) [Seleccionar] Expandir

' ***********************************************************************
' Author   : Elektro
' Modified : 06-December-2017
' ***********************************************************************

#Region " Option Statements "

Option Strict On
Option Explicit On
Option Infer Off

#End Region

#Region " Imports "

Imports System
Imports System.Collections
Imports System.Diagnostics
Imports System.Windows.Forms.Design

#End Region

#Region " ElektroTimePickerDesigner "

' Namespace ElektroKit.UserControls.Designers

   ''' ----------------------------------------------------------------------------------------------------
   ''' <summary>
   ''' Extends the design mode behavior of a <see cref="ElektroTimePicker"/> control.
   ''' </summary>
   ''' ----------------------------------------------------------------------------------------------------
   ''' <seealso cref="ElektroTimePicker"/>
   ''' ----------------------------------------------------------------------------------------------------
   <DebuggerStepThrough>
   Public NotInheritable Class ElektroTimePickerDesigner : Inherits ControlDesigner

       ''' ----------------------------------------------------------------------------------------------------
       ''' <summary>
       ''' Provides design-time support for the <see cref="ElektroTimePicker"/> control.
       ''' </summary>
       ''' ----------------------------------------------------------------------------------------------------
       ''' <param name="properties">
       ''' Ab <see cref="IDictionary"/> that contains the properties for the class of the component.
       ''' </param>
       ''' ----------------------------------------------------------------------------------------------------
       Protected Overrides Sub PreFilterProperties(ByVal properties As IDictionary)

           MyBase.PreFilterAttributes(properties)

           Dim propertyNames As String() = {
               "CalendarFont",
               "CalendarForeColor",
               "CalendarMonthBackground",
               "CalendarTitleBackColor",
               "CalendarTitleForeColor",
               "CalendarTrailingForeColor",
               "CustomFormat",
               "DropDownAlign",
               "Format",
               "MaxDate",
               "MinDate",
               "ShowUpDown"
           }

           For Each propertyName As String In propertyNames
               properties.Remove(propertyName)
           Next

       End Sub

   End Class

' End Namespace

#End Region

Saludos

Lo más probable es que fuese alguna promoción especial de Microsoft o de la empresa que te vendía el PC, con demos, o juegos completos... pero como ya te han dicho Windows 95 de por si no lleva juegos integrados de terceras compañías... en aquella época en todos lados te regalaban la demo del Doom / Doom II, y todo tipo de "cajas" con juegos shareware.

Hoy en día no necesitas Windows 95 para jugar a todas esas joyitas, puedes usar Windows 10 o el Windows que más te guste, solo necesitas usar el emulador DOSBox para correr cualquier jugo de DOS. Yo tengo el Doom II y el Raptor - Call Of The Shadows instalados sin problema alguno.

https://www.dosbox.com/

Aquí puedes encontrar juegos DOS en Español ya preparados para DosBox:

• http://www.abandonsocios.org/

Y aquí cualquier ISO de juegos DOS:

• http://www.theisozone.com/downloads/pc/dos-games/

Saludos.

Gracias por el comentario.

saludos

[lo primero es saber si este este lenguaje es el apropiado para lo que quiero hacer]

Tengo conocimientos básicos de c/c++ y de POO (muy muy básicos) y lo primero es saber si este este lenguaje es el apropiado para lo que quiero hacer

Lo puede ser tanto como "cualquier" otro.

en unos sitios me ponen que es mejor java, luego en otros que use visual studio con c# y me saturé, vengo aquí a ver si alguien me puede aclarar algo o más o menos indicarme por donde debo empezar.

Lo "mejor" siempre depende de tus necesidades y objetivos. C# sería una forma muy estandarizada de programación y también muy documentada y soportada por la comunidad, me refiero, sería una muy buena forma de empezar, y si tus necesiades son muy genéricas entonces no veo motivo para usar C++, aunque esto ya depende de preferencias personales, y de todas formas si lo prefieres siempre puedes programar en C++ aplicaciones de escritorio con la IDE Visual Studio, puesto que es uno de los varios lenguajes built-in soportados en Visual Studio.



Como opinión personal, es evidente que no solamente el lenguaje de programación es importante, sino también la IDE... el entorno de trabajo donde desempeñes tu actividad, y al menos yo no cambiaría Visual Studio por ninguna otra IDE del mercado indiferentemente del lenguaje que soporten, ni Eclipse, Delphi Embarcadero, las IDEs de JetBrains, ni ninguna otra IDE en absoluto. Para mi Visual Studio es la IDE más sofisticada, productiva y robusta del mundo. Si pruebas Visual Studio 2017 (la edición gratuita: Community, aunque preferiblemente yo te diría la edición Professional para obtener los mayores beneficios en funcionalidades de productividad, depuración de código y profilling) es imposible arrepentirse ni querer utilizar otra IDE distinta a menos que sea por pura necesidad...

Para el desarrollo de aplicaciones de escritorio en Visual Studio con C# tendrías 2 opciones, 2 tecnologías diferentes: Windows Forms y WPF (podriamos meter a UWP aquí también pero tiene sus diferencias). La primera es más sencilla de aprender pero limitada en varios aspectos (sobre todo aspectos gráficos 3D), la segunda requiere un dominio más complejo pero es una tecnología mucho más completa en comparación, y en continuo desarrollo y actualización por parte de Microsoft. Si no estás seguro, empieza por WinForms.

Saludos.

• https://www.google.es/search?q=python+detect+text+encoding

Lee el primer resultado de StackOverflow que hace mención a las librerias...

Saludos

El tema ha sido movido a Programación General.

https://foro.elhacker.net/index.php?topic=477696.0

Pues como dice el título, me gustaría saber cual es el peligro real de utilizar un plugin craqueado para Wordpress. A este tipo de plugins se les conoce como "nulled plugins", y practicamente todos suelen ser plugins que han sido filtrados/robados de mercados online como Envato. Existe una infinidad de páginas en Internet donde distribuyen este tipo de plugins 0-day, son páginas de warez por así decirlo.

Solo quiero saber si existe un peligro real de ser infectado o de crear alguna vulnerabilidad en la página donde se use este tipo de scripts, algún porcentaje de probabilidad me iria bien, y algún consejo para un novato como yo... sería mejor todavía.

En el siguiente enlace leí que ese tipo de plugins pirata están infestados de virus y dejan puertas traseras y etcétera... vamos a ver, yo entiendo que puede haber una probabilidad de que alguien aproveche para añadir código malicioso a un plugin craqueado, pero no creo que la probabilidad sea tan alta ya que practicamente todo el mundo se descarga plugins craqueados... y temas para wordpress, y todo tipo de cosas piratas que les pueda servir para sus páginas, vaya.

• https://forums.digitalpoint.com/threads/what-does-a-nulled-script-mean.1269404/

Mis dotes como administrador de un server para controlar vulnerabilidades en mi página o buscar código malicioso en este tipo de plugins son muy básicas (más que básicas, soy un noob), y por eso creo que me iria bien cualquier consejo de ustedes...

Gracias.