Search found 86 matches

by ARCC
Sun Apr 08, 2012 4:42 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Rutina numero a letras
Replies: 9
Views: 2939

Re: Rutina numero a letras

Buen día para todos... Años sin postear!!! :shock: :shock: :shock: Bueno por acá les dejo una función que hice y coloqué en el foro hace años. En las primeras líneas de código pueden configurar la moneda que van a utilizar. //*******###### Function Num2Txt(nCantidad) //*******######   //Utilice o ca...
by ARCC
Fri Jul 25, 2008 2:04 am
Forum: FiveWin para Harbour/xHarbour
Topic: RUN sin ventana de fondo negra
Replies: 7
Views: 1660

Buen día para todos...

Ahora si Willi ya quedo y muy secillo el código.

Code: Select all

//*******######
Function RunCmd( cCmd )
//*******######

  WaitRun( "CMD.EXE /C " + cCmd, 0)

Return Nil
by ARCC
Thu Jul 24, 2008 8:22 pm
Forum: FiveWin para Harbour/xHarbour
Topic: RUN sin ventana de fondo negra
Replies: 7
Views: 1660

Buen día para todos... Que tal Willi, bueno tu método funciona y no hay que crear ningún archivo temporal, pero tengo una pequeña duda la cual te o les voy a plantear que no ocurre con el método de Victor. Así trabaja bien WaitRun( "COMMAND.COM /C DIR /A:D /B C:\DOCUME~1 > C:\DIR.TXT", 0 )...
by ARCC
Thu Jul 24, 2008 4:07 am
Forum: FiveWin para Harbour/xHarbour
Topic: RUN sin ventana de fondo negra
Replies: 7
Views: 1660

Buen día para todos... Que tal Victor, muchas gracias funciona muy bien pero recuerdo que una vez Antonio Linares colocó un código para utilizar RUN sin la ventana de fondo. Esta fué la función final que resultó de es tu código con unos muy pequeños retoques. //*******###### Function RunCmd( cCmd, c...
by ARCC
Mon Jul 21, 2008 11:39 pm
Forum: FiveWin para Harbour/xHarbour
Topic: RUN sin ventana de fondo negra
Replies: 7
Views: 1660

RUN sin ventana de fondo negra

Buen día para todos...

Que tal amigos, por casualidad saben si es posible ejecutar el mandato RUN sin que salga o aparezca la ventana de fondo negra?.

Ejemplo:

RUN("Dir > C:\dir.txt")
by ARCC
Sat Jul 05, 2008 2:37 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Definiciones de VARIABLES PUBLICAS en FWH 7.12
Replies: 2
Views: 826

Buen día para todos... En Castellano MEMVAR Declara nombres de variables privadas y públicas ------------------------------------------------------------------------------ Sintaxis MEMVAR <lista idVarmem> Argumentos <lista idVarmem> es la lista de nombres de variables públicas y privadas que se van ...
by ARCC
Tue Jun 17, 2008 12:36 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Scroll horizontal en Listbox
Replies: 8
Views: 1242

Buen día para todos... TWBrowse():lHScroll:= .F. //Suprime la barra horizontal @ 29,130 LISTBOX oLbx ;.... ... Carlos, Esta solución que apriori parece mas sencilla, no me ha funcionado. Compila bien, pero al ejecutar, la ventana no reconoce la clase y da error. Que tal Manuel y Carlos, si no recuer...
by ARCC
Thu Jun 12, 2008 3:17 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Pregunta sobre el return
Replies: 5
Views: 868

Buen día para todos... Leandro: Prueba con esto a ver si es lo que necesitas: #include "FiveWin.ch" Function Main() Local aParametro := DevolverArreglo() // Función que devuelve el arreglo MsgInfo( aParametro[1] ) // Devuelto de la función DevolverArreglo() MsgInfo( aParametro[2] ) // Devu...
by ARCC
Thu Jun 12, 2008 1:14 am
Forum: FiveWin para Harbour/xHarbour
Topic: Versión de Windows
Replies: 8
Views: 1443

Buen día para todos...

Horacio:

Un amigo me hizo el favor de probar los 2 códigos que te referí en Windows Vista Home Basic y los 2 funcionaron correctamente.
by ARCC
Tue Jun 10, 2008 4:37 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Versión de Windows
Replies: 8
Views: 1443

Buen día para todos... Arcc, He probado esta función pero me devuelve aOSInfo[ 1 ] = 5 y aOSInfo[ 2 ] = 1. Lo mismo que Windows XP. Alguna Idea. Gracias. Que tal Horacio, bueno como te dije no tengo como probar en Vista pero en teoría deberia funcionar como te comente anteriormente, otra idea sería ...
by ARCC
Sat Jun 07, 2008 11:50 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Versión de Windows
Replies: 8
Views: 1443

Buen día para todos... Disculpen, Revisando encontré que FiveWin 7.12 (el que tengo) tiene una función que devuelve un arreglo con el mayor y menor valor de la versión de Windows GetWinVer(). O sea que podemos simplificar el código anterior eliminando la función de C GETVERSIONEX y quedaría de esta ...
by ARCC
Sat Jun 07, 2008 11:14 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Versión de Windows
Replies: 8
Views: 1443

Buen día para todos... Que tal Horacio, por favor prueba con esto. #include "FiveWin.ch" Function Main() MsgInfo( IsWinVista() ) Return Nil //----------------------------------------------------------------------------// Function IsWinVista() Local IsWinVista := .F. Local aOSInfo := GetVer...
by ARCC
Sat May 24, 2008 12:23 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Otra mas sobre ADO/Access/SELECT *...
Replies: 2
Views: 844

Buen día para todos...

Que tal JmGarcia, prueba de este modo:

oRecordSet:Source:="SELECT * FROM [Listas De Correo]"
by ARCC
Wed Apr 30, 2008 1:33 am
Forum: FiveWin para Harbour/xHarbour
Topic: GROUP-COMO CAMBIAR EL PROMPT EN TIEMPO DE EJECUCIÓN??
Replies: 5
Views: 834

Re: Aplica igual para Button ?

Buen día para todos... Alguna vez traté de cambiarle el p texto a un boton de un dialogo generado desde recursos en tiempo de ejecución y no pude... como sería la solución para un "button" despues de haber pasado por el redefine ? Que tal, prueba con esto a ver si es lo que necesitas oBtn:...
by ARCC
Sun Apr 27, 2008 7:24 pm
Forum: FiveWin para Harbour/xHarbour
Topic: PAIS DE ORIGEN TODOS..
Replies: 62
Views: 13347

Buen día para todos...

Saludos desde Maracaibo - Zulia - Venezuela, La tierra del sol amado y del Petroleo :lol:, de Venezuela lo mejor :roll: