Mensajes

es mejor con la api RegisterHotKey, ya que eso solamente funciona si tu aplicación esta activa.

[Environ]

hombre estas ponieno mal las variable de entorno, no van con comillas y se le antepone Environ antes..aparte te la devuelve en path corto.asi se pasa al largo:

Código (vb) [Seleccionar] Expandir

Option Explicit

Private Declare Function GetLongPathName Lib "kernel32.dll" Alias "GetLongPathNameA" (ByVal lpszShortPath As String, ByVal lpszLongPath As String, ByVal cchBuffer As Long) As Long

Private Sub Form_Load()
    MsgBox PathLargo(Environ("TMP"))
End Sub

Private Function PathLargo(ByVal pPathCorto As String) As String
    Dim vBuffer As String
    vBuffer = String(255, 0)
    Call GetLongPathName(pPathCorto, vBuffer, 255)
    PathLargo = Replace(vBuffer, Chr(0), vbNullString)
End Function

con FSO tambien tenes funciones para borrar archivos...

saludos.

Hola, proba algo asi:

Código (vb) [Seleccionar] Expandir

Option Explicit

Private Sub Command1_Click()
    Call Buscar("Palabra 100")
End Sub

Private Sub Form_Load()
    With MSHFlexGrid1
        .FixedCols = 0
        .FocusRect = flexFocusNone
        .SelectionMode = flexSelectionByRow
       
        .FormatString = "Items"
       
        Dim i As Integer
       
        For i = 1 To 1000
            .AddItem "Palabra " & (i)
        Next
       
        .ColWidth(0) = 1500
        .RemoveItem 1
    End With
End Sub

Private Sub Buscar(ByVal pPalabra As String)
    Dim i As Long
   
    For i = 1 To MSHFlexGrid1.Rows - 1
        If LCase(MSHFlexGrid1.TextMatrix(i, 0)) = LCase(pPalabra) Then
           MSHFlexGrid1.Row = i
           MSHFlexGrid1.RowSel = i
           MSHFlexGrid1.Col = 0
           MSHFlexGrid1.ColSel = MSHFlexGrid1.Cols - 1
           MSHFlexGrid1.TopRow = i
           Exit For
        End If
    Next i
End Sub


saludos.

si agarras ese pedazo de codigo y con la clase, lo pasas a un proyecto totalmente nuevo ¿tambien te lo hace?

a mi tambien haciendo saltar el error a proposito siempre me entra por el Catch y nunca se me para el codigo con la linea verde y no aparece la Microsoft.visualbasic.dll, solo System.Exception.

¿podra ser que algo este pasando dentro de esa clase Imagen? lo podes poner ? o es privado ??  

cuanto tiene el count al momento de dispararse el error ?

yo probe con una clase cualquiera ir agregandola a la lista y nunca me tiro el error, solo que se me consumio casi toda la memoria de la PC , pero nunca llego al error y no queria seguir.

proba esto:

Código (vbnet) [Seleccionar] Expandir


Public Class Form1
    Public Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As Integer
    Public Declare Function GetSystemMenu Lib "user32.dll" (ByVal hwnd As IntPtr, ByVal bRevert As Boolean) As IntPtr
    Public Declare Function DrawMenuBar Lib "user32" (ByVal hwnd As Integer) As Integer

    Public Const MF_DISABLED As Integer = &H2&
    Public Const MF_BYPOSITION As Integer = &H400&

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Location = New Point(0, 0)
        Me.TopMost = True
        Call DeshabilitarMovimiento(Me)
    End Sub

    Private Sub DeshabilitarMovimiento(ByRef oForm As System.Windows.Forms.Form)
        Call RemoveMenu(GetSystemMenu(oForm.Handle, False).ToInt32, 1, MF_DISABLED Or MF_BYPOSITION)
        Call DrawMenuBar(oForm.Handle.ToInt32)
    End Sub
End Class

saludos.

[Catch ex As System.OutOfMemoryException]

en el Catch no se si sabias podes ponerle lo que quieras, manejar la Excepcion que quieras, ponele esto Catch ex As System.OutOfMemoryException y proba...

saludos.

no tendria porque hacerte eso, ¿ como estas abriendo la base ?

Hola, ¿ pero cuantos usuarios simultaneos tenes ? 3 , 10 , 50 ?? creo que lo mejor seria usar otro tipo de base de datos.

saludos.

emm se supone que un code lo tienes que hacer vos no el creador de la librería, si te fijas no uso apis... ni nada de terceros solo la librería esa que me pareció mas correcta que el reproductor de windows, y las otras opciones no tienen sentido...

de hecho en ningun code nesecitas poner ningun boton porque se pueden crear en tiempo de ejecucion... además dxlib es buena pero aveces tiene sus problemas, queda mejor con controles, además es más comun, si fuera por mi ni la uso a la dxlib...

mm es cierto y lo dije en el post de cph el code es mejorable 150% tomando en cuenta que el maximo es 100%

lo unico que digo es que a nadie se le ubiese ocurrido ese juego porque todos dicen que no se pueden crear buenas cosas.

con opengl quedaría mas lindo, pero no tenía ni ganas

a lo que me referia a ver si me hago entender ahora, es que si alguien por aca conoce de verdad la libreria dx_lib32 sabe que esta libreria trabaja sobre DirectX y los juegos creados con esta libreria son justamente creados en entorno DirectX, este no lo es.

no me referia a crear controles en tiempo de ejecución, ya que estariamos en la misma, con esta libreria no hace falta poner un control o crearlo en tiempo de ejecucion ya que los controles son creados con la libreria misma en el entorno DirectX.

por eso creo que confunde un poco cuando uno ve que tiene como dependencia la dx_lib32, porque en realidad con o sin la libreria este juego es lo mismo, y el uso del sonido lo podes hacer sin la libreria, la verdad se la podes sacar sin problemas.

saludos.