SoloCodigo

Hola, estoy haciendo un programilla de VB 6.0 a partir de una dll en C++, y me da este error en la siguiente linea:

Alguien sabe el motivo o como solucionarlo?

...
Dim cpu As Single
DLLpon_cpuUsage (cpu)
MsgBox "Datos introducidos correctamente"

...

Dim cpuUsage As Single

DLLdame_cpuUsage (cpuUsage)

Supongo que la línea a la que te refieres es a la que has marcado en negrita....

----------

Post data: Me edito no había leído que más abajo incluías parte del código que estás usando:


Como puedes ver esa declaración no utiliza parámetros...
entonces tu código debería quedar así:

Me cito... por si no te enteraste la 1ª vez..

Lo 1º es indicarte que este es el foro de VB no de C.

Sobre porqué no te 'admite' los include, es mejor que lo preguntes en el foro de C# : viewforum.php?f=50 o en el de C, C++ : viewforum.php?f=18  que para eso están... quizás no los hayas visto, aveces ocurre tenerlo delante de las narices y no verlo.

Si, al principio es lento, pero a medida que va pasando el tiempo, parece como si te metieras en la piel del 'individuo' que lo hizo y empiezas a avanzar un poco más rápido, nunca dejará de asombrarte determinadas 'barbaridades' y a veces verás un tocho de código de 30-100 líneas que simplemente se puede resumir en 4 líneas, pero debido al tamaño hasta que no lo analices complatamente (esas 30-100 líneas) no te das cuenta de lo que pretendía hacer, luego, inevitablemente, se te escapa una sonrisa de tipo desesperante (es como si trataras de resolver un puzzle infantil) ....

No hay problema en aceptarlo. Simplemente hay que poner las cosas claras a quien te hace el encargo.

Hay que explicarle tu limitación al respecto (posiblemente use fórmulas que desconozcas), en este caso conviene que quede perfectamente aclarado que no son 1 sino varias tareas.

A - Estudiar el código escrito: tratar de captar estructuras, enumeraciones, funciones...
B - Ordenar las ideas: trata de unificar estructuras, funciones y enumeraciones y deducir las clases resultantes.
C - Rehacer el código: rediseña un esqueleto más sólido que permita añadidos sin que fuercen cambios profundos. Especialmente sepáralo completamente de la interfaz, no metas código de cálculo dentro de un botón, dentro de un botón sólo debe ir código de interfaz y llamadas a funciones que realizan el cálculo, pero no el cálculo mismo.
D - Hacer los añadidos nuevos: saber donde se deberá ubicar, entender como influirá a lo que ya hay...

Otra solución es dejar de lado el código actual siempre que te endorse alguien que aunque no tenga conocimientos en programación si que tenga los conocimientos en el área solicitada. Entonces tu vas plantando la lógica y los cálculos serán llamadas a funciones del nombre del cálculo con los parámetros que utiliza, que de momento queda vacía (en esqueleto y una devolución razonable para probar la sección del programa). Por tanto en un momento dado la persona que te han asignado te deberá explicar qué cálculos se utilizan, cómo y que párametros necesita, a ti te corresponde traducir ello a código.

De todos modos estudiar un código ajeno puede llegar a ser muy molesto en ello influye el tamaño del programa (de cuántas líneas estamos hablando?) y el tiempo que puede llevarte, tanto como tu persevarancia para aguantar una situación de ese tipo.

Piensa también que no es lo mismo leer código que no entiendes realizado por un entendido que leerlo de alguien que no tiene sólidos conocimientos, hay una gran diferencia. Del primero posiblemente haya partes que tantas veces las leas, tantas veces seguirás sin entenderlas pero del segundo sólo es 'poner en orden' . Del primero posiblemente se pueda decir que te resulte difícll mejorarlo , del segundo queda fuera de toda duda que será más rápido y breve.

... en fin aceptarlo o no, depende más de tus capacidades que de otra cosa, especialmente si como dices dicho código está escrito por alguien 'principiante'...

Debes usar la api: 'SetWindowPos'
Esta es la declaración: Private Declare Function SetWindowPos Lib "user32" Alias "SetWindowPos" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Los parámetros son:
    hwnd : el hwnd  del formulario en cuestión.
    hWndInsertAfter:  este parámetro significa 2 cosas, o bien el hwnd del formulario sobre el que se posicionará debajo , o una constante que indica como se comporta en el orden Z,  estas constantes te las describo como una enumeración al final... en el ejemplo...
    X: la nueva posición horizontal
    y: la nueva posición vertical
    CX: el nuevo ancho que le quieres dar
    CY: el nuevo alto que le quieres dar
     wFlags: son estados para especificar más opciones de tamaño y posición, resulta bastante largo de especificar en detalle, por lo que lo omito...


Para probar el programa copia el código y pégalo a un nuevo proyecto, añade un botón y dale a ejecutar.... Ten en cuenta que los valores que lo colocan en primer plano son los valores -1 y 0 y el valor que le devuelve la 'normalidad' es el valor -2.


Por último indicarte que no abuses de colocar ventanas encima del todo, deja que el usuario decida si le interesa o no. Sólo los malos programadores y las malas aplicaciones le quitan la decisión al usuario...

Nota: en el modo -1 comparte orden con el administrador de tareas, el que tenga el foco activo se coloca encima... es para evitar fantasmadas de lamers...

p.d.: se me olvidaba... para que se quede encima de la barra de tareas, debes maximizar la ventana y ponerla sin bordes, estos es, establece en diseño: windowstate=2 y borderstyle=0

Decir también que hay formatos predefinidos para los tipos generícos de datos, los cuales se pueden invocar por sus nombres i pasar mediante una enumeración..

Un ejemplo que va pasando por diferentes formatos... tras exponer cada formato realiza una pausa de unos 3 segundos...


Hay más formatos predefinidos, sobretodo usando fechas... pero la idea creo que es ilustrativa...

Efectivamente, con format$ , además hay que usarlo en el evento validate tal como muestra F_Tanori, pero de paso aprovechamos para comprobar si está dentro de los valores deseados.
Aquí el ejemplo completo que formatea el número pero además controla si el valor introducido está dentro del rango 5-100, esto es no acepta otros valores distintos de los de dicho rango.


Por supuesto el control text1 debe tener su propiedad CausesValidation a True, de otro modo no recibe dicho evento... (por defecto Causesvalidation se establece a True, por lo que salvo que se cambie desde código no haría falta cambiarlo, pero para prevenir despistes quizás convenga añadir una línea en la carga del formulario:

 
[/code]

En Vista tienes una versión distinta del componente. Las referencias son un 'numeraco' largo que se crea del componente para identificarlo unívocamente.

Por ejemplo si tienes un archivo llamado componente.dll versión 3.123 tendrás un identificador diferente si también tuvieras el mismo componente.dll versión 2.853.

Puedes hacer 1 de 2 cosas: localizar la referencia en tus archivos y sustituir el identificador manualmente por el correspondiente, o bien eliminar la referencia del proyecto, guardarlo, cerrarlo volverlo a abrir localizar la referencia nuevamente pero ahora ya la versión que viene con vista y añadirla, luego vuelve a guardar el proyecto.

buenas tardes que tal,

e visto un ejemplo en visual basic 6 que en un combobox muestra dos columnas, sin crear dos combos

Vas confundido, en VB6 un combobox puede mostrar varias columnas pero en realidad son la misma y única columna, es decir despliegas los elementos que tiene en vez de en una columna larga en varias columnas cortas, pero a efectos prácticos es una y sólo una columna aunque a efectos estéticos se vean varias.

Piensa en un combobox como una matriz unidimensional, si necesitas 'una matriz de varias dimensiones', entonces utiliza un datagridview (por ejemplo), donde cada columna es efectivamente  independiente.

hi amios, tengo un peño problema  espero q me ayuden  
quiero q en un lbl me vote un nº negativo y positivo ejm -1,+2,-3,+4....

En este programa me vota : 1,3,5,.... Yo quiero q me vote -1,+3,-5,+7......
 

Esto es la serie de Euler... parece que ahora le ha tocado el turno a las series matemáticas para los problemas  que os plantean  los profesores ... que mejor que distraer al personal no usando el nombre de la serie, verdad ????.

Aunque mosquito te da un algoritmo que resuelve tu problema, cuando se trabaja con números lo mejor es usar strings lo menos posible...  es decir sólo en la entrega al control si es posible...

El siguiente código lo resuelve de dicha manera...


Lo ideal es montar el código en una función de modo que se le pasen 3 parámetros valor inicial, cantidad de elementos a calcular y distancia entre cada número, que en el bucle se identifican con el  punto de inicio del bucle, punto alto del bucle (en el ejemplo se ha supuesto que un control scroll señala la cantidad a calcular) y el paso (step)... los valores se alamcenarían en una matriz que al término del bucle entrega....

Sr(a)

...o ser del espacio exterior, ó ...

Cuando  se habla con alguien no es necesario saber su sexo, ni su ciudad, ni su edad, ni su 'color preferido' ni nada más que su nombre. Baste decir su nombre: Nebire a secas no te deja caer en posibles errores, salvo que la malintencionalidad de uno quiera suscitar disputa creándose un 'auto-cacao mental'.

   La critica es saludable. "Cuando es Constructiva".

El último párrafo (que parece ser en el que basas toda tu respuesta), sólo te invito a hacer el uso adecuado del foro. antes de postear asegúrate de hacerlo en el sitio adecuado.
Dicho de otra manera, en ese párrafo te señalaba que no confundas un 'foro' con un 'chat'.

  El hacer una refelexion de tipo tecnica, no persigue descalificar. Sino poner las cosas en su lugar.
El problema de delphi con respecto a desarrolo de aplicaciones "practicas" en el area de inteligencia artificial, radica en la poca documentacion
que existe al respecto. (cuando hablo de problema, se refiere a una situacion que debe ser resuelta).
Por si no entendio, la disyuntiva: "delphi<=>ia", apela a la posibilidad de poder incoporar rutinas que "reconozcan patrones", en forma nativa dentro de un ejecutable delphi.
¿por que nativas?
por que es muy facil portar delphi (que trabaja en windows) a Lazaruz (que trabaja en Linux/windows)
la alternativa ".net", es un salvavidas "lento". (aqui, no es mi intencion decir .net en malo). se debe entender asi:
.net , no cumple las espectativas , en relacion tiempo de respuesta al cual estan habituados, los clientes (usuarios finales).
 

..bla, bla, bla...  para justificar tu mala leche.
Yo no he mencionado en ninguna parte de mi mensaje, nada ni de : NET, ni de Delphi, ni de 'posibilidad de poder incoporar rutinas que "reconozcan patrones"', ni de ' es un salvavidas "lento"', ni de '.net , no cumple las espectativas', ni nada de nada de lo que mencionas, para que saques conclusiones de ningún tipo.

La verdad es que con interlocutores como usted se hace "dicifil avanzar".

Fíjate que difícil es avanzar (conmigo), que te señalo (en el mensaje anterior), que uses el lenguaje que te salga de los güevos, sin preocuparte de lo que digan los demás acerca del lenguaje que a ti te parece adecuado a tus necesidades (aunque sólo fuera por que es el único que conocees en profundidad), especialmente si has concebido un modo de llevarlo a cabo (aquello que quieres hacer) .

...O sea no por ser distinto a usted, pretendo faltarle el respeto...

Claro, claro... fíjate si somos distintos, yo tengo la piel verde, una cabeza que ocupa la mitad de mi masa corporal, con un sólo ojo y 4 patas (12 dedos por cada pie) y escribo con 3 orejas que son como tentáculos, además mi lenguaje natural es el 'raticulín', de modo que utilizo un programa automático para traducir al español. Provengo del planeta Ganímedes y formo parte de una avanzadilla cuyo objetivo es invadir toda la galaxia para ser los amos del mundo... por eso contesto en estos foros, para distraer a la gente mientras me hago con el control del palneta.

...vamos que cualquier parecido entre tú y yo es pura casualidad... pero ávido tú, con 3 mensajes ya conoces todas las diferencias entre tú y yo. Que, por supuesto, los demás foreros, ¿tontos ellos?, no han percibido.

Mira, en el mensaje anterior sólo te he indicado 3 cosas:
la 1ª que... Un lenguaje poco apto para determinada tarea se convierte automáticamente en el más apto (para una determinada persona... )   SI   es el único disponible, o el único que se conoce.

la 2ª que... el (conocimiento y) uso de matemáticas y/o física es deseable, pero si no se poseen, no está todo perdido, todavía pueden crearse buenos programas en el 95% de las situaciones, queda claro que quizás no se podrá diseñar un programa que controle un experimento de una central nuclear, pero todavía la interfaz gráfica o partes del mismo si.

la 3ª que... aunque me agrada conversar de casi cualquier cosa, hay que distinguir las diferencias entre un foro y un chat, y que por ello (porque esto no es un chat) este mensaje no está ubicado en el sitio más adecuado.

Esto es el resumen de mi mensaje anterior, cualquier otra interpretación de tu parte se debe a las 'diferencias' que tu encuentras y que por cortesía te he enumerado...

 ...he buscado y no he hayado nada...

Esto sólo es posible si no sabes buscar...

...los que he hayado son muy complicados, y necesito algo mas sencillo...

Esto también es improbable...

Un bucle While es casi idéntico a un bucle for. De entrada sirven para lo mismo, repetir un determinado código una cierta cantidad de veces.
La diferencia entre el 'for' y 'while' es que la cantidad de veces que se ejecuta un bucle for es más o menos conocida, en cambio en un bucle while se usa cuando no se sabe la cantidad de iteraciones que se deben hacer. (digo que la cantidad de iteraciones de un bucle for es más o menos conocida, porque puede programarse de forma que su ciclo de salida nunca se alcance, en cuyo caso se sale con exit for... o un goto...).

No obstante mejor que explicar while es explicar Do...loop que es lo mismo.
Los siguientes son firmas del mismo tipo de bucles
 while...wend
do while .... loop
do until .... loop
do ... loop while ...
do ... loop until ...

La caracterítica de este tipo de bucle es que es condicionado (un bucle for en principio es incondicional, se ejecuta un número determinado de veces, aunque esto sólo es la definición del mismo, ya que en la práctica no es verdad.).
Que un bucle es condicionado quiere decir que se ejecuta mientras se cumpla una condición (tambén puede expresarse, mientras no se cumpla una condición). De hecho si traducices While significa precisamente: While =  'mientras' . Entonces la lógica del bucle es:

Da igaul que te hayan pedido x ejemplos yo sólo te pondré 1.

Crea un proyecto, añade un botón y mete este código dentro del evento click del botón.
Este ejemplo, crea una pausa de 1 hora. Timer es una función que le pregunta al sistema cuanto tiempo ha transcurrido desde las 12 de la noche. (Nota: el ejemplo fallará si se ejecuta entre las 11 de la noche y las 12, ya que cuando llegue a las 12 timer retorna su valor a 0, como el propósito es meramente ilustrar el uso de los bucles condicionales, pasamos por alto esta situación).
Cuando  pulsamos el botón, lo primero que se hace es desactivar el botón (no se puede pulsar nuevamente), hasta que sale del bucle después de una hora, que como se ve le indicamos que se vuelva a activar. Para hacer el ejemplo, más ilustrativo hemos añadido unas simples líneas que van mostrando el 'paso' de la ejecución del bucle.

Para probarlo, es mejor que cambies el valor de la condición de 3600 (1 hora) a por ejemplo 30 sg, que es una espera 'asumible'.
Fíjate que podemos remplazar la firma del bucle sustituyendo :
'do' por 'while ahora - inicio < 3600'  y sustituyendo 'loop while ahora - inicio < 3600' por wend... en el caso presente, el cambio no tiene importancia, sin embargo en otros casos no es tolerable. La razón principal reside en cuando se comprueba la condición.. si la condición se pone abajo, el bucle se ejecuta siempre como mínimo 1 vez, en cambio si se ejecuta la condición arriba, puede darse el caso de no llegar a entrar en el bucle si la condición ya se satisface...´Con esto lo que te quiero indicar es que de alguna manera olvides el uso de while ...wend en favor del do ... loop que por lo indicado es más versátil.

Por último indicarte que el bucle do ... loop permite tanto el uso de 'while', como de 'until'... Decir que cualquier bucle puede ser erediseñado para usar indistintamente uno u otro, pero según el caso de que se trate es más fácil diseñar un bucle con while o con until...  (until = hasta que...)  . El uso de estas 2 posibilidades es el equivalente a decir: 'El domingo no trabajo", esta frase es más fácil que decir "No trabajaré aquel día que no sea ni lunes ni martes ni miércoles... ni sábado'...
el ejemplo anterior reconvertido a until:
 

En este caso ha sido fácil (porque sólo usamos una condición y además es de comparación)... fíjayte que al caso es lo mismo decir :
'Hacer esto :  sumar 1 :  mientras  la suma sea menor de 100' que lo siguiente:
'Hacer esto : sumar 1 : hasta que la suma sea mayor o igual que 100'

...ya debería quedarte claro...

No das detalles de lo que llevas avanzado, pero bueno... supondremos entonces que estás al principio, es decir sabes lo que quieres hacer(o casi) pero no como lograrlo...

Como debes saber la notación postfija no precisa parçéntesis. Bien partiendo de aquí es necesario que sepas y establezcas una tabla de prioridades aplicada a los operadores...

Para no hacerlo más complejo de lo necesario supondremos que tus operadores son operadores aritméticos, es decir  +, - *, / (las 4 operaciones básicas).
Como sabrás el orden de prioridad de los operadores aritméticos es 1º: multiplicación, 2º: división, 3º: suma, 4º: resta. Por tanto una expresión como: 5*2 + 3 / 3 - 6 * 2 puede de entrada ser distinto de : (5*2) + (3/3) - (6*2) y  ser distinto de: (5 * 2 + 3) / (3 - (6 * 2)) , etc... por tanto  a dichos operadores hay que añadir los operadores: 0º: ( , y el -1º: )

Dicho de otro modo, la tabla de prioridades es una definición de las 'normas'  cuyo criterio ha de cumplir tu programa según lo esperado. Debes saber que lo que está entre paréntesis se ejecuta antes que el resto, por ello los símbolos de paréntesis deben definirse también como operadores, en este caso sólo operan prioridad, lo que implica un orden, por tanto si los defines como operadores de orden, nadie podrá decirte que no. Entendiendo correctamente estos antecedentes, ya podemos empezar a formular nuestro analizador...

..digamos que nuestro compilador tendrá al menos 2 fases claras, una que analiza las expresiones entradas y otra que después evalúa (opera con) el resultado.
Ciertamente para ello necesitamos una pila y lo mejor para todo ello es trabajar con clases, para trabajar más cómodamente cada apartado. Visual Basic no tiene una pila como objeto de programación, por tanto lo 1º será recrear una sencilla pila.

Te pongo un un ejemplo, que podrás modificar a tu gusto. nota especialmente que a esta pila le hemos dado una propiedad 'especial', al permitir que actúe como fifo, filo incluso como ambas a la vez...
Nota que el VB 6.0 lo mejor para implementar una pila es una colección. y nota también que nuestra pila es una pila genérica, por eso utilizamos elementos de tipo variant.
Si  a la hora de utilizarlo tienes claro que sólo usarás un tipo de elemento, por ejemplo string, sería conveniente cambiar los prototipos a string en vez de a variant, sin embargo fíjate que es probable que necesites usar más de una pila en tu proyecto por lo que podrías necesitar realmente tener un tipo variant,... qué tal si la pila de tu proyecto usara como elementos precisamente elementos de tipo pila ???. Tendrías muchas posibilidades de un gran trabajo adelantado por una enorme sencilez antes esta posibilidad... piensa en ello detenidamente...

... a la tarde continúo en otro mensaje, el post será un poquito extenso... pero de momento puedes probar a mmanejar la pila