VAGNER + VLIB = SHOW

[CTOAS]

Para os navegantes, ai vai mais alguns exemplos

vGet

vBtnBmp

vBox

Um Abraço....

[vagner]

Olá Cris,

Se possível coloque também telas com o 98, para o pessoal ver como fica no 98 , Ah. vc recebeu meu e-mail da tela que eu quero mandar para o Antonio Linãres ?, é q ele está fazendo os comandos transparentes e eu queria ver se ele montaria daquele jeito

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[kapiaba]

citação:

Olá Cris,

Se possível coloque também telas com o 98, para o pessoal ver como fica no 98 , Ah. vc recebeu meu e-mail da tela que eu quero mandar para o Antonio Linãres ?, é q ele está fazendo os comandos transparentes e eu queria ver se ele montaria daquele jeito

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

---

id=quote>id=quote>

PQP, QUE LINDO!

Cris, olha o Kara Mano, Não divulga o produto dele, e ainda fica abusando da tua boa vontade! Kara chato... hehehehe.

Parabéns Cris! Espetáculo!

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

FWH 2.7 - xHARBOUR 0.99.50 / 0.99.51 - WorkShop.Exe

Editado por - kapiaba on 15/02/2006 16:02:56

[CTOAS]

Daqui a pouco coloco as imagens

[aldreks]

Vagner, boa tarde!

Mande para meu email o valor da lib com todos estes recursos.

Ela tem manual, help, tutorial, material de apoio??

uso o WinXP com FW2.3

No aguardo.

Abraços.

citação:

citação:

citação:

Valeu Paulo, vou falar com o Wagner, vale a pena mesmo !!!

Outra coisa, sobre esses botoes arredondados(estilo XP), vc usa qual Classe com eles?

Ele fica assim tb no 98 ?

Pergunto porque eu fiz uma uma gambiarra aqui:

Desenhei eles, e coloquei como um Bitmap no Sistema, tirei a borda do Botao, entao deu pra quebrar o galho, mas, ao passar o mouse por cima dele os cantos quadrados do botao aparece, entende, na verdade eh só um Bitmap, eu quero fazer uns botoes com cantos arredondados tanto no XP como no 98, se der pra vc me dar essa dica, fico grato .

@braços Ale

"Conhecimento, você não subtrai quando divide; mas soma e multiplica."

**---Mário Persona---**

Alessandro Seribeli Barreto

aleseribeli@hotmail.com Andradina - SP

FWh 2.4, xH80, xMate, WS, Pelles

---

id=quote>id=quote>

Quanto aos botôes, para ficar arredondado no XP (sem usar a vBtnBmp) uso o Manifest e no 98 fica com o padrão do 98, mas, se vc usar a vBtnBmp fica arredondado nos dois Sistemas Operacionais

---

id=quote>id=quote>

Com a VBtnBmp, os cantos já são arredondados, assim como também os cantos da VGet, porém no 98, os cantos inferiores não ficam arredondados, provavelmente tratamento de resolução de vídeo diferente entre o XP e o 98

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

---

id=quote>id=quote>

-------------------------

Email/msn: aldreksa@hotmail.com Clipper 5.3b/BLinker7/FW23c/WS4.5

(Recife-PE)

"Do que adianta ao homem ganhar o mundo inteiro e perder a sua alma?"

[kapiaba]

citação:

Daqui a pouco coloco as imagens

---

id=quote>id=quote>

PQP, DE NOVO! COMO É QUE É ESSA FERRARI AI PASSANDO A 380 KM POR HORA????? E SÓ NÓIS TEIM??? HEIM? HEIM?

LINDO! LINDO! LINDO! ESSE MOLOQUE Tà FICANDO O KÃO XUPANDO MANGA DE METIDO COM ESTA FERRARI VERMELHINHA! MUITO BOM, SÓ UMA FERRARI PARA 'BATER' A LIB DO VAGNER! ESTOU APAIXONADO!

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

FWH 2.7 - xHARBOUR 0.99.50 / 0.99.51 - WorkShop.Exe

Editado por - kapiaba on 17/02/2006 19:31:24

[vagner]

citação:

Vagner, boa tarde!

Mande para meu email o valor da lib com todos estes recursos.

Ela tem manual, help, tutorial, material de apoio??

uso o WinXP com FW2.3

No aguardo.

Abraços.

---

id=quote>id=quote>

Olá Aldreks,

Só funciona para [x]Harbour, não funciona para Clipper

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[vagner]

Olá Pessoal,

Eu postei em Dicas+Dicas um Demo do que a VLib faz

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[ecmsoft]

Vagner, a Vlib.exe que vc postou em dicas nao funcionou !

Path and name: C:\SISTEMAS\VLIB\VLIB.EXE (32 bits)

Size: 2,023,936 bytes

Time from start: 0 hours 0 mins 0 secs

Error occurred at: 03/02/2006, 11:00:27

Error description: Error BASE/1001 Message not found: DBFCDX:

Stack Calls

===========

Called from: HARBOUR.prg => _CLSSETERROR(157)

Called from: RPreview.Prg => MEUERRO(1912)

Called from: VLib.prg => (b)MAIN(32)

Called from: => DBUSEAREA(0)

Called from: VLib.prg => MAIN(42)

ECM SISTEMAS

Marciano Queiroz

Teixeira de Freitas-Ba

ecmsoft.tx@ig.com.br

FW 2.6 + xHarbour 0.99.4 | FW2.7 + xHarbour 0.99.51

[neto_23]

esse mesmo eqqo aconteceu comigo..... qdo vc mandou pelo email... VAgner + vou comprar.... mais ajeitar a demo ou como configurar para exemplo..ok

Estou chegando 32 bits

fw27harbour-Verce 4.0-bcc55-cdx-Pelles

gabrieis@bol.com.br

[vagner]

Olá,

Eu postei em dicas o dbf e o cdx que havia esquecido de adicionar

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[Kleyton]

Vagner, poderia postar um fonte com alguns exemplos de como chamar as funções de sua LIB. Para vermos se teremos que fazer muitas mudanças em nossos programas...

Kleyton

Clipper5.2E+Clipper5.3b+Blink7+FW2.0d

cleitonbala@bol.com.br

[vagner]

Olá Kleyton,

Posso postar sim o mesmo demo que coloquei, porém já lhe aviso, se quiser usar todo o potencial da lib, logicamente vc terá que fazer mudanças nos seus códigos, pois se pegou o demo que postei verá que existem coisas novas e quando dizemos coisas novas, automáticamente, são coisas que não existiam , não repare no meu toque de ironia , é q estou contente de ter tirado 10 dias de férias depois de um ano inteiro me matando na empresa

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[pauloaraujo]

citação:

Olá Kleyton,

Posso postar sim o mesmo demo que coloquei, porém já lhe aviso, se quiser usar todo o potencial da lib, logicamente vc terá que fazer mudanças nos seus códigos, pois se pegou o demo que postei verá que existem coisas novas e quando dizemos coisas novas, automáticamente, são coisas que não existiam , não repare no meu toque de ironia , é q estou contente de ter tirado 10 dias de férias depois de um ano inteiro me matando na empresa

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

---

id=quote>id=quote>

Bom, o "Home" volta 2ª Feira.

Uma vez, entre uma breja e outra, falei que iria tirar "férias" entre o Natal e Ano Novo e o cara tirou um sarro.

O cidadão tira um mês de férias e quero ver o que ele vai falar agora.

Editado por - pauloaraujo on 09/03/2006 16:53:14

[supi]

ME mande por email como adquirir a vlib ??? precos , formas de pagto

*URGENTE*

supi@supi.com.br

Aproveitando o embalo, uma curiosidade, pergunta rapida : ~ a VLIB nao muda nada nos relatorios REPORT e PRINTER se eu apenas linka-la com os .OBJ que tenho ? devo redesenvolver tudo novamente ?

SUPI

[supi]

A PERGUNTA é que eu queria saber se a VLIB já muda a cara dos relatorios que desenvolvi com o REPORT e PRINTER , somente linkando ela junto com os trem meu aqui.

..........assim eu já teria uma mudanca imediata e o principal, geracao do arquivo PDF e envio de email

a proposito : tem como adaptar para gerar o relatorio no excel tambem?

SUPI

[vagner]

Olá,

A VLib, mudará seus relatórios feitos na TPrinter, na Report não mudará, para isso eu criei a VReport (com algumas melhorias ), estou postando em dicas o PRG do demo para vcs terem uma idéia

P.S.: Estou de volta das férias, mas muito enrolado , os meus uçuários, só fizeram .... enquanto eu não estava na empresa

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[kapiaba]

Logo, logo, estarei marcando NOVA CERVEJADA com o Vagner Wirts, para 'pegar mais coordenadas' desta LIB FANTASTICA.

Não é porque sou FÃ do cara não, mas vai fazer um TREM BÃO ASSIM lá na casa do... Então... Abraços.

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

FWH 2.7 - xHARBOUR 0.99.60 - WorkShop.Exe

Homenagem ao Fivewin 2.7 For [x]Harbour e ao Cris:

Editado por - kapiaba on 24/02/2006 13:39:12

[supi]

OK VAGNER.

Valew pela resposta.

ME MANDA AGORA POR EMAIL

supi@supi.com.br

preco e condicao para adquirir a VLIB

SUPI

[CTOAS]

citação:

OK VAGNER.

Valew pela resposta.

ME MANDA AGORA POR EMAIL

supi@supi.com.br

preco e condicao para adquirir a VLIB

SUPI

---

id=quote>id=quote>

Informações passadas pelo Sr. Vagner Wirts

Para comprar a VLib, vc deverá depositar R$ 150,00 nessa conta, que lhe mandarei a lib,

Banco Bradesco :

Agência : 3267

Conta : 1009467-4 (poupança)

Vagner Wirts

Comprovação de depósito pode ser via fax (11) 6631-4125 ou (11) 6955-8475, ou scaneado no meu e-mail - vwirts@ig.com.br, ou lloydscpd@terra.com.br

São Paulo - SP

[Ale SB]

Notei q na demo da vLib, a Barra de mensagens fica perfeito, digo pq, eu estou usando a vMsgba32(postada em dicas, a mais atual), e a minha barra de mensagem nao ta legal; a barra e a data em si fica com a cor q eu declaro, mas, o Ins, o Caps e o Relogio, fica todo Preto, a letra aceita qq cor mas, o Fundo so aceita uma cor e nao degrade como deveria.

Achei q poderia ser um problema da minha versao do FW, mas, eu passei ela tb p/o Jef e aconteceu a mesma coisa com ele.

Outro erro q ocorre eh quando saio do sistema, da essa mensagem de Erro:

Application

===========

Path and name: C:\ALEFWH\DESCOBAR\DESBAR.EXE (32 bits)

Size: 1,319,936 bytes

Time from start: 0 hours 0 mins 12 secs

Error occurred at: 22/02/2006, 14:30:20

Error description: Error BASE/1004 Message not found: TVMSGITEM:HBITMAP1

Args:

Stack Calls

===========

Called from __ERRRT_SBASE(0)

Called from HBOBJECT:ERROR(179)

Called from (b)HBOBJECT(105)

Called from HBOBJECT:MSGNOTFOUND(0)

Called from TVMSGITEM:HBITMAP1(169)

Called from (b)TMSGBAR:DESTROY(376)

Called from AEVAL(0)

Called from TMSGBAR:DESTROY(376)

Called from TWINDOW:HANDLEEVENT(0)

Called from _FWH(0)

Called from WINRUN(0)

Called from TWINDOW:ACTIVATE(0)

Called from MAIN(114)

System

======

CPU type: GetCPU() failed! 1800 Mhz

Hardware memory: 120 megs

Free System resources: 64 %

GDI resources: 68 %

User resources: 64 %

Compiler version: xHarbour build 0.80.0 Intl. (SimpLex)

Windows version: 4.10, Build 67766446 A

Windows total applications running: 0

Variables in use

================

Procedure Type Value

==========================

__ERRRT_SBASE

Param 1: N 13

Param 2: N 1004

Param 3: C "Message not found"

Param 4: C "TVMSGITEM:HBITMAP1"

HBOBJECT:ERROR

Param 1: C "Message not found"

Param 2: C "TVMSGITEM"

Param 3: C "HBITMAP1"

Param 4: N 1004

(b)HBOBJECT

Param 1: O Class: TVMSGITEM

Param 2: C "HBITMAP1"

Param 3: U

Param 4: U

Param 5: U

Param 6: U

Param 7: U

Param 8: U

Param 9: U

Param 10: U

Param 11: U

Param 12: U

Param 13: U

Param 14: U

Param 15: U

Param 16: U

Param 17: U

Param 18: U

Param 19: U

Param 20: U

Param 21: U

Param 22: U

HBOBJECT:MSGNOTFOUND

Param 1: C "HBITMAP1"

Param 2: U

Param 3: U

Param 4: U

Param 5: U

Param 6: U

Param 7: U

Param 8: U

Param 9: U

Param 10: U

Param 11: U

Param 12: U

Param 13: U

Param 14: U

Param 15: U

Param 16: U

Param 17: U

Param 18: U

Param 19: U

Param 20: U

Param 21: U

TVMSGITEM:HBITMAP1

Local 1: U

Local 2: U

Local 3: U

Local 4: U

Local 5: U

Local 6: U

Local 7: U

Local 8: U

Local 9: U

Local 10: U

Local 11: U

Local 12: U

Local 13: U

Local 14: U

Local 15: U

Local 16: U

Local 17: U

Local 18: U

Local 19: U

Local 20: U

(b)TMSGBAR:DESTROY

Param 1: O Class: TVMSGITEM

Param 2: N 4

AEVAL

Param 1: A Len: 5

Param 2: B {|| ... }

TMSGBAR:DESTROY

Local 1: O Class: TMSGBAR

TWINDOW:HANDLEEVENT

Param 1: N 2

Param 2: N 0

Param 3: N 0

_FWH

Param 1: N 0

Param 2: N 2

Param 3: N 0

Param 4: N 0

Param 5: N 10

Local 1: O Class: TMSGBAR

WINRUN

Param 1: N 3960

TWINDOW:ACTIVATE

Param 1: C "MAXIMIZED"

Param 2: U

Param 3: U

Param 4: U

Param 5: U

Param 6: U

Param 7: U

Param 8: U

Param 9: U

Param 10: U

Param 11: U

Param 12: U

Param 13: U

Param 14: U

Param 15: U

Param 16: U

Param 17: U

Param 18: U

Param 19: U

Local 1: O Class: TWINDOW

Local 2: U

Local 3: U

MAIN

Linked RDDs

===========

DBF

DBFNTX

DBFCDX

DataBases in use

================

Classes in use:

===============

1 HBCLASS

2 HBOBJECT

3 TFONT

4 TWINDOW

5 TMENU

6 TMENUITEM

7 TBRUSH

8 TCONTROL

9 TSBAR

10 TRECT

11 TSBUTTON

12 TBITMAP

13 ERROR

14 TIMAGE

15 TMSGBAR

16 TMSGITEM

17 TTIMER

18 TVMSGITEM

19 TDIALOG

Memory Analysis

===============

162 Static variables

Dynamic memory consume:

Actual Value: 0 bytes

Highest Value: 0 bytes

id=code>id=code>

A msgBar e a TsButton, faz parte da vLib ?

Case Sim

Gostaria de saber se estes Bugs foram corrigidos ?

Case Nao

Ha uma nova versao delas corrigidas,como adquiri-las ?

@braços Ale

"Conhecimento, você não subtrai quando divide; mas soma e multiplica."

**---Mário Persona---**

Alessandro Seribeli Barreto

aleseribeli@hotmail.com Andradina - SP

FWh 2.4, xH80, xMate, WS, Pelles

[vagner]

Olá,

Vc está passando algum bitmap para a barra ?, se sim, como está passando ?, como vc está fazendo para colocar as cores na barra ?, pois, isso das cores está funcionando desde a feita para clipper+FW, poste aqui como vc está definindo a barra.

E a barra de mensagens têm outras coisas agora, tipo horários em mais de um formato, como :

HH:MM:SS, HH:MM, HH:MM:SS am/pm, HH:MM am/pm, texto com rolagem estilo banner, entre outras coisas [;D]

Sim a SButton está embutida, por enquanto, é que ainda não tive tempo de montar a VBtnBmp para a barra de botões, mas assim que possível irei retirar, não quero ficar com a SButton, pois ela consome mais recursos que os que eu montei, por causa do jeito que o MM montava os degradês.

Vagner Wirts

Clipper 5.2 Lib 5.3 - Blinker 5.0 FW 2.0, Harbour 43.0 (Flex), xHarbour 99.1 99.2 99.3 (Simplex) FW 2.5

[Ale SB]

Olá Wagner,

Nao uso Bmp na Barra, Estou montando ela assim:

*---- Define uma barra de status ----*

Set VMessage Of oWnd To "CopyRight By SB Sistemas" Center

oWnd:oMsgBar:aClrBar := {nRgb(255,255,255),nRgb(100,100,100),nRgb(255,255,255),nRgb(174,193,228)}

oWnd:oMsgBar:nClrText:= nRgb(0,0,200)

oWnd:oMsgBar:KeybOn()

oWnd:oMsgBar:TxtScrlOn(100)

id=code>id=code>

oDataSistem:= TVMsgItem():New( oWnd:oMsgBar, DtoC(Date()), 70, oFont,,,.t.) //Imbute a Data

oDataSistem:nClrPane := {nRgb(255,255,255),nRgb(100,100,100)}

oDataSistem:nClrText := nRgb(0,0,200)

oDataSistem:cToolTip := "Hoje é"

id=code>id=code>

oWnd:oMsgBar:oKeyNum:nClrPane := {nRgb(0,255,0),nRgb(0,100,0)}

oWnd:oMsgBar:oKeyNum:nClrText := nRgb(0,0,200)

oWnd:oMsgBar:oKeyNum:nClrDisabled := nRgb(150,150,0)

id=code>id=code>

oWnd:oMsgBar:oKeyCaps:nClrPane := {nRgb(255,255,0),nRgb(100,100,0)}

oWnd:oMsgBar:oKeyCaps:nClrText := nRgb(0,0,200)

oWnd:oMsgBar:oKeyCaps:nClrDisabled := nRgb(150,150,0)

id=code>id=code>

oWnd:oMsgBar:oKeyIns:nClrPane := {nRgb(0,0,255),nRgb(0,0,100)}

oWnd:oMsgBar:oKeyIns:nClrText := nRgb(0,200,0)

oWnd:oMsgBar:oKeyIns:nClrDisabled := nRgb(150,150,0)

id=code>id=code>

oWnd:oMsgBar:ClockOn() //Imbute a Hora

oWnd:oMsgBar:oClock:nClrPane :={nRgb(248,211, 86),nRgb(132,112, 32)}

oWnd:oMsgBar:oClock:nClrText := nRgb(255,255,255)

ACTIVATE WINDOW oWnd MAXIMIZED

id=code>id=code>

Até mesmo o Exemplo q vc deixou em Dicas junto da vMsgBa32, eu compilei e tb ficou tudo preto.

@braços Ale

"Conhecimento, você não subtrai quando divide; mas soma e multiplica."

**---Mário Persona---**

Alessandro Seribeli Barreto

aleseribeli@hotmail.com Andradina - SP

FWh 2.4, xH80, xMate, WS, Pelles

Editado por - Ale SB on 22/02/2006 16:53:00

[kapiaba]

Qual é a Versão Windows???

João Santos - São Paulo.

kmt_karinha@pop.com.br

kapiaba@brfree.com.br

FWH 2.7 - xHARBOUR 0.99.60 - WorkShop.Exe

Homenagem ao Fivewin 2.7 For [x]Harbour e ao Cris:

Editado por - kapiaba on 15/03/2006 17:40:10

[Ale SB]

WIN_98 E WIN_XP

"Conhecimento, você não subtrai quando divide; mas soma e multiplica."

**---Mário Persona---**

Alessandro Seribeli Barreto

aleseribeli@hotmail.com Andradina - SP

FWh 2.4, xH80, xMate, WS, Pelles