FiveTech Software tech support forums

Tengo una funcion que hice con letras y numeros estylo BINGO que emiten los bancos aqui en mi pais, ellos lo llaman coordenadas, no se si te servidira, igual, la buscco y publico, saludos... :shock: Hola jose luis, saludos. Necesito asesoría sobre la implementacion de impresoras fiscales aqui en vz...

Tengo una funcion que hice con letras y numeros estylo BINGO que emiten los bancos aqui en mi pais, ellos lo llaman coordenadas, no se si te servidira, igual, la buscco y publico, saludos...

#include "FiveWin.ch"FUNCTION Main()   LOCAL n, cPassWord := ""   LOCAL cChars := "abcdefghijklmnopqrsuwyzABCDEFGHIJKLMNOPQRSTUWXYZ?!"   FOR n = 1 TO 10      #ifdef __XHARBOUR__  // xHarbour      ...

Erick Almanza wrote:Buen dia Maestro

Que tan dificil seria un ejemplo en harbour?

Saludos desde Panama,

Erick Almanza

Hola, la primera version que puso es para harbour.

gracias.

Buen dia Maestro

Que tan dificil seria un ejemplo en harbour?

Saludos desde Panama,

Erick Almanza

xHarbour no permite usar las cadenas como arrays, usa esta versión para xHarbour: function Main()   local n, cPasswd := "", cChars := "abcdefghijklmnopqrsuwyzABCDEFGHIJKLMNOPQRSTUWXYZ?!"      for n = 1 to 10      cPasswd += Sub...

? cChars[2] por dar un ejemplo me tira error Time from start: 0 hours 0 mins 0 secs Error occurred at: 08/08/2023, 11:19:38 Error description: Error BASE/1068 Error de argumento: acceso al array Args: [ 1] = C abcdefghijklmnopqrsuwyzABCDEFGHIJKLMNOPQRSTUWXYZ!$# [ 2] = N 2 si hago esto no me tira err...

Estimado Gustavo, function Main()   local n, cPasswd := "", cChars := "abcdefghijklmnopqrsuwyzABCDEFGHIJKLMNOPQRSTUWXYZ?!"      for n = 1 to 10      cPasswd += cChars[ int( hb_random( 1, Len( cChars ) ) ...

Buen dia.
Necesito generar códigos de validacion asi como: !"·!"asdASDQWE! al azar,
existe algun "random" para este tipo de dato en fwh?

gracias.

... así. En .rc tenia definido el botón de Aceptar como "IDOK", cosa que utilizo en todos mis programas, cambiando el mismo por un numero al azar, en mi caso "4101" todo funciona perfectamente. Esto: CONTROL "&Ejecutar", IDOK, "Button", BS_FLAT|WS_TABSTOP, ...

Corroboro la idea de Paquito... Este ejemplo crea elementos al azar: procedure main    local A := Array( Int( hb_Random( 1, 300 ) ) )    local B, C, D  // Arrays adicionales    local nLen := Len( A )  // Elementos del array ...

... no guardan relación (si agrego 2 filas, solo las primeras n-2 filas, muestran un gráfico y los únicos correctos serán los que coincidan por azar). Saludos Fernando Espinoza A.

... informacion ya que parece algo facil, podrias usar un random de los empleados y sacar del array los que ya hayan tenido turno, asi quedaria al azar el que le toque un turno...gracias... Hola buenos dias Jose Luis gracias por responder amigo, pues estoy tratando de dividir y/o restar el tiempo ...

... informacion ya que parece algo facil, podrias usar un random de los empleados y sacar del array los que ya hayan tenido turno, asi quedaria al azar el que le toque un turno...gracias...

... que tenemos un robot y queremos que el robot aprenda la forma más eficiente de salir de una casa. Asi que situamos en robot en una habitación al azar y el robot intenta salir de la casa. El robot aprende de los éxitos y de los fallos, y comienza a mejorar. En unos pocos intentos el robot sabe ...