Si me habia dado q cuenta q siempre tiraba el  mismo orden.
Con el Randomize se solucionó.
Muchas Gracias, era lo q nesecitaba.
Saludos

Hola. Nesecito de su ayuda gente.
Por un lado tengo una lista de 10 nombres de varones. Guardados en un ListBox o un ComboBox, me da igual. Y un CommandButton1, al lado.
Y por otro lado una lista de 10 nombres de mujeres. Y un CommandButton2, al lado.

Lo q quiero es q al tildar el boton1, me elija aleatoriamente 1 nombre de la lista de varones y me lo muestre en un Label o un TextBox y al presionar el Boton 2, me haga lo mismo pero con los nombres de mujeres.

Muchas Gracias.
Saludos!

Hola gente, etoy tratando de empaquetar mi aplicacion usando el Inno Setup Installer, y lo he porbado en otra pc con Win98, y al momento de ejecutar me tira error, aca les paso el scrip del Inno, aver si me pueden dar una mano, desde ya muchas gracias

[Setup]
AppName=Alarma Por Barrera Láser
AppVerName=Alarma Por Barrera Láser 1.0
AppPublisher=Alejandro Caracoche
DefaultDirName={pf}\Alarma Por Barrera Láser
DefaultGroupName=Alarma Por Barrera Láser
OutputBaseFilename=Alarma-Setup
Compression=lzma
SolidCompression=yes
PrivilegesRequired=admin

[Languages]
Name: "spanish"; MessagesFile: "compiler:Languages\Spanish.isl"

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked

[Files]
Source: D:\Ale\Tesis\vb6sp6sys\stdole2.tlb; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regtypelib
Source: D:\Ale\Tesis\vb6sp6sys\msvbvm60.dll; DestDir: {sys};  Flags: restartreplace uninsneveruninstall sharedfile regserver
Source: D:\Ale\Tesis\vb6sp6sys\oleaut32.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver
Source: D:\Ale\Tesis\vb6sp6sys\olepro32.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver
Source: D:\Ale\Tesis\vb6sp6sys\asycfilt.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile
Source: D:\Ale\Tesis\vb6sp6sys\comcat.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver

Source: C:\WINDOWS\system32\comdlg32.OCX; DestDir: {sys}; Flags: sharedfile regserver uninsneveruninstall
Source: C:\WINDOWS\system32\VB2_SkinControlLt.ocx; DestDir: {sys}; Flags: sharedfile regserver
Source: C:\WINDOWS\system32\VB2_TaskBarControl.ocx; DestDir: {sys}; Flags: sharedfile regserver
Source: D:\Ale\Tesis\vb6sp6sys\MSCAL.OCX; DestDir: {sys}; Flags: sharedfile
Source: D:\Ale\Tesis\Alarma Por Barrera Láser\SMTP.ocx; DestDir: {sys}; Flags: sharedfile regserver
Source: D:\Ale\Tesis\Alarma Por Barrera Láser\WebCam.ocx; DestDir: {sys}; Flags: sharedfile regserver
Source: D:\Ale\Tesis\Alarma Por Barrera Láser\hwinterface.ocx; DestDir: {sys}; Flags: sharedfile regserver

Source: C:\Documents and Settings\Administrador\Escritorio\Alarma Por Barrera Laser1.exe; DestDir: C:\Archivos de programa\Alarma Por Barrera Láser; Flags: ignoreversion; DestName: Alarma Por Barrera Laser1.exe

Source: C:\ding.wav; DestDir: "C:\"; Flags: ignoreversion

Source: C:\WINDOWS\system32\io.dll; DestDir: "C:\WINDOWS\system32"; Flags: sharedfile

[Icons]
Name: {group}\Alarma Por Barrera Láser.exe; Filename: {app}\Alarma Por Barrera Laser1.exe;
Name: {userdesktop}\Alarma Por Barrera Láser.exe; Filename: {app}\Alarma Por Barrera Laser1.exe; Tasks: desktopicon;
Name: "{group}\{cm:UninstallProgram,Alarma Por Barrera Láser}"; Filename: "{uninstallexe}"

[Run]
Filename: "{app}\Alarma Por Barrera Laser1.exe"; Description: "{cm:LaunchProgram,Alarma Por Barrera Láser}"; Flags: nowait postinstall skipifsilent

Hola.
Tengo hecho un conexion de acceso telefonico a redes, la cual esta configurada para un modem 56k.
Y quisiera q clickeando en un boton, la misma se ejecute y se marque automaticamente.
Obviamente al estar creada previamente tiene todo configurado, numero de telefono a discar, etc.
Gracias

1)Describir cuales son los pines q se usan como minimo en la conexion de dos dispositivos conectados via el port serie
2)Se dispone de un instrumento con 8 canal q se conecta a la pc via el port serie. Su funcionamiento es tal q cada canal responde a carateres q van desde el 0 al 7 (cuando le envia el 0 responde con la informacion q ingresa por el canal 0, si es 1 con el 1 si es 2 con el 2 y asi sucesivamente)
Suponiendo q se leen dos temperaturas q ingresan por los canales 2 y 3 respectivamente hacer un programa en C q adquiera dichas temperaturas y las imprima en pantalla en las coordenadas (10,5) y (11,5) respectivamente
Los parametros de comunicacion son
Velocidad: 48000bps
Stop bit: 1
Paridad: ninguna
Datos 8bits
Puerto: com2

La formula de temperatura es T=100.vf en la cual vf es la tension q entrego el sensor
El programa termina luego de pulsar la tecla x minuscula

3)Como se controla la llegada de un dato al port serie?

Gracias, cualquiera sea el pedacito de codigo q puedan aportar para el ej 2, se los agradeceria mucho.

Alguien me puede explicar un poco estos diagramas de paso dejo 2 preguntas
1)Como hace la rom de control en la unidad de control del computador generico para pasar de una direccion a otra
2)Como esta organizado el formato de instruccion en el computador generico
Cualquier otro aporte explicativo es bienvenido, gracias!

http://img154.imageshack.us/my.php?image=microinstrucciones8vk.jpg
http://img156.imageshack.us/my.php?image=unidaddecontrol5hw.jpg
http://img144.imageshack.us/my.php?image=referencias9bs.jpg

Hola, quiero modificar la hora y los minutos al estilo el reloj de windows.
Osea tengo 2 textbox y 1 VScroll1, como se muestra aca:


Y cuando me posiciono en el cuadro de la hora modifico la hora con el VScroll1, y cuando me posiciona en los minutos modifico los minutos, siempre respetando los intervalos obviamente

lambda eso es para .net o VB6, y en todo caso me podrias pasar NotifyIcon.ocx q no la puedo conseguir por ningun lado

Puse eso y no me funciona me tira error en la linea: NotifyIcon.SetEnabled True
Como hiciste??

Muchas gracias, lo adapté a mi codigo quedo perfecto