Mensajes

Hay controles activex para dar un estilo xp a tus formulaios , pues vi uno k ademas de eso le podias poner los menus estilo office XP

No me acuerdo del nombre

Esto te vale para uno o dos botones, pero si tenes k crear 100?

Un control de usuario lo k ace es comprobar el estado del cursor, y te automatiza el proceso y se compila en el exe, osea que no tenes dependencias de ningun tipo

Salu2

Fuente : Api Guide

Código [Seleccionar] Expandir


'Example submitted by Danjel Nyberg
'It needs a textbox (Text1) and two command buttons (Command1, Command2)
Private Declare Function waveOutSetVolume Lib "Winmm" (ByVal wDeviceID As Integer, ByVal dwVolume As Long) As Integer
Private Declare Function waveOutGetVolume Lib "Winmm" (ByVal wDeviceID As Integer, dwVolume As Long) As Integer
Private Sub Command1_Click()
    Dim a, i As Long
    Dim tmp As String
    a = waveOutGetVolume(0, i)
    tmp = "&h" & Right(Hex$(i), 4)
    Text1 = CLng(tmp)
End Sub
Private Sub Command2_Click()
    Dim a, i As Long
    Dim tmp, vol As String
    vol = Text1
    tmp = Right((Hex$(vol + 65536)), 4)
    vol = CLng("&H" & tmp & tmp)
    a = waveOutSetVolume(0, vol)
End Sub



Conozco mas de 20 sitios en los que el ordenador puede iniciar una aplicacion al iniciar el SO, pero el inicio ActiveX no se donde se encuentra, me podriais ayudar, en google no e encontrao donde se encuentra per omuchos programas lo usan

Salu2

Fuente: api - guide

Código [Seleccionar] Expandir



Private Const SND_APPLICATION = &H80         '  look for application specific association
Private Const SND_ALIAS = &H10000     '  name is a WIN.INI [sounds] entry
Private Const SND_ALIAS_ID = &H110000    '  name is a WIN.INI [sounds] entry identifier
Private Const SND_ASYNC = &H1         '  play asynchronously
Private Const SND_FILENAME = &H20000     '  name is a file name
Private Const SND_LOOP = &H8         '  loop the sound until next sndPlaySound
Private Const SND_MEMORY = &H4         '  lpszSoundName points to a memory file
Private Const SND_NODEFAULT = &H2         '  silence not default, if sound not found
Private Const SND_NOSTOP = &H10        '  don't stop any currently playing sound
Private Const SND_NOWAIT = &H2000      '  don't wait if the driver is busy
Private Const SND_PURGE = &H40               '  purge non-static events for task
Private Const SND_RESOURCE = &H40004     '  name is a resource name or atom
Private Const SND_SYNC = &H0         '  play synchronously (default)
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

Private Sub Form_Load()
PlaySound "C:\WINDOWS\MEDIA\TADA.WAV", ByVal 0&, SND_FILENAME Or SND_ASYNC
End Sub



No se te entiende muy bien, pero ten en centa k es un control para mostrar reportes, = k el listbox, pero con muchas mas cosas, no es un explorador, ni un contenedor ni nada por el estilo...

Salu2

Lo k dice el rey, un servidor online.

se mandan los datos al servidor y el servidor los manda a el otro k este conectado, el servidor sabe las 2 ips.

Salu2

y si pruebas con un txt, es el formato de texto plano, no el d word.

salu2

127.0.0.1 es lo mismo k poner localhost
4936 alomejor es por que tienes algun programa que esta usando el puerto del ftp, y intenta usar otro o es que tu programa se conecta a otro puerto ademas de ese, o tienes el puerto 21 blokeado para ese progrma... kita el firewall y prueba, alomojor es alguan linea de code que no as borrado... cualkier cosa...

Salu2

es mucho mas dificil yamar a la calculadora de windows y luego mandarla las teclas y leer el resultado de la pantallas con hooks, k acrla tu, los hooks es mu avanzado.

Salu2