Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: z3nth10n en 31 Mayo 2013, 20:38 pm



Título: Scroll de Imagenes?
Publicado por: z3nth10n en 31 Mayo 2013, 20:38 pm
Hola muy buenas, pues me estoy copiando un poco de una app...  :xD
Y me gustaría saber como hacer esto:

(http://i.imgur.com/pKR97zo.png)

Como veis a la izquierda hay un menú... Cuando le damos a click al botón se Scrolea... Será muy sencillo pero eso no lo he dado en mi vida y no se como hacerlo...

Luego si le damos con la rueda también se scrolea...

¿Como lo puedo hacer?

Un saludo.


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 31 Mayo 2013, 22:23 pm
Es bastante fácil, mira:

1.Como contenedor usa un panel.

2.Metes dentro los pictureboxes que quieras (preferiblemente añádelos en tiempo de ejecución, porque si tienes que meter 30 o 50 pictureboxes... se te va a quedar pequeña la pantalla para agrandar el panel e ir metiendoles desde el designer xD)

3. Y ya el resto es símplemente usar las scrollbar del panel "Panel1.VerticalScroll." (Aunque no las tengas activas ni estén visibles, puedes usarlas para scrollear).

Puedes capturar la rueda del botón en el evento "Panel1.MouseWheel" de la forma que ya has visto en uno de mis codes,
Y si quieres hacer medio transparente el panel es suficiente con que uses un color ARGB, donde la A es el canal Alpha (transparencia), el valor máximo es 255, si lo pones a 125 pues el panel se verá al 50% de transparencia.

zIBDTMjrDd4
Es una versión barata, te puede dar algunos problemas de Flickering (parpadeos) como se puede apreciar en el vídeo, me gustaría saber evitar los problemas de flickering, pero esto es WindowsForms y creeme que he preguntado a 1.000 expertos y nadie tiene la respuesta xD, es lo que hay.

PD: ¿Esperabas un code?  >:D

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 31 Mayo 2013, 22:55 pm
Y se puede hacer que vaya imagen por imagen en vez de un Scroll fluido? :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: kub0x en 31 Mayo 2013, 23:01 pm
Es una versión barata, te puede dar algunos problemas de Flickering (parpadeos) como se puede apreciar en el vídeo, me gustaría saber evitar los problemas de flickering, pero esto es WindowsForms y creeme que he preguntado a 1.000 expertos y nadie tiene la respuesta xD, es lo que hay.

EleKtro si no quieres flickering no utilices Windows Forms. Para ello tienes WPF, tecnología que utiliza la aceleración por hardware (GPU) para el procesamiento gráfico, no como Windows Forms que utiliza el procesador para todo tipo de cómputo.

Ahora estoy sufriendo ya que he lanzado una aplicación comercial bastante amplia y necesita un par de toques gráficos. Al haberla implementado en Win Forms la app consume bastantes recursos al presentar gráficos y animaciones. Espero que si todo me va bien poder portarla a WPF.

P.D = WPF trabaja en el diseño de los controles con XAML, ni te puedes imaginar las maravillas que se pueden conseguir con éste.

Seazoux, no te recomiendo "petar" mucho la aplicación o ya verás lo que pasará xD.

Saludos!


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 31 Mayo 2013, 23:09 pm
Tienes razón Kubox, yo siempre digo que para trabajar con transparencias hay que usar WPF y para lo del Flickering también, pero tooodo cambia en WPF, se me hace complejo, el hecho de crear un proyecto en WPF, aprender XAML, asimilar el hecho de volver a aprender todo lo que llevo aprendido en WindowsForms para poder "trasladarlo" a la sintaxis y los métodos de WPF... No me motiva nada, más bien me desespera.

Recuerdo una vez, no hace mucho, intenté usar un código de un WF en un WPF, para ello necesitaba un timer, y no hay timer en WPF, sé que puedo buscar el equivalente de un Timer en un WPF, pero es que diréctamente cerré el proyecto y me olvidé, porque para cada cosa voy a tener que ir buscando su equivalente y cambiar cada pequeña cosa, se me queda muy grande WPF.

Gracias por tu consejo Kubox





@Seazoux
Y se puede hacer que vaya imagen por imagen en vez de un Scroll fluido? :silbar:

Usé un timer para el scroll progresivo, perféctamente se puede hacer "imágen por imágen", lo que te permita tu imaginación (verticalscrollbar.value = )xD

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 31 Mayo 2013, 23:52 pm
Por las transparencias no te preocupes... Me vas a tener que ayudar con los codes... ya que no puedo estar mucho tiempo en el PC  :-\

Puedes ayudarme?  :(



Tengo un pequeño problema...

Uno quiero hacer que cuando este sobre la imagen la imagen se amplie, y que salga los dos botones que se puede ver en el pantallazo...

Dos quiero hacer que cuando se clique en un boton (el de añadir) y lo selecciones de una lista que usara PHP y MySQL te cree un control (PictureBox) con los datos que no se aun si sacaros de un TXT  :-\



Seazoux, no te recomiendo "petar" mucho la aplicación o ya verás lo que pasará xD.

Que puede pasar? :o


Título: Re: Scroll de Imagenes?
Publicado por: BlackM4ster en 1 Junio 2013, 17:03 pm
Te paso mi solución personal:

Es un poco *****, pero es la idea  :silbar:
https://www.dropbox.com/s/i5fi777zqpdutlj/ListaImagenes.rar


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 1 Junio 2013, 17:53 pm
Ahora que leo ese último comentario, se me olvidó pasarte el form del video xD:

Añade en el form:
1 un panel y métele pictureboxes
1 botón para scrollear hacia arriba
1 botón apra scrollear hacia abajo

Código
  1. Public Class Form1
  2.  
  3.    Dim Scroll_Position As Int32 = 0
  4.    Dim Button_Down_Is_Pressed As Boolean = False
  5.    Dim Button_Up_Is_Pressed As Boolean = False
  6.    Dim WithEvents Progressive_Scroll_Timer As New Timer
  7.    Dim SmallChange As Int32 = 5
  8.    Dim Largechange As Int32 = 10
  9.  
  10.    ' Sub which reduces the Flickering, but this sub makes x20 times slower any operation of any Form/Application.
  11.    Protected Overrides ReadOnly Property CreateParams() As CreateParams
  12.        Get
  13.            Dim cp As CreateParams = MyBase.CreateParams
  14.            cp.ExStyle = cp.ExStyle Or &H2000000
  15.            Return cp
  16.        End Get
  17.    End Property 'CreateParams
  18.  
  19.    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  20.        Me.ResumeLayout(False)
  21.        Panel1.ResumeLayout(False)
  22.  
  23.        Panel1.VerticalScroll.Maximum = 999999999
  24.        Progressive_Scroll_Timer.Interval = 50
  25.        Panel1.BackColor = Color.FromArgb(150, 0, 0, 0)
  26.    End Sub
  27.  
  28.    Private Sub Panel_MouseHover(sender As Object, e As EventArgs) Handles Panel1.MouseHover
  29.        sender.focus()
  30.    End Sub
  31.  
  32.    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Progressive_Scroll_Timer.Tick
  33.        If Button_Down_Is_Pressed Then
  34.            Scroll_Down(SmallChange)
  35.        ElseIf Button_Up_Is_Pressed Then
  36.            Scroll_Up(SmallChange)
  37.        Else
  38.            sender.stop()
  39.        End If
  40.    End Sub
  41.  
  42.    Private Sub Scroll_Up(ByVal Change As Int32)
  43.        Scroll_Position -= Change
  44.        Try : Panel1.VerticalScroll.Value = Scroll_Position : Catch : Scroll_Position += Change : End Try
  45.    End Sub
  46.  
  47.    Private Sub Scroll_Down(ByVal Change As Int32)
  48.        Scroll_Position += Change
  49.        Try : Panel1.VerticalScroll.Value = Scroll_Position : Catch : Scroll_Position -= Change : End Try
  50.    End Sub
  51.  
  52.    Private Sub Button_Down_MouseDown(sender As Object, e As MouseEventArgs) Handles Button2.MouseDown
  53.        If e.Button = Windows.Forms.MouseButtons.Left Then
  54.            Button_Down_Is_Pressed = True
  55.            Progressive_Scroll_Timer.Start()
  56.        End If
  57.    End Sub
  58.  
  59.    Private Sub Button_Up_MouseDown(sender As Object, e As MouseEventArgs) Handles Button1.MouseDown
  60.        If e.Button = Windows.Forms.MouseButtons.Left Then
  61.            Button_Up_Is_Pressed = True
  62.            Progressive_Scroll_Timer.Start()
  63.        End If
  64.    End Sub
  65.  
  66.    Private Sub Button_Down_MouseUp(sender As Object, e As MouseEventArgs) Handles Button2.MouseUp
  67.        Button_Down_Is_Pressed = False
  68.    End Sub
  69.  
  70.    Private Sub Button_Up_MouseUp(sender As Object, e As MouseEventArgs) Handles Button1.MouseUp
  71.        Button_Up_Is_Pressed = False
  72.    End Sub
  73.  
  74.    Private Sub Form_MouseWheel(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Panel1.MouseWheel
  75.        If Panel1.Focused Then
  76.            Select Case Math.Sign(e.Delta)
  77.                Case Is > 0 : Scroll_Up(Largechange)
  78.                Case Is < 0 : Scroll_Down(Largechange)
  79.            End Select
  80.        End If
  81.    End Sub
  82.  
  83. End Class

salu2


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 1 Junio 2013, 18:25 pm
Si es que no Electro, ya le has hecho trabajar al pobre BlackMaster  :xD


Título: Re: Scroll de Imagenes?
Publicado por: BlackM4ster en 1 Junio 2013, 19:53 pm
jajajajaja


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 4 Junio 2013, 14:25 pm
Esto ya está mejor, aunque la parte "alternativa" no está pulida, la parte "progresiva" está sin bugs:

-ctGY1k8M34

Código
  1. Public Class Form1
  2.  
  3.    Dim Scroll_Position As Int32 = 0
  4.    Dim Button_Down_Is_Pressed As Boolean = False
  5.    Dim Button_Up_Is_Pressed As Boolean = False
  6.    Dim WithEvents Progressive_Scroll_Timer As New Timer
  7.    Dim SmallChange As Int32 = 10
  8.    Dim Largechange As Int32 = 20
  9.    Dim Maximum As Int64 = 0
  10.  
  11.    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  12.        Panel1.AutoScroll = True
  13.        Maximum = Panel1.VerticalScroll.Maximum
  14.        Panel1.AutoScroll = False
  15.        Panel1.VerticalScroll.Maximum = Maximum / 2
  16.        Progressive_Scroll_Timer.Interval = 50
  17.        Panel1.BackColor = Color.FromArgb(150, 0, 0, 0)
  18.  
  19.        For Each PicBox As PictureBox In Panel1.Controls
  20.            AddHandler PicBox.MouseHover, AddressOf Panel_MouseHover
  21.        Next
  22.  
  23.    End Sub
  24.  
  25.    Private Sub Panel_MouseHover(sender As Object, e As EventArgs) Handles Panel1.MouseHover
  26.        sender.select()
  27.        sender.focus()
  28.    End Sub
  29.  
  30.    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Progressive_Scroll_Timer.Tick
  31.        If Button_Down_Is_Pressed Then
  32.            Scroll_Down(SmallChange)
  33.        ElseIf Button_Up_Is_Pressed Then
  34.            Scroll_Up(SmallChange)
  35.        Else
  36.            sender.stop()
  37.        End If
  38.    End Sub
  39.  
  40.    Private Sub Scroll_Up(ByVal Change As Int32)
  41.        Scroll_Position -= Change
  42.        Try
  43.            Panel1.VerticalScroll.Value = Scroll_Position
  44.        Catch
  45.            Scroll_Position = 0
  46.        End Try
  47.    End Sub
  48.  
  49.    Private Sub Scroll_Down(ByVal Change As Int32)
  50.        Scroll_Position += Change
  51.        Try
  52.            Panel1.VerticalScroll.Value = Scroll_Position
  53.        Catch
  54.            Scroll_Position -= Change
  55.        End Try
  56.    End Sub
  57.  
  58.    Private Sub Button_Down_MouseDown(sender As Object, e As MouseEventArgs) Handles Button2.MouseDown
  59.        If e.Button = Windows.Forms.MouseButtons.Left Then
  60.            Button_Down_Is_Pressed = True
  61.            Progressive_Scroll_Timer.Start()
  62.        End If
  63.    End Sub
  64.  
  65.    Private Sub Button_Up_MouseDown(sender As Object, e As MouseEventArgs) Handles Button1.MouseDown
  66.        If e.Button = Windows.Forms.MouseButtons.Left Then
  67.            Button_Up_Is_Pressed = True
  68.            Progressive_Scroll_Timer.Start()
  69.        End If
  70.    End Sub
  71.  
  72.    Private Sub Button_Down_MouseUp(sender As Object, e As MouseEventArgs) Handles Button2.MouseUp
  73.        Button_Down_Is_Pressed = False
  74.    End Sub
  75.  
  76.    Private Sub Button_Up_MouseUp(sender As Object, e As MouseEventArgs) Handles Button1.MouseUp
  77.        Button_Up_Is_Pressed = False
  78.    End Sub
  79.  
  80.    Private Sub Form_MouseWheel(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Panel1.MouseWheel
  81.        Select Case Math.Sign(e.Delta)
  82.            Case Is > 0 : Scroll_Up(Largechange)
  83.            Case Is < 0 : Scroll_Down(Largechange)
  84.        End Select
  85.    End Sub
  86.  
  87.  
  88.  
  89.    ' Versión alternativa:
  90.    Dim PictureBoxes_Height As Int64 = 100 ' La altura de cada picturebox
  91.  
  92.    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
  93.        Scroll_Position -= PictureBoxes_Height
  94.        Try
  95.            Panel1.VerticalScroll.Value = Scroll_Position
  96.        Catch
  97.            Panel1.VerticalScroll.Value = 1
  98.            Scroll_Position += PictureBoxes_Height
  99.        End Try
  100.    End Sub
  101.  
  102.    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
  103.        Scroll_Position += PictureBoxes_Height
  104.        Try
  105.            Panel1.VerticalScroll.Value = Scroll_Position
  106.        Catch
  107.  
  108.            Scroll_Position -= PictureBoxes_Height
  109.        End Try
  110.    End Sub
  111.    ' Fin de versión alternativa
  112.  
  113. End Class

Código
  1. Public Class DoubleBufferedPanel
  2.    Inherits Panel
  3.  
  4.    Public Sub New()
  5.        DoubleBuffered = True
  6.        ResumeLayout(False)
  7.    End Sub
  8.  
  9.    Protected Overrides ReadOnly Property CreateParams() As CreateParams
  10.        Get
  11.            Dim cp As CreateParams = MyBase.CreateParams
  12.            cp.ExStyle = cp.ExStyle Or &H2000000
  13.            Return cp
  14.        End Get
  15.    End Property
  16.  
  17. End Class


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 5 Junio 2013, 21:15 pm
Con pulir a que te refieres?

Por cierto, necesito una ultima cosa si no es mucho pedir... Un loop infinito, es decir cuando termine las imagenes vuelve a mostrarse el inicio... Se puede hacer? :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 5 Junio 2013, 21:23 pm
Con pulir a que te refieres?

Me refería a que no está sin bugs, da un pequeño problema al sobrepasar el tope del margen del scroll hacia arriba o hacia abajo, solo me he preocupado en perfeccionar el scroll progresivo, porque es como a mi me gusta xD.

Por cierto, necesito una ultima cosa si no es mucho pedir... Un loop infinito, es decir cuando termine las imagenes vuelve a mostrarse el inicio... Se puede hacer? :silbar:

Mira, iba a mandarte a la ***** por tanto pedir y que te lo hicieras tu solo, sincéramente xD,
pero me ha gustado la idea del loop infinito, creo que voy a desarrollar un panel heredado desde 0 con lo que ya llevo hecho y le añadiré una propiedad pública que se llame "Loop" para habilitar/deshabilitar el loop del scroll.

Poder, se puede hacer, solo hay que reiniciar los valores del scroll... lo podrías hacer tu mismo.

Salu2!


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 5 Junio 2013, 21:31 pm
Ya pero no se.  ;D

PD: Ya se que soy un poco cabroncete. xD
PDS: El scroll de Black lo tiene...  :silbar:

Un saludo y perdon por ser un incordio xD
PDSS:
Te recompensaré con dubstep  >:D


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 5 Junio 2013, 23:46 pm
Mi panel extendido tiene una propiedad para activar el "Scroll Loop" (el cual solo funciona con la propiedad AutoScroll activada).

Para hacer un "Scroll Loop" inteligente sin AutoScroll, ya te lo he dicho, resetea los valores del "Me.VerticalScroll.Value" al sobrepasar "X" valor, hazlo como quieras.

Código
  1. '
  2. '  /*               *\
  3. ' |#* Panel Elektro *#|
  4. '  \*               */
  5. '
  6. ' // By Elektro H@cker
  7. '
  8. '   Properties:
  9. '   ...........
  10. ' · Disable_Flickering
  11. ' · Double_Buffer
  12. ' · Opaccity
  13. ' · Scroll_Loop
  14.  
  15. Public Class Panel_Elektro
  16.    Inherits Panel
  17.  
  18.    Private _Opaccity As Int16 = 100
  19.    Private _Diable_Flickering As Boolean = True
  20.    Private _Scroll_Loop As Boolean = False
  21.  
  22.    Dim Scroll_Range As Int64 = 0
  23.  
  24.    Public Sub New()
  25.        Me.Name = "Panel_Elektro"
  26.        ' Me.AutoScroll = True
  27.        ' ResumeLayout(False)
  28.    End Sub
  29.  
  30. #Region " Properties "
  31.  
  32.    ''' <summary>
  33.    ''' Enable/Disable any flickering effect on the panel.
  34.    ''' </summary>
  35.    Protected Overrides ReadOnly Property CreateParams() As CreateParams
  36.        Get
  37.            If _Diable_Flickering Then
  38.                Dim cp As CreateParams = MyBase.CreateParams
  39.                cp.ExStyle = cp.ExStyle Or &H2000000
  40.                Return cp
  41.            Else
  42.                Return MyBase.CreateParams
  43.            End If
  44.        End Get
  45.    End Property
  46.  
  47.    ''' <summary>
  48.    ''' Set the Double Buffer.
  49.    ''' </summary>
  50.    Public Property Double_Buffer() As Boolean
  51.        Get
  52.            Return Me.DoubleBuffered
  53.        End Get
  54.        Set(ByVal Value As Boolean)
  55.            Me.DoubleBuffered = Value
  56.        End Set
  57.    End Property
  58.  
  59.    ''' <summary>
  60.    ''' Set the transparency for this panel.
  61.    ''' </summary>
  62.    Public Property Opaccity() As Short
  63.        Get
  64.            Return _Opaccity
  65.        End Get
  66.        Set(ByVal Value As Short)
  67.            If Value > 100 Then Throw New Exception("Opaccity range is from 0 to 100")
  68.            If Value < 0 Then Throw New Exception("Opaccity range is from 0 to 100")
  69.            Me._Opaccity = Value
  70.            Make_Opaccity(Value, Me.BackColor)
  71.        End Set
  72.    End Property
  73.  
  74.    ''' <summary>
  75.    ''' Enable/Disable the flickering effects on this panel.
  76.    '''
  77.    ''' This property turns off any Flicker effect on the panel
  78.    ''' ...but also reduces the performance (speed) of the panel about 30% slower.
  79.    ''' This don't affect to the performance of the application itself, only to the performance of this control.
  80.    ''' </summary>
  81.    Public Property Diable_Flickering() As Boolean
  82.        Get
  83.            Return _Diable_Flickering
  84.        End Get
  85.        Set(ByVal Value As Boolean)
  86.            Me._Diable_Flickering = Value
  87.        End Set
  88.    End Property
  89.  
  90.    ''' <summary>
  91.    ''' Enable/Disable the scroll loop effect.
  92.    ''' Only when AutoScroll option is set to "True".
  93.    ''' </summary>
  94.    Public Property Scroll_Loop() As Boolean
  95.        Get
  96.            Return _Scroll_Loop
  97.        End Get
  98.        Set(ByVal Value As Boolean)
  99.            Me._Scroll_Loop = Value
  100.        End Set
  101.    End Property
  102.  
  103. #End Region
  104.  
  105. #Region " Event handlers "
  106.  
  107.    ' Scroll
  108.    Private Sub Infinite_Scroll_Button(sender As Object, e As ScrollEventArgs) Handles Me.Scroll
  109.  
  110.        If _Scroll_Loop AndAlso Me.AutoScroll Then
  111.  
  112.            Set_Scroll_Range()
  113.  
  114.            If Me.VerticalScroll.Value >= Scroll_Range - 4 Then ' Button Down
  115.                Me.VerticalScroll.Value = 1
  116.            ElseIf Me.VerticalScroll.Value <= 0 Then ' Button Up
  117.                Me.VerticalScroll.Value = Scroll_Range
  118.            End If
  119.  
  120.        End If
  121.  
  122.    End Sub
  123.  
  124.    ' MouseWheel (Scroll)
  125.    Private Sub Infinite_Scroll_MouseWheel(sender As Object, e As MouseEventArgs) Handles Me.MouseWheel
  126.  
  127.        If _Scroll_Loop AndAlso Me.AutoScroll Then
  128.  
  129.            Set_Scroll_Range()
  130.  
  131.            If e.Delta < 0 AndAlso Me.VerticalScroll.Value >= Scroll_Range - 4 Then ' MouseWheel Down
  132.                Me.VerticalScroll.Value = 1
  133.            ElseIf e.Delta > 0 AndAlso Me.VerticalScroll.Value <= 0 Then ' MouseWheel Up
  134.                Me.VerticalScroll.Value = Scroll_Range
  135.            End If
  136.  
  137.        End If
  138.  
  139.    End Sub
  140.  
  141. #End Region
  142.  
  143. #Region " Methods / Functions "
  144.  
  145.    ''' <summary>
  146.    ''' Changes the transparency of this panel.
  147.    ''' </summary>
  148.    Private Sub Make_Opaccity(ByVal Percent As Short, ByVal colour As Color)
  149.        Me.BackColor = Color.FromArgb(Percent * 255 / 100, colour.R, colour.G, colour.B)
  150.    End Sub
  151.  
  152.    ''' <summary>
  153.    ''' Set the VerticalScrollBar Range.
  154.    ''' </summary>
  155.    Private Sub Set_Scroll_Range()
  156.        Scroll_Range = Me.VerticalScroll.Maximum - Me.VerticalScroll.LargeChange + Me.VerticalScroll.SmallChange
  157.    End Sub
  158.  
  159. #End Region
  160.  
  161. End Class


Título: Re: Scroll de Imagenes?
Publicado por: BlackM4ster en 6 Junio 2013, 17:58 pm
Con pulir a que te refieres?

Por cierto, necesito una ultima cosa si no es mucho pedir... Un loop infinito, es decir cuando termine las imagenes vuelve a mostrarse el inicio... Se puede hacer? :silbar:

Oye, mi código ya hace eso...  :-\


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 6 Junio 2013, 18:51 pm
Ya lo sé, no te mosquees, voy a probar los dos y el que más me guste me lo quedo.. xD

Por cierto, ayudame con lo del botón y ya está. :P

El code de leer los inis ya lo tienes  :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: BlackM4ster en 6 Junio 2013, 18:55 pm
Ya lo sé, no te mosquees, voy a probar los dos y el que más me guste me lo quedo.. xD

Por cierto, ayudame con lo del botón y ya está. :P

El code de leer los inis ya lo tienes  :silbar:

El modulo que lee inis si lo tengo, el source del boton ya te lo pasé
Skype


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 6 Junio 2013, 21:55 pm
Okeys, ehm, tengo un problemi, y es que no se adaptar tu code del infiloop... Si fueras tan amable de decirme mañana como es... Gracias! :D

PD: Ya he estado probando, pero ahora el scroll no baja, por no decir que aun ni le he puesto el infiloop xD


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 9 Junio 2013, 19:27 pm
A ver aquí dejo un vídeo mostrando lo que me pasa con el Scroll

gnb6oNmF0f8

Si necesitas el proyecto Elektro por MP te lo mando. ;)


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 9 Junio 2013, 20:19 pm
A ver aquí dejo un vídeo mostrando lo que me pasa con el Scroll

"Y el flickering tampoco va" xD

...Si hubieras tenido en cuenta el panel que posteé un poco más arriba de este post entonces no estarías preguntando... (al menos no por el problema del Flickering) : http://foro.elhacker.net/net/libreria_de_snippets_posteen_aqui_sus_snippets-t378770.0.html;msg1858625#msg1858625

Reemplaza la ***** de panel que estás usando, por el mío.

PD: Lo de "***** de panel" no lo digo por el código de Black Master, sinó porque estás usando el panel por defecto del Framework.

PD2: Lee las propiedades nuevas de mi panel extendido o te vas a quedar iwal xD.

PD3: La imágen del splash con tu logo de IKillNukes se ve bien en tu video, pero se puede ver mal en los demás pc's (al menos en el mio) se ve blanco, con bordes grandes y muy blancos, se ve una imágen "engorrosa", te lo digo para que lo sepas, no se ve bien.

PD4: El problema es que estás usando una "vertical scrollbar" pero no tienes ni idea deutilizarla, tienes dos opciones:
1. Usa el autoscroll del panel para mover las imágenes.
2. Aprender a utilizar una VScroll:

https://www.google.com/search?q=vbnet+how+to+use+vscroll&ie=utf-8&oe=utf-8&lr=lang_en

https://www.google.com/search?q=vbnet+how+to+add+scrollbar+panel&ie=utf-8&oe=utf-8&lr=lang_en

Básicamente tienes que ajustar corréctamente las propiedades de los valores: "value", "maximum" "smallchange" y "largechange" de la Scrollbar para adaptarla al tamaño de tu panel... ...de hecho en uno de mis comentarios más arriba en este post publiqué un video con una Class donde tienes un ejemplo de todo lo que acabo de comentar, sabrias hacerlo, si leyeras, claro.

Saludos!


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 9 Junio 2013, 20:41 pm
Oye, viendo tu proyecto

Se me ocurrio una idea para un Launcher.. y es de que cambie el fondo de la app :)
asi se ve mas llamativo, puedes crear un directorio donde guardes las imagenes y cada cierto tiempo cambien

*Es solo una idea


Título: Re: Scroll de Imagenes?
Publicado por: ABDERRAMAH en 10 Junio 2013, 01:09 am
Citar
EleKtro si no quieres flickering no utilices Windows Forms. Para ello tienes WPF, tecnología que utiliza la aceleración por hardware (GPU) para el procesamiento gráfico, no como Windows Forms que utiliza el procesador para todo tipo de cómputo.

Bueno, yo estoy haciendo un juego 2d con windows forms y el flickring se puede evitar, todo depende de como se dibuja, la clave es precargar todo previamente y dibujarlo usando bitmaps invisibles que sólo se mostrarán al usuario cuando están completos. Ahora, wpf está a años luz de wforms, eso es cierto.


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 10 Junio 2013, 07:34 am

Básicamente tienes que ajustar corréctamente las propiedades de los valores: "value", "maximum" "smallchange" y "largechange" de la Scrollbar para adaptarla al tamaño de tu panel... ...de hecho en uno de mis comentarios más arriba en este post publiqué un video con una Class donde tienes un ejemplo de todo lo que acabo de comentar, sabrias hacerlo, si leyeras, claro.

Saludos!

Con que me hubieses dicho eso, ya no hubiese estropeado un Finde entero sin hacer nada... :-\


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 10 Junio 2013, 16:49 pm
Con que me hubieses dicho eso, ya no hubiese estropeado un Finde entero sin hacer nada... :-\

Valla que no tienes suerte Ikillnukes :p

Todo por no leer  :laugh: :laugh: :laugh:


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 10 Junio 2013, 16:52 pm
Todo por no leer  :laugh: :laugh: :laugh:

Mejor dicho por no investigar xD

Elektro, puede que me termines de mandar a la ***** xD

Ehm, sería posible que se ampliase la imagen central y que le apareciesen 2 botones abajo a la izquierda (solo cuando este ampliada y por cada imagen esos 2 botones) :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 11 Junio 2013, 17:40 pm
claro cuando uses la propiedad de mouse enter y leave

en el mouse enter cuando selecciones la imagen esta se amplia y usas comando visible para mostar los botones

y en mouse leave para regresar la imagen a su tamaño actual y ocultar los botones


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 11 Junio 2013, 17:52 pm
claro cuando uses la propiedad de mouse enter y leave

en el mouse enter cuando selecciones la imagen esta se amplia y usas comando visible para mostar los botones

y en mouse leave para regresar la imagen a su tamaño actual y ocultar los botones


No tiene nada que ver... Tiene que ampliarse solo la imagen del centro es decir que si meto el ratón en una imagen que no es la central también se va a apliar y pues como que no.. La duda está en que se amplie solo la central... :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 11 Junio 2013, 18:22 pm
No tiene nada que ver... Tiene que ampliarse solo la imagen del centro es decir que si meto el ratón en una imagen que no es la central también se va a apliar y pues como que no.. La duda está en que se amplie solo la central... :silbar:

Claro que si se puede ._. yo ya lo intente...

use size H y W en la posicion actual de la imagen en el panel

a todas las imagenes les di esa propiedad

Ehm, sería posible que se ampliase la imagen central y que le apareciesen 2 botones abajo a la izquierda (solo cuando este ampliada y por cada imagen esos 2 botones) :silbar:

y a los botones primero ponlos visible = false

y al poner el mouse estos se muestren en true


pero claro, no usas imaginacion .__. por eso no puedes


(http://i.imm.io/18ZXz.png)

algo asi fue lo que me resulto


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 11 Junio 2013, 18:47 pm
Citar
(http://i.imm.io/18ZXz.png)

Si no recuerdo mal creo que ese efecto se denomina "Bubble Fish" o "Eye Fish" (Ojo de péz),
lo puedes hacer como te ha dicho syntax error.

Solo tienes que averiguar el índice de la que es la imágen "central", porque si no la identificas primero, no puedes hacer nada, y entonces ya con esa imágen haces lo que prefieras, o bien usar eventos (mouse hover) para agrandar la imágen cuando se pase el ratón por la imágen, o bien mantenerla agrandada permanéntemente.

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 11 Junio 2013, 21:04 pm
Claro que si se puede ._. yo ya lo intente...

use size H y W en la posicion actual de la imagen en el panel

a todas las imagenes les di esa propiedad

y a los botones primero ponlos visible = false

y al poner el mouse estos se muestren en true


pero claro, no usas imaginacion .__. por eso no puedes


(http://i.imm.io/18ZXz.png)

algo asi fue lo que me resulto

A ver mi scroll solo se activa por botones y por mousewheel, no por mouse leaves y enters, ni por mouse clicks...

Por eso lo digo...  ;)

PD: Mi scroll, es un Scroll Vertical... :P No un Carrousel :xD

Si no recuerdo mal creo que ese efecto se denomina "Bubble Fish" o "Eye Fish" (Ojo de péz),
lo puedes hacer como te ha dicho syntax error.

Solo tienes que averiguar el índice de la que es la imágen "central", porque si no la identificas primero, no puedes hacer nada, y entonces ya con esa imágen haces lo que prefieras, o bien usar eventos (mouse hover) para agrandar la imágen cuando se pase el ratón por la imágen, o bien mantenerla agrandada permanéntemente.

Saludos

Ese efecto se llama Carrousel....

Observa...

(http://i.imgur.com/0nhS11a.png)

Un saludo.
PD: Si alguien quiere el code del HTA EMULATOR que me lo diga, que yo se lo paso. :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 12 Junio 2013, 03:21 am
A ver mi scroll solo se activa por botones y por mousewheel, no por mouse leaves y enters, ni por mouse clicks...

Por eso lo digo...  ;)

PD: Mi scroll, es un Scroll Vertical... :P No un Carrousel :xD

Ese efecto se llama Carrousel....

Observa...


Como que aun no entiendes lo que te quiero explicar pero bueno, da igual el proyecto no es mio  :P  :laugh:

Pero reitero que debes tener encuenta lo que te digo ;) y la imagen era solo un ejemplo de lo que trataba de explicar no necesariamente debe ser horizontal.. Oh espera

(http://i.imm.io/193jA.png)

[Sarcasmo]Si creo que ya esta ;) [/Sarcasmo]


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 12 Junio 2013, 07:34 am
Voy a darle a la cabeza a ver si consigo algo :-\



Elektro una pregunta... Tengo que centrar el pcb para la versión alternativa, como lo puedo hacer rápidamente sin morir en el intento?



Cuando llego al tope si le sigo haciendo click al boton 4, luego si le doy al botón 3 no hay cojones pa subir pa rriba...

Como puedo hacer que se desactive el boton cuando llegue a un tope? :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 17:54 pm
Bueno, pues tengo problemas con el pcb

Código
  1. RaiseEvent pcb_(pcb_num).Click = Shell("java -Xincgc -Xmx1024m -cp "%appdata%\.likesoft\launcher\.minecraft\bin\minecraft.jar;%appdata%\.likesoft\launcher\.minecraft\bin\lwjgl.jar;%appdata%\.likesoft\launcher\.minecraft\bin\lwjgl_util.jar;%appdata%\.likesoft\launcher\.minecraft\bin\jinput.jar" -Djava.library.path="%appdata%\.likesoft\launcher\.minecraft\bin\natives" net.minecraft.client.Minecraft " & text1.text, AppWinStyle.Hide)

Pero no va....

El primer problema está en el .click, y el siguiente en el shell()

a ver si resuelvo algo, pero no se si voy a poder. :-\

PD: El raisevent me lo pedía el VS2012 :P



He quitado el RaiseEvent, y he intentado añadir un Handler con

Código
  1. AddHandler pic.Click, AddressOf pic_Click

Pero la función pic_Click se tendría que cambiar por Form_Load que es donde está alojada? :P



He probado eso pero:

Citar
Error   1   'Click' is not an event of '1-dimensional array of System.Windows.Forms.PictureBox'.   C:\Users\Alvaro\Documents\IkillLauncher\IkillLauncher\frmModpacks.vb   151   25   IkillLauncher

Jorl. xD Ara que hago? :P


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 14 Junio 2013, 18:19 pm
Pero no va....

El primer problema está en el .click, y el siguiente en el shell()

Ahá, y esos problemas son...? no somos magos, copia las excepciones (si hubiera alguna), o especifica algún que otro detalle sobre lo que quiere decir "no va".

De todas formas ya te digo que ese código está muy mal, no uses raises, y no uses shell porfavor.

Estás asumiendo que la carpeta de java se encuentra en el PATH de Windows, pero eso no es así en la mayoría de equipos, así que, antes de nada, deberías plantearte usar la ruta absoluta del proceso java.exe

...Y bueno, para ejecutar un proceso te recomiendo que uses la classe "Process", el método "Start", usease... "Process.start()"

Y si lo que quieres es attachear el evento "click" de cada picturebox a un procedimiento, pues lo estás haciendo de manera correcta:
Código
  1. AddHandler pic.Click, AddressOf pic_Click

y tampoco entiendo que quieres decir con esto:
Citar
Pero la función pic_Click se tendría que cambiar por Form_Load que es donde está alojada? :P

No entiendo si es que se aloja un huesped o se aloja mi vecino, pero sea como sea al Form_Load no hay que asociarle más eventos que el "load", no te vuelvas loco.

en resumen, no entiendo nada.

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 18:42 pm
No entiendo si es que se aloja un huesped o se aloja mi vecino, pero sea como sea al Form_Load no hay que asociarle más eventos que el "load", no te vuelvas loco.

Código
  1.        Dim widaco As Integer = 126 'Tamaño del picbox
  2.    Dim pcb_() As PictureBox
  3.  
  4. Private Sub frmModpacks_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  5.  
  6.        AddHandler pcb_.Click, AddressOf frmModpacks_Load
  7.  
  8.        For pcb_num = 0 To Array_Size
  9.            Application.DoEvents()
  10.            pcb_(pcb_num) = New PictureBox
  11.            pcb_(pcb_num).BackColor = Color.FromArgb(255, pcb_num * 3, pcb_num * 2, pcb_num)
  12.            pcb_(pcb_num).Height = 77
  13.            pcb_(pcb_num).Width = widaco
  14.            pcb_(pcb_num).Left = 36
  15.            pcb_(pcb_num).Top = 90 * pcb_num
  16.            pcb_(pcb_num).Image = Image.FromFile(".\Art\im\" & pcb_num + 1 & ".png")
  17.            pcb_(pcb_num).Click = Shell("java -Xincgc -Xmx1024m -cp "%appdata%\.likesoft\launcher\.minecraft\bin\minecraft.jar;%appdata%\.likesoft\launcher\.minecraft\bin\lwjgl.jar;%appdata%\.likesoft\launcher\.minecraft\bin\lwjgl_util.jar;%appdata%\.likesoft\launcher\.minecraft\bin\jinput.jar" -Djava.library.path="%appdata%\.likesoft\launcher\.minecraft\bin\natives" net.minecraft.client.Minecraft " & text1.text, AppWinStyle.Hide)
  18.            Me.Controls.Add(pcb_(pcb_num))
  19.            pcb_(pcb_num).Parent = Panel1
  20.        Next
  21.    End Sub

Citar
frmModpacks_Load

Hay es donde se aloja el code para ponerle el AdressOf.



Sobre lo del Shell no se como podría llamar al juego si no es por shell... Ya veré. :silbar:



Sobre lo del shell haré lo que has dicho cuando termine con lo del Click, tomemos preferencias. :P


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 14 Junio 2013, 19:14 pm
...ya tienes trabajo Seazoux:

Código:
Google + VBNET + AddHandler
Google + VBNET + AddressOf

Lo que estás haciendo es incoherente, pero no te voy a explicar porque (al menos yo no, si otro quiere hacerlo ...que lo haga), lee un poco.

El día que te salga de los web*s leer para que sirve cada cosa antes de meterla en cualquier parte del código, ese día me alegraré, en serio.

Cada vez que hagas click en un picturebox, se llamará al sub "frmModpacks_Load", ¿Eso lo entiendes? (no lo digo con sarcasmo), se procesará todo lo del formload cada vez que hagas click, entonces entenderás también porque no debes asociarlo a ese procedimiento...

Sobre lo del Shell no se como podría llamar al juego si no es por shell... Ya veré. :silbar:
Pues te lo acabo de decir.

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 19:29 pm
Mira lo que he encontrado por ahí:

http://www.java2s.com/Tutorial/VB/0220__Event/AddHandlerbtnClickAddressOfbtnClick.htm

Me suena de algo :P


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 14 Junio 2013, 19:35 pm
Para lo de abrir archivos usa esta forma

Asi especificas toda la ruta del archivo que deseas abrir
Código
  1. Shell("C:\Windows\system32\calc.exe", AppWinStyle.NormalFocus)


Asi es cuando el archivo "Calc.exe" se encuentra sobre el mismo directorio donde esta la aplicacion
Código
  1. Shell(".\calc.exe", AppWinStyle.NormalFocus)

Usa tu imaginacion si necesitas abrir muchos archivos y tienen nombres diferentes
debes usar algo como esto, no estoy seguro.. lo e intentado pero con


Puedes usar
Código
  1. Process.Start("")

Para llamar el juego si no puedes con la Shell


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 19:41 pm
Pero que no quiero ejecutar un archivo Batch desde la app... Quiero ejecutar un comando batch desde VB.NET, le pregunté a Black Master y le di un code y me lo transformó en eso.... :-\


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 14 Junio 2013, 19:42 pm
Oye electro, corrigeme esta parte no estoy muy seguro si es asi  :-\

Si, bueno, sin las comillas dobles ni los paréntesis en el "(i)", y teniendo en cuenta que ese "i" séa la variable de un For (obvio xD).

¿Donde leiste que IKillNukes quiera ejecutar una serie de procesos?, creo que tu le entiendes mejor que yo xDDD.

Saludos.


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 14 Junio 2013, 19:48 pm
Pero que no quiero ejecutar un archivo Batch desde la app... Quiero ejecutar un comando batch desde VB.NET

Técnicamente lo que quieres hacer es ejecutar un proceso externo (java.exe), ni más, ni menos xD.

Yo ya te he aconsejado que uses la Class Process para ejecutar procesos y que te olvides de la función "Shell", haz lo que prefieras xD.


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 19:49 pm
¿Donde leiste que IKillNukes quiera ejecutar una serie de procesos?, creo que tu le entiendes mejor que yo xDDD.

Puede ser, aunque nunca se sabe.... Yo lo unico que quiero ejecutar es esto:

Código:
java  -Xincgc -Xmx1024m -cp "%APPDATA%\.minecraft\bin\minecraft.jar;%APPDATA%\.minecraft\bin\lwjgl.jar;%APPDATA%\.minecraft\bin\lwjgl_util.jar;%APPDATA%\.minecraft\bin\jinput.jar" -Djava.library.path="%APPDATA%\.minecraft\bin\natives" net.minecraft.client.Minecraft Playa

Es un code de Batch, pero lo quiero ejecutar desde el mismo Vb.NET, Si es es eso lo que he dicho y es lo que tu entiendes por Serie de Procesos, puede que entonces Syntax me haya entendido :P



Ole! Pa que luego Google digan que es basura :P

Código
  1. Imports System
  2. Imports System.Drawing
  3. Imports System.Windows.Forms
  4.  
  5. Public Class AddressOfEvent : Inherits System.Windows.Forms.Form
  6.  
  7.    Private WithEvents pcb As PictureBox
  8.  
  9.    Public Sub New()
  10.        pcb = New PictureBox()
  11.        pcb.Location = New Point(50, 50)
  12.        pcb.BackColor = Color.FromArgb(255, 0, 0, 0)
  13.        pcb.Height = 77
  14.        pcb.Width = 126
  15.  
  16.        Controls.Add(pcb)
  17.        AddHandler pcb.Click, AddressOf pcb_Click
  18.    End Sub
  19.  
  20.    Public Shared Sub Main()
  21.        Application.Run(New AddressOfEvent())
  22.    End Sub
  23.  
  24.    Private Sub pcb_Click(ByVal sender As Object, _
  25.        ByVal e As EventArgs)
  26.        MessageBox.Show("pcb_Click method", "Events Demonstration")
  27.    End Sub
  28.  
  29.    Private Sub pcb_ClickHandles(ByVal sender As Object, _
  30.        ByVal e As EventArgs) _
  31.        Handles pcb.Click
  32.        MessageBox.Show("pcb_ClickHandles method", "Events Demonstration")
  33.    End Sub
  34.  
  35. End Class
  36.  

Ara solo me queda adaptarlo xD
Un saludo! >:D



Mientras publicabas un mensaje... blablabla

Citar
Técnicamente lo que quieres hacer es ejecutar un proceso externo (java.exe), ni más, ni menos xD.

Yo ya te he aconsejado que uses la Class Process para ejecutar procesos y que te olvides de la función "Shell", haz lo que prefieras xD.

No hombre pa eso hago lo que tu dices, ya que tu eres el que sabe de esto :P


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 14 Junio 2013, 19:49 pm
Pero que no quiero ejecutar un archivo Batch desde la app... Quiero ejecutar un comando batch desde VB.NET, le pregunté a Black Master y le di un code y me lo transformó en eso.... :-\

Entonces usa
Código
  1. Process.Start("C:\Windows\system32\Calc.exe")

Igual sirve tambien para abrir paginas

Código
  1. Process.Start("https://www.google.com.co/")

xD

Inventate algo, se trata al maximo de entender lo que quieres pero si no pruebas una y otra opcion tonces como quieres??'

[sarcasmo]PD: tratare de crear un programa que haga programas asi le expecificas al programa que es lo que quieres de una vez por todas  con tu launcher :laugh:
[/sarcasmo]

Código:
java  -Xincgc -Xmx1024m -cp "%APPDATA%\.minecraft\bin\minecraft.jar;%APPDATA%\.minecraft\bin\lwjgl.jar;%APPDATA%\.minecraft\bin\lwjgl_util.jar;%APPDATA%\.minecraft\bin\jinput.jar" -Djava.library.path="%APPDATA%\.minecraft\bin\natives" net.minecraft.client.Minecraft Playa

Y tu como estas seguro si ese codigo sirve o no ??

lo copiastes de alguna parte o tu mismo lo hicistes dudo mucho que sea la opcion dos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 19:52 pm
Entonces Elektro que insinúas

Que si hago algo tal que así:

Código
  1. Process.Start("java  -Xincgc -Xmx1024m -cp "%APPDATA%\.minecraft\bin\minecraft.jar;%APPDATA%\.minecraft\bin\lwjgl.jar;%APPDATA%\.minecraft\bin\lwjgl_util.jar;%APPDATA%\.minecraft\bin\jinput.jar" -Djava.library.path="%APPDATA%\.minecraft\bin\natives" net.minecraft.client.Minecraft Playa")

Va a wokear? Claro antes tendría que adaptar algunas cosas... Y pa eso voy a necesitar help, puesto que no se como meter todas esas variables dentro del Process.Start y mucho menos como ejecutar java. :-\



Lol que granizo eres, sobre todo por lo del [sarcasmo] :xD

Y tu como estas seguro si ese codigo sirve o no ??

Porque está como code oficial para solventar problemas con mods de Minecraft? :silbar:

lo copiastes de alguna parte o tu mismo lo hicistes dudo mucho que sea la opcion dos

Ehm, tan inutil me ves?????

hyCHmxbGMrc

Ese launcher fue mi primera app con Batch y bueno si tuve un poco de ayuda por parte de Elektro, que porque no sepa hacer casi nada en VB.NET no sepa que no sepa hacer nada de programación en otro lenguaje... ;)
Y ya si te cuento en HTML, pues flipas. :P

Hombre php no tanto, y mysql menos :P


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 14 Junio 2013, 19:59 pm
lo unico que quiero ejecutar es esto:

Código:
java  -Xincgc -Xmx1024m -cp "%APPDATA%\.minecraft\bin\minecraft.jar;%APPDATA%\.minecraft\bin\lwjgl.jar;%APPDATA%\.minecraft\bin\lwjgl_util.jar;%APPDATA%\.minecraft\bin\jinput.jar" -Djava.library.path="%APPDATA%\.minecraft\bin\natives" net.minecraft.client.Minecraft Playa

Es un code de Batch, pero lo quiero ejecutar desde el mismo Vb.NET

No es un code de Batch, no hay nada del lenguaje Batch ahí, es un simple proceso externo con su argumento.

EDITO:
Ese launcher fue mi primera app con Batch y bueno si tuve un poco de ayuda por parte de Elektro, que porque no sepa hacer casi nada en VB.NET no sepa que no sepa hacer nada de programación en otro lenguaje... ;)
Y ya si te cuento en HTML, pues flipas. :P

Hombre php no tanto, y mysql menos :P

Si, todos damos por hecho que tus "habilidades" de programación del foro libre son ciertas y no están exageradas (...), IKillNukes, yo soy muy humilde y está mal que diga esto (me sienta mal decirlo aunque lleve toda la razón), pero crees saber mucho de todo cuando fallas en lo más básico (Y no lo digo solo por VBNET), no intentes presumir de saber algo que denotas no saber, eso es muy lammer.





IKillNukes, ahora he vuelto a fijarme en tu código, y estoy flipando:

Código
  1. pcb_(pcb_num).Click = Shell("java -Xincgc -Xmx1024m -cp "%appdata%\.likesoft\launcher\.minecraft\bin\minecraft.jar;%appdata%\.likesoft\launcher\.minecraft\bin\lwjgl.jar;%appdata%\.likesoft\launcher\.minecraft\bin\lwjgl_util.jar;%appdata%\.likesoft\launcher\.minecraft\bin\jinput.jar" -Djava.library.path="%appdata%\.likesoft\launcher\.minecraft\bin\natives" net.minecraft.client.Minecraft " & text1.text, AppWinStyle.Hide)

Te lo digo de verdad, no voy a contestar a ninguna duda tuya más ni por aquí ni por privado, hasta que llegue el día en que hayas leido lo básico (si es que llega ese día).

Esto es lo último en que te ayudo:

- Click es un evento, no una variable, y tu le estás intentando asignar el código de salida del proceso del shell, KABOOM!

- Aparte, no estás escapando las comillas dobles en el argumento de la función Shell.

- Y me parece que debes tener las excepciones desactivadas en la IDE, porque eso debería pararte en seco la creacion de la ventana del form.

Saludos.


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 14 Junio 2013, 20:00 pm
Nose, mira aver

A3fxedcKepA


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 20:04 pm
Lol? Ahora me estoy dando cuenta de que no he excapado las comillas, pero lo del Click es verdad, me he echado la mano a la cabeza cuando lo he leido, pero como soy tan retarded Wau! Dios santo, Que cabecica soy... :xD

Tienes razón, un despiste lo tiene cualquiera. Y si hay solo van las propiedades de los Pcbs... Si llamo al pcb_.Clic, va a seguir surtiendo efecto?

Voy a hacer probaturas.... :P
No seas así, que entonces me quedo sin soporte... :-[


Título: Re: Scroll de Imagenes?
Publicado por: SγиtαxEяяoя en 14 Junio 2013, 20:09 pm
Ese launcher fue mi primera app con Batch y bueno si tuve un poco de ayuda por parte de Elektro, que porque no sepa hacer casi nada en VB.NET no sepa que no sepa hacer nada de programación en otro lenguaje...
Y ya si te cuento en HTML, pues flipas.

Hombre php no tanto, y mysql menos

Para eso tienes el post de Cuantas habilidades tengo (http://foro.elhacker.net/foro_libre/cuantas_habilidades_teneis_programacion_idiomas_aprendizaje_de_algo-t387958.0.html)

Concéntrate en una sola cosa joder ¡¡¡

Anda joder ya sabemos, que sabes todo  :¬¬ ¿Pero manejar VB?

Hasta ami se me resulto algo muy facil, pero aún estoy aprendiendo no soy del todo experto como tu  ;)




Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 14 Junio 2013, 20:20 pm
Bueno no te metas conmigo por hacer ese tipo de posts... :xD

Ehm, si hice que funcionase!!! :P

Ahora me falta hacer que... cada uno tome su propio path al ejecutarse...

Digo el code? :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 16 Junio 2013, 20:14 pm
Ahora tengo una duda sobre tu Snippet, y es que, como tengo que meterlo, es decir, Tengo tu code principal que es este:

http://foro.elhacker.net/net/scroll_de_imagenes-t391409.0.html;msg1858088#msg1858088

Ahora este code:

http://foro.elhacker.net/net/scroll_de_imagenes-t391409.0.html;msg1858591#msg1858591

Lo debería poner a continuación del otro o como? :-\
Estuve probando hace más de una semana y no obtuve resultados. :silbar:


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 16 Junio 2013, 20:28 pm
El primer código es el formulario de un proyecto...

El segundo código es una Class que contiene un control extendido...

...Ya te lo dije, si no aprendes lo básico yo no te facilitaré códigos (Ni a nadie que siga el mismo camino),
si para ti ha sido imposible ver o entender la diferencia entre esos dos codes (No me extraña, no lees) aquí tienes algo de información para empezar a leer y entender como se puede usar el segundo code:

Google + VBNET + User controls

8zuH45omnTw

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 17 Junio 2013, 18:28 pm
Por cierto, las flechas de tu proyecto me gustan me las puedes pasar? :P


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 17 Junio 2013, 18:42 pm
Por cierto, las flechas de tu proyecto me gustan me las puedes pasar? :P

. . .

Código:
".\Resources"

saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 20 Junio 2013, 22:12 pm
Ya he creado yo unas xD



Puesto que no me creías con lo de los MsgBoxs mira:

OCJXk3qJwVA


Un saludo. ;D


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 21 Junio 2013, 12:50 pm
Puesto que no me creías con lo de los MsgBoxs mira:

No he dicho que no te crea, de hecho no he dicho nada al respecto sobre eso xD, solo digo que es imposible que se llame dos veces a si mismo.

El video es privado.

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 21 Junio 2013, 14:50 pm
Bueno no recuerdo lo que dijiste, tu ya me entiendes ;)
Ya lo he cambiao, ando borracho a veces y no recuerdo si había que poner Privado u Oculto xD



Lo más raro es que si reinicio la app no sucede eso... :-\
(Si sucede lo que pasa es que como quite los MsgBox no me doy cuenta. :silbar:)
Aún más interesante:

Código
  1. If Not File.Exists(".\Modpacks\" & prueba7 & "\run.bat") Then

Ese code se lo salta.... :(



Más bugs:

Puse un Application.Restart, y para que veas que si se instala 2 veces, se inició dos veces la misma app, al pulsar el botón Aceptar de un MsgBox.

Un saludo.


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 21 Junio 2013, 16:19 pm
Lo del flickering, al final del video, lo solucionarias si usases mi panel, y activases la propiedad de desactivar el flickering.

O podrías copiar la parte del flickering en tu panel, lo mismo da.


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 21 Junio 2013, 16:24 pm
No si del Flickering me da igual xD

En fin, y lo demás me ayudas?
A las cosas que no le he metido mano, no te pido que me ayudes, cuando le meta mano ya te preguntaré, si me surge alguna duda. >:D


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 21 Junio 2013, 16:50 pm
En fin, y lo demás me ayudas?

Ah eso ya te respondí lo que pienso hace unos días... lo siento pero no te hago códigos, cosas como que uses un "with" sin saber para que sirve, y que lo uses en un bloque de casi 100 líneas sólamente para modificar 1 propiedad de un control... cosas así me desesperan, normal que tengas 1.000 errores en el código, yo no voy a invertir tiempo en resolver parte de tu proyecto para que mañana hayan otros 1.000 errores más porque no quieras aprender, y que encima lo publiques en el concurso diciendo que todo es tuyo.

Saludos


Título: Re: Scroll de Imagenes?
Publicado por: z3nth10n en 21 Junio 2013, 16:52 pm
Joer no seas malo, si hay más errores los intento solucionar, que te crees que no he mirado porque no puede ir? Estoy harto de cambiar cosas y que siga sin funcionar, tio venga porfis. :-(


Título: Re: Scroll de Imagenes?
Publicado por: Eleкtro en 21 Junio 2013, 17:38 pm
te crees que no he mirado porque no puede ir? Estoy harto de cambiar cosas y que siga sin funcionar

Yo no dudo que hayas intentado buscar el error de porque no funciona,
pero lo que haces es como si un astrónomo coje un telescopio para buscar una estrella en el cielo sin conocer su orbita, su latitud, las constelaciones, y el resto de factores básicos del "lenguaje".

Es decir, tocas sin saber ...y así no se va a ningún lao.

PD: no quiero discutir esto más.

Saludos!