Mensajes

muchas gracias ^^ funciona a la perfeccion


saludos

weno me e topao cn un problema a k no le encuentro soluicion xD

tngo un bas para leer INI's y asi cargar cierta configuracion

weno tngo una lista d juegos asi en el INI

Código [Seleccionar] Expandir

[1]
nombre=juego1
autor=pepe
estado=ktimporta

[2]
nombre=juego2
autor=pepe2
estado=ktimporta2

y asi sucesivamente

lo k quiero es mostrar todo eso en un ListView cada categoria en una columna, para ello pense usar un bucle pero me da el siguiente error

"El tipo de agurmento ByRef no coincide"

el código del bas es este

Código [Seleccionar] Expandir

Option Explicit
Private Declare Function GetPrivateProfileString Lib "Kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Private Declare Function WritePrivateProfileString Lib "Kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Public Function LeerIni(lpFileName As String, lpAppName As String, lpKeyName As String, Optional vDefault) As String
    Dim lpString As String
    Dim LTmp As Long
    Dim sRetVal As String

    If IsMissing(vDefault) Then
        lpString = ""
    Else
        lpString = vDefault
    End If

    sRetVal = String$(255, 0)

    LTmp = GetPrivateProfileString(lpAppName, lpKeyName, lpString, sRetVal, Len(sRetVal), lpFileName)
    If LTmp = 0 Then
        LeerIni = lpString
    Else
        LeerIni = Left(sRetVal, LTmp)
    End If
End Function

Sub GuardarIni(lpFileName As String, lpAppName As String, lpKeyName As String, lpString As String)
    Dim LTmp As Long

    LTmp = WritePrivateProfileString(lpAppName, lpKeyName, lpString, lpFileName)
End Sub

tambien he usado un timer pero me da otro error

saludos

sorry y gracias xD me creia k era un listbox xD

ya ire dando detalles del proyecto de momento solo el nombre

GoFire xD

saludos

le das a proyecto -  referencias

hay seleccionas la DLL y aceptas, y listo

saludos

PD: No se si es eso lo k preguntas

weno toy haciendo una programita y necesito listar uuna lista d datos en un listbox pero en columndas y k arriba de la columna salga el nombre de la categoria

exactamente como sto



saludos

usa GCFScape es para ver los archivos CGF

pero stan cifrados, si sacas los archivos no te lo va a ejecutar nada xk es como si no fueran esos archivos

PD: ya han sacado el HL2: EP1 xD


saludos

po eso, ai alguna manera d desabilitar el clipboard, o detener su proceso, y si se pudiese deneter su proceso, cual es xD

saludos

ya e oido x ahi que algunos programas d pago stan en versiones Nulled, pero k es eso?? supongo k sera algo parecido a crakeado o asi xD nose exactamente


bye

EDIT.- me ekivoke d foro -_- no se puede mover ¬¬ k algun mod lo mueva ^^ saludos

gracias ^^, pero una cosa, cuando se compila hace falta el manifiest? o no :S

salu2

he visto varios programas k exos cn el VB 6 los botones, las barras de progreso y demas se ven cn la apariencia dl XP, pero los programas k ago no se ven asi, se ven como en el Win 98, eso es lo k quiero saber, como ago pa k salgan asi  :PxD

salu2 ^^