Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - seba123neo

#2721
si en 5 años no leiste todavia entero un manual....¿que futuro queres? el post se deberia llamar...como ser un MAL programador!
#2722
ese control no es el Winsock...es un control de usuario que usa la clase..."simula el winsock"...se ve que ni idea porque esta a la vista...
#2723
proba crearte uno con la api CreateWindowEx...
#2724
Hola, si no me equivoco usando la api de MessageBox no pasa eso...

saludos.
#2725
con la api TerminateProcess ya basta...
#2726
con un archivo en especial no probe, pero se que se puede "SABER" que archivo fue el modificado con la api ReadDirectoryChangesW, no esta en el api-guide pero en internet hay ejemplos seguro te sirven...

saludos.
#2727
Hola, podes crearte los menues con api....busca en el api-guide ahi esta...

saludos.
#2728
te entendi perfectamente..proba usar la api GetLongPathName,aca te paso un ejemplo facil:

Código (vb) [Seleccionar]
Option Explicit
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal lBuffer As Long) As Long
Private Declare Function GetLongPathName Lib "kernel32.dll" Alias "GetLongPathNameA" (ByVal lpszShortPath As String, ByVal lpszLongPath As String, ByVal cchBuffer As Long) As Long

Private Function GetShortPath(strFileName As String) As String
    Dim lngRes As Long, strPath As String
    strPath = String$(165, 0)
    lngRes = GetShortPathName(strFileName, strPath, 164)
    GetShortPath = Left$(strPath, lngRes)
End Function

Private Sub Form_Load()
    Dim PathCorto As String, PathLargo As String
    PathCorto = GetShortPath("C:\Archivos de Programa\Mozilla Firefox\firefox.exe")
    'esto te devuelve C:\ARCHIV~1\MOZILL~1\firefox.exe
    PathLargo = String(255, 0)
    Call GetLongPathName(PathCorto, PathLargo, 255)
    PathLargo = Replace(PathLargo, Chr(0), vbNullString)
    MsgBox PathLargo, vbInformation
End Sub


saludos.

#2729
Cita de: invisible_hackOsea que con las nuevas versiones ya no se puede programar para msn en VB....que mal...

pero eso no importa...la api esta en el que trae el windows xp por defecto que es la version 4 y algo...

saludos.
#2730
yo tengo los mismo que dijeron ,no cambie nada , hasta hace unos meses andaba...recien probe el widget del messnger que hice y no me anda mas, no anda ningun proyecto que antes andaba para el messenger  :xD, tira todo el mismo error, que paso? los de microsoft remotamente le hicieron algo al .exe??  :xD :xD ya no se que pensar...