FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC como progamar un Meter
Posts: 46
Joined: Tue Oct 10, 2006 06:16 PM
como progamar un Meter
Posted: Wed Nov 15, 2006 06:22 PM

HOLA A TODOS

TENGO UN DUDA DE COMO VA LA ESCRUCTURA DE UN METER

EN :oops: FW ES ASI PERO EN PC POCKET COMO LO UTILIZO..

DEFINE DIALOG oCopia RESOURCE "envia" TITLE "Copiando Archivo al sitio " + cFTPSite
REDEFINE BITMAP RESOURCE "GFTP" ID 117 OF oCopia
REDEFINE SAY oSay1 ID 110 OF oCopia
REDEFINE SAY oSay2 ID 120 OF oCopia
:cry: REDEFINE METER oMeter1 VAR nAmount1 ID 111 OF oCopia;
PROMPT " " ;
COLORS CLR_HGRAY, CLR_BLUE ;
BARCOLOR CLR_HGREEN, CLR_BLUE
REDEFINE SAY oSay3 ID 140 OF oCopia
:cry: REDEFINE METER oMeter2 VAR nAmount2 ID 112 OF oCopia;
PROMPT " " ;
COLORS CLR_HGRAY, CLR_BLUE ;
BARCOLOR CLR_HRED, CLR_BLUE
oCopia:bStart := { || SendFiles( aSource, aTarget, nBufSize, oSay1, oSay2, oMeter1, oSay3, oMeter2,;
@lEnd, oCopia, oFTP ,cFTPSite)}
ACTIVATE DIALOG oCopia CENTERED

ESPERO Y ALGUIEN ME PUEDA AYUDAR

:lol:

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
como progamar un Meter
Posted: Wed Nov 15, 2006 06:36 PM

Pedro,

Los meters aún no estan implementados en FWPPC.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 298
Joined: Fri Oct 07, 2005 05:20 AM
Re: como progamar un Meter
Posted: Thu Nov 16, 2006 04:37 AM
prm_pedro wrote::lol: HOLA A TODOS



TENGO UN DUDA DE COMO VA LA ESCRUCTURA DE UN METER


EN :-) FW ES ASI PERO EN PC POCKET COMO LO UTILIZO..


DEFINE DIALOG oCopia RESOURCE "envia" TITLE "Copiando Archivo al sitio " + cFTPSite
REDEFINE BITMAP RESOURCE "GFTP" ID 117 OF oCopia
REDEFINE SAY oSay1 ID 110 OF oCopia
REDEFINE SAY oSay2 ID 120 OF oCopia
:-) REDEFINE METER oMeter1 VAR nAmount1 ID 111 OF oCopia;
PROMPT " " ;
COLORS CLR_HGRAY, CLR_BLUE ;
BARCOLOR CLR_HGREEN, CLR_BLUE
REDEFINE SAY oSay3 ID 140 OF oCopia
:-) REDEFINE METER oMeter2 VAR nAmount2 ID 112 OF oCopia;
PROMPT " " ;
COLORS CLR_HGRAY, CLR_BLUE ;
BARCOLOR CLR_HRED, CLR_BLUE
oCopia:bStart := { || SendFiles( aSource, aTarget, nBufSize, oSay1, oSay2, oMeter1, oSay3, oMeter2,;
@lEnd, oCopia, oFTP ,cFTPSite)}
ACTIVATE DIALOG oCopia CENTERED


ESPERO Y ALGUIEN ME PUEDA AYUDAR


Para que quieres meter si tienes TProgress

   @  75, 1 PROGRESS oPrg OF oPanel POSITION 50 PIXEL SIZE 100, 20 COLORS 7646455, 324325345
Vikthor

Continue the discussion