Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
26 usuários online :: 1 usuário cadastrado, Nenhum Invisível e 25 Visitantes :: 2 Motores de busca

memarques

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Últimos assuntos
» Ajuda a direcionar
Hoje à(s) 01:17 por miiiih

» Alterar uma palavra num arquivo de texto
5/12/2016, 12:02 por Teseu

» Buscar endereço por CEP
3/12/2016, 19:59 por pedrossian

» USAR WEBSERVICE NO VFP9
2/12/2016, 09:50 por AJC

» BANIMENTO DE USUARIO
17/11/2016, 08:31 por FAF

» Impressora Ticket
15/11/2016, 09:20 por clima238

» Gráfico
9/11/2016, 10:43 por hidroluz

» TRANSPOR TABELA
9/11/2016, 10:34 por hidroluz

» MUDANÇA DO .DBF PARA POTSGREE
9/11/2016, 09:12 por AJC

» Website com videoaulas sobre linguagens de programação
8/11/2016, 09:56 por JLDR

» Parceria para desenvolvimento de template em Wordpress
7/11/2016, 19:15 por mindix

» Data fica invertida na planilha que é gerada via programa.
27/10/2016, 11:00 por Linghston

» Maximizar report direto do menu
21/10/2016, 20:48 por Rosangela Pires

» Fechar form com tempo
21/10/2016, 10:15 por Rosangela Pires

» URGENTE: Ajuda com impressora ELGIN-L42
14/10/2016, 09:53 por megasoft

» Opções para gerar NF-e
10/10/2016, 09:07 por mavsinfo

» Google Maps
8/10/2016, 15:08 por Rosangela Pires

» Mysql
5/10/2016, 11:22 por Marcos Guedes

» Acessando Banco em MYSQL de um projeto WORDPRESS
3/10/2016, 10:58 por Marcos Guedes

» OPTION SELECT MOSTRAR CAMPOS QUASE PRONTO
26/9/2016, 21:09 por BobKuspe

Alterar uma palavra num arquivo de texto

5/12/2016, 12:02 por Teseu

Olá prezados colegas de programação!

Este é eu primeiro post no fórum e gostaria de poder …

Comentários: 0

Buscar endereço por CEP

3/12/2016, 19:59 por pedrossian

Caros amigos, meu código para buscar endereço pelo CEP não funciona mais.
Alguém pode me …

Comentários: 0

USAR WEBSERVICE NO VFP9

2/12/2016, 09:50 por AJC

Pessoal, preciso de um material ou livro que me traga instruções como
usar a consumação de …

Comentários: 0

BANIMENTO DE USUARIO

13/11/2016, 16:21 por FAF

A usuária ROSANGELA PIRES ao tentar acessar o Forum obtem sempre a mensagem de BANIMENTO.
A mesma …

Comentários: 3

Impressora Ticket

15/11/2016, 09:20 por clima238

Bom dia,
Por favor alguém me explique porque o código abaixo imprime no ecrã em vez do printer: …

Comentários: 0

Estatísticas
Temos 6963 usuários registrados
O último usuário registrado atende pelo nome de miiiih

Os nossos membros postaram um total de 17119 mensagens em 2577 assuntos

Barra de progresso muito fina! wow

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Informativo Barra de progresso muito fina! wow

Mensagem por hugo em 27/7/2010, 19:48

Olhem que maneiro

[Você precisa estar registrado e conectado para ver esta imagem.]

Creditos e download do codigo:
[Você precisa estar registrado e conectado para ver este link.]

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por mfelis em 28/7/2010, 08:17

Bacana, Reputado, eu não utilizo OCX para Barras de Progresso eu faço as minhas!

mfelis
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por alceu11 em 28/7/2010, 09:23

mflis
E como seria fazer a sua barra de progresso, neste form de backup do sistema?
poderia demostrar pegando este form e mudar a barra dele de progresso.?

link importante o winrar precisa estar instalado para este backup funcionar

[Você precisa estar registrado e conectado para ver este link.]

Como sei que faz isto direto, entao vou perguntar mas 1 coisa.:
E vou aproveitar tb depois do backup zipado, como vc faz para envia-lo para o ftp
direto, r?

alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por hugo em 28/7/2010, 10:10

alceu, coloquei um link no forum ai de um compactador independente
de software 3os

ou seja, compactacao no proprio vfp

fiz algumas adaptacoes no codigo e resolvi parte de uma situacao
minha, mais a titulo de conhecimento, mais achei bem legal

abraco professor

valeu

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por alceu11 em 28/7/2010, 10:17

HUGO
Ondi esta o link Desta compactacao, PODERIA posstar o fonte ?
Aviso
nao esqueci do projeto ajax,!!!

é o que o meu backup, faz por pasta do projeto ou do que queira compactar,,,,,,,,,

alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por hugo em 28/7/2010, 10:59

tai professor
[Você precisa estar registrado e conectado para ver este link.]

e o ajax vai te pegar.... hehehehehe
obrigado por tudo amigao!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por mfelis em 28/7/2010, 12:37

[Você precisa estar registrado e conectado para ver este link.] escreveu:mflis
E como seria fazer a sua barra de progresso, neste form de backup do sistema?
poderia demostrar pegando este form e mudar a barra dele de progresso.?

link importante o winrar precisa estar instalado para este backup funcionar

[Você precisa estar registrado e conectado para ver este link.]

Como sei que faz isto direto, entao vou perguntar mas 1 coisa.:
E vou aproveitar tb depois do backup zipado, como vc faz para envia-lo para o ftp
direto, r?

Coloquei e Adaptei o Form de Acordo com a Barra espero que funcione!
Download
Desculpe senão funcionar estoua trasado preciso sair agora não estarei a tarde mas amanha eu resolvo oK!

mfelis
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por Julio em 28/7/2010, 13:46

Eu utilizo uma DLL "MOLEZIP.DLL", se não me falhe a memoria é free.

Ai vai meu modelo, a barra é diferente da que tem no form do Alceu, e tambem inferior a beleza da que o Hugo postou.

Utiliza-se de uma classe para fazer a barra de progresso.

Mas em si a rotina faz o backup bem feito.


[Você precisa estar registrado e conectado para ver este link.]


Julio


Última edição por Julio em 28/7/2010, 13:51, editado 1 vez(es)

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por Julio em 28/7/2010, 13:49

Tenho esta tambem.

Utilizo em um processo do sistema.

Acho que todos ja conhecem.

Código:
* BARRA DE PROGRESSO DA OTIMIZAÇÃO
DEFINE CLASS gsThermometer AS form

    Height = 76
    Width = 500
    AutoCenter = .T.
    BackColor = RGB(240,240,240)
    BorderStyle = 0
    Caption = ""
    Closable = .F.
    ControlBox = .F.
    MaxButton = .F.
    MinButton = .F.
    Movable = .F.
    AlwaysOnTop = .f.
    ShowWindow = 1
    Name = "gsThermometer"


    ADD OBJECT ShapeOuter AS shape WITH ;
        Top = 2, ;
        Left = 2, ;
        Height = 72, ;
        Width = 496, ;
        BackStyle = 0, ;
        BorderWidth = 4, ;
        Curvature = 5, ;
        SpecialEffect = 0, ;
        BorderColor = RGB(0,128,0), ;
        Style = 0, ;
        Name = "ShapeOuter"


*    ADD OBJECT Image1 AS image WITH ;
        Picture = ADDBS(HOME(4))+[Bitmaps\Assorted\Beany.bmp], ;
        BackStyle = 0, ;
        Height = 64, ;
        Left = 10, ;
        Top = 6, ;
        Width = 64, ;
        Name = "Image1"

    ADD OBJECT Image1 AS image WITH ;
        Picture = [C:\SISTEMA\ICONES\TRASH02B.BMP], ;
        BackStyle = 0, ;
        Height = 64, ;
        Left = 20, ;
        Top = 26, ;
        Width = 64, ;
        Name = "Image1"

    ADD OBJECT Progress1 AS textbox WITH ;
        Value = 1, ;
        Visible = .F., ;
        Name = "Progress1"


    ADD OBJECT lblProgress AS label WITH ;
        FontBold = .T., ;
        BackStyle = 0, ;
        Caption = "Aguarde o Término da Otimização.  Progresso da Operação ...", ;
        Height = 14, ;
        Left = 81, ;
        Top = 16, ;
        Width = 384, ;
        ForeColor = RGB(0,128,0), ;
        Name = "lblProgress"


    ADD OBJECT ShapeProgress AS shape WITH ;
        Top = 32, ;
        Left = 77, ;
        Height = 32, ;
        Width = 408, ;
        BackStyle = 1, ;
        SpecialEffect = 0, ;
        BackColor = RGB(255,255,240), ;
        Name = "ShapeProgress"


    ADD OBJECT Label1 AS label WITH ;
        FontBold = .T., ;
        FontSize = 24, ;
        BackStyle = 0, ;
        Caption = (REPLICATE("I",50)), ;
        Height = 30, ;
        Left = 81, ;
        Top = 29, ;
        Width = 404, ;
        ForeColor = RGB(192,192,192), ;
        Name = "Label1"


    ADD OBJECT Label2 AS label WITH ;
        FontBold = .T., ;
        FontSize = 24, ;
        BackStyle = 0, ;
        Caption = "Label2", ;
        Height = 30, ;
        Left = 79, ;
        Top = 29, ;
        Width = 404, ;
        ForeColor = RGB(0,192,0), ;
        Name = "Label2"


    ADD OBJECT Label3 AS label WITH ;
        FontBold = .T., ;
        FontSize = 24, ;
        BackStyle = 0, ;
        Caption = "Label3", ;
        Height = 30, ;
        Left = 81, ;
        Top = 29, ;
        Width = 404, ;
        ForeColor = RGB(0,192,0), ;
        Name = "Label3"

    * numero da porcentagem realizada
    ADD OBJECT ProgressPercent AS Label WITH ;
        BackStyle = 0, ;
        BorderStyle = 0, ;
        FontItalic = .t., ;
        FontSize = 11, ;
        ForeColor = RGB(0,0,128), ;
        FontBold = .T., ;
        Top = 16, ;
        Left = 444, ;
        Height = 18, ;
        Width = 36, ;
        Name = "ProgressPercent"


    PROCEDURE Destroy
        SET CURSOR ON
    ENDPROC


    PROCEDURE Init
        * Simply Set This.Progress1.Value = % completed to display suitably.
        *
        This.Progress1.Value = 0
        SET CURSOR OFF
        This.zOrder(0)
        INKEY(0.001)
    ENDPROC


    PROCEDURE progress1.ProgrammaticChange
        * 380 is the Max width of the Progress Bar when 100% completed.
        This.Parent.ProgressPercent.Caption = TRANSFORM(This.Value)+'%'
        This.Parent.Label2.Caption = REPLICATE("I",This.Value/2)
        This.Parent.Label3.Caption = REPLICATE("I",This.Value/2)
        INKEY(0.001)
    ENDPROC


ENDDEFINE
**

Julio

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por hugo em 28/7/2010, 14:13

muito obrigado julio

alceu, quando der certo da um ok pra fecharmos o post

abracao professor

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por alceu11 em 28/7/2010, 16:05

Ainda dependo da 2 resposta do mfelix sobre enviar o backup para ftp, apos o zip, se teria como enviar para o ftp,,, na mesma rotina do backup.
dando um gancho no form tipo
if 6=messagebox('deseja enviar para o ftp',4+32,'comando')
*comandos
endif

mas acredito que ele nao dara resposta......

mais todavia se quiser dar por encerrado. tudo ok........

alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por hugo em 28/7/2010, 18:03

sobre enviar arquivo para upload temos um post sobre o assunto

so fazer as devidas adequacoes

[Você precisa estar registrado e conectado para ver este link.]

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por hugo em 28/7/2010, 18:15

sobre a Barra em especifico
podemos fechar?

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por alceu11 em 28/7/2010, 18:46

E Hugo, so queria sair do meu form backup e ir para o ftp e adiciona-lo acho que o Mfelis sabe disto......Quem sabe ele contribua para isto....

Se nao poder esperar ate amanha tudo bem , mas qto a barra esta resolvido!!!
Mas todavia se voce quer encerrar. pode fique a vontade.....

alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por hugo em 28/7/2010, 19:46

espero sim professor

Smile

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Informativo Re: Barra de progresso muito fina! wow

Mensagem por Conteúdo patrocinado Hoje à(s) 15:15


Conteúdo patrocinado


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum