Jump to content
Fivewin Brasil

conpete

Membros
 View Profile  See their activity

  • Posts

    126

  • Joined

  • Last visited

 Content Type 

Posts posted by conpete

  1. ICONES

    in Programação

    Posted

    ICO

    Não estou recebendo seus email. e o seu (iko67@ibest.com.br) esta dando retorno.

    Mangueira

    marcos@conpete.com.br

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  2. PARA MANGUEIRA

    in Off - Topic

    Posted

    ICO

    Não estou recebendo seus email. e o seu (iko67@ibest.com.br) esta dando retorno.

    Mangueira

    marcos@conpete.com.br

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  3. ICONES

    in Programação

    Posted

    Retiro o que falei acima. Fui testar, pois já fazia algum tempo que não utilizava menu deste tipo, e não deu certo. Desculpe-me.

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  4. ICONES

    in Programação

    Posted

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

    function MainMenu(oWndMain)

    local oMainMenu

    menu oMainMenu

    menuitem "&Cadastros"

    MENU

    MENUITEM "&Clientes" RESOURCE "BMP_01";

    ACTION CADcli() MESSAGE "Cadastro de CLientes"

    endmenu

    *---------------------------------------------------------------------------------------------------

    menuitem "&Outros"

    MENU

    *menuitem "&Relatórios" RESOURCE "BMP_02";

    * ACTION Relatorios() MESSAGE "Relatórios"

    menuitem "&Relatórios 2" RESOURCE "BMP_03";

    ACTION Relatório2() MESSAGE "Relatórios 2"

    MENUITEM "&Informações";

    ACTION Informações() MESSAGE "Informações Sobre o Sistema"

    endmenu

    endmenu

    Funciona perfeitamente porem vc tem, é lógico, de ter as referencia no seu “RESOURCEâ€

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  7. Desculpe-me a ignorância

    in Programação

    Posted

    O que é BBFCDX e _DBFCDX (não deu para intender nos tópicos relacionados.)

    Turma... Desculpe-me a ignorância....

    O que é BBFCDX e _DBFCDX (não deu para entender nos tópicos relacionados.)

    icon_smile_blush.gificon_smile_blush.gificon_smile_blush.gificon_smile_blush.gificon_smile_blush.gif

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  10. Alo turma de Plantão!.

    in Programação

    Posted

    Ola Jackeline

    #include "FiveWin.ch"

    #include "btnget.ch"

    *************

    FUNCTION Lancamentos()

    local odlgl, olbx

    LOCAL nOrdem :=1

    LOCAL cOrdem := { OemToAnsi("data e Documento"),;

    OemToAnsi("Data e Conta"),;

    OemToAnsi("Documento e Data"),;

    OemToAnsi("Conta e Data")}

    uso(1)

    uso(2)

    uso(3)

    dPesData=date()

    cPesDoc=space(10)

    SET SOFTSEEK ON

    SET ORDER TO 1

    GO TOP

    SEEK SUBSTR(DTOC(DATE()),7,4)+SUBSTR(DTOC(DATE()),4,2)+SUBSTR(DTOC(DATE()),1,2)

    DEFINE DIALOG oDLGl RESOURCE "Tela_lanca" TITLE "Lançamentos - "+cEmpresa

    @ 2.2, 0 LISTBOX oLbx ;

    FIELDS dtoc(cadlan->data),cadlan->documento,cadlan->conta,formatamoe(cadlan->valor/100),cadlan->tipo,cadlan->historico,cadlan->referencia ;

    HEADERS "Data", "Documento","Conta","valor","tipo","Histórico","Referencia" ;

    SIZE 304, 190 ;

    ON LEFT DBLCLICK(cadlanca(0),oLbx:Refresh(),oLbx:SetFocus());

    OF oDlgl

    DEFINE FONT O_F_GET NAME "ARIAL" SIZE 07,18 BOLD

    REDEFINE COMBOBOX nOrden ITEMS cOrden ID 202 OF oDlgl ON CHANGE Orden_Lanca(nOrden,oLbx)

    REDEFINE GET oPesDoc var cPesDoc ID 2006 OF oDlgl PICTURE "@!" FONT O_F_GET COLOR CLR_HRED, CLR_HCYAN Update

    REDEFINE GET oPesData var dPesData ID 203 OF oDlgl PICTURE "@!K" FONT O_F_GET COLOR CLR_HRED, CLR_HCYAN Update

    REDEFINE BTNBMP RESOURCE "BMP_INCLUIR" ID 205 OF oDlgl ;

    TOOLTIP "Incluir Novo Registro";

    ACTION (cadlanca(1),;

    oLbx:Refresh(),oLbx:SetFocus()) NOBORDER

    REDEFINE BTNBMP RESOURCE "BMP_ALTERAR" ID 206 OF oDlgl ;

    TOOLTIP "Editar / Alterar Registro";

    ACTION (CadLanca(1),;

    oLbx:Refresh(),oLbx:SetFocus() ) NOBORDER

    REDEFINE BTNBMP RESOURCE "BMP_DEL" ID 207 OF oDlgl ;

    TOOLTIP "Excluir Registro";

    ACTION (CadLanca(1),;

    oLbx:Refresh(),oLbx:SetFocus() ) NOBORDER

    REDEFINE BTNBMP RESOURCE "BMP_PRINTER" ID 108 OF oDlgl ;

    TOOLTIP "Relatorio "+ CRLF+PrnGetName();

    ACTION ( Rep_0002() ) NOBORDER

    REDEFINE BTNBMP RESOURCE "BMP_LUPA" ID 112 OF oDlgl ;

    TOOLTIP "Pesquisar";

    ACTION (ProcLan(cPesDoc),oLbx:setfocus()) NOBORDER

    REDEFINE BTNBMP RESOURCE "BMP_SAIR1" ID 211 OF oDlgl ;

    TOOLTIP "Fechar / Sair";

    ACTION oDlg:End() NOBORDER

    oPesDoc:cToolTip:=" Digite o NUMERO DO DOCUMETO e ou a DATA e tecle ENTER "

    ACTIVATE DIALOG ODLGl center

    close databases

    RETURN NIL

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  11. Alo turma de Plantão!.

    in Programação

    Posted

    Geraldo

    A linha do erro é exatamente a que ativa o dialogo

    ACTIVATE DIALOG ODLGl center

    Só de raiva, eliminei todas as referencias a ID 102 mas o problema persiste.

    Estranho não?

    icon_smile_sad.gificon_smile.gif

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  12. Alo turma de Plantão!.

    in Programação

    Posted

    Já Verifiquei todas as telas e não existe ID em duplicidade... O curioso é que, quando mudo a numeração do ID no WS e na função, a mensagem de erro vem da seguinte forma (dentro das mesmas condições acima):

    Error ocurred at: 12/06/2005, 10:14:58

    Error description: Error FiveWin/1 Non defined Id: No: 102

    icon_smile_blush.gificon_smile_angry.gificon_smile_angry.gif

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  13. Alo turma de Plantão!.

    in Programação

    Posted

    Companheiros....

    To com seginte pino:

    Tenho uma função tal (P. Exp. CADCLI) . com o programa rodando e do menu principal, entro na dita cuja,chamo as sub rotina e tudo bem,. Porem,quando volto ao menu principal e quero retornar a função “CADCLI†ocorre o seguinte erro:

    error ocurred at: 12/06/2005, 08:51:10

    Error description: Error FiveWin/2 Duplicated Id: No: 102

    Onde estou errando????

    icon_smile_blush.gificon_smile_angry.gif

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  14. Ai Vai duas perguntas imbecies!

    in Programação

    Posted

    Taiiiii Camaradas

    Aqui ,alem de aprenderemos, também é divertido.... e como!

    Uso so XP (16 estações) e, pequeno sistema que acabei de converter, ainda não notei nada estranho (usando as telinhas pulando e tudo).

    Karo Kapiaba.e os demais companheiros, Kuando vc vier aki em Manaus poderemos também tomar todas...

    E por falar nisso. As Karinhas tavam bem na minha kara

    icon_smile_big.gificon_smile_big.gif

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  15. Ai Vai duas perguntas imbecies!

    in Programação

    Posted

    Ai Vai duas perguntas imbecis.

    Caros Companheiros! Ai “vai†duas pergunta imbecies (se a grafia não tiver correta, fica mais imbecil ainda)

    1) Onde vocês arranjam estas carinhas que ficam de alegre a triste, etc?. Será que ta no Fórum e eu ainda não as vi?.

    2) (mais imbecil ainda) Que diabo é este tal de Harbor, xHarbor do quais só vim tomar conhecimento após entrar neste cultural fórum (só para avisar, Traduzi meu primeiro Clipper -> FiveWim hoje. Fico devendo esta a Vocês. Ta rodando uma “Belezinhaaaaaaaaaâ€). Sei que é uma coisa parecida com o Clipper (já até Baixei, mas não tive tempo de usar, pois meu tempo estava comprometido com vocês me Ensinando.)

    3) Agora vem a pergunta nada imbecil.

    Qual de vocês tem um produto demo, para emissão de Boletos bancários (não é PRG fonte!!!!!!) que eu possa usar nos meus testes.

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  17. To de novo em pepino

    in Programação

    Posted

    Não deu outra .. o erro era exatamente no oCursor, Porem o barra de rolamento ainda não aparece. Meu “PIPINO†agora é só um.

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  18. To de novo em pepino

    in Programação

    Posted

    Turma

    To de novo em pepino. E agora são dois.

    1) Erro a abaixo após o retorno de um DIALOG.

    Error ocurred at: 08/06/2005, 16:39:02

    Error description: Error Objects/8 No Object Msg.: UNDEFINED:_ODRAGCURS

    2) A barra de rolamento do dito cujo DIALOG não aparece.

    Código do dito cujo.

    FUNCTION LancamentosBrw()

    local oWndBrw, oBrw

    local oCursor

    local oBar,cPesDoc,dPesData

    local odlg1, olbx1

    dPpesdata=date()

    cPesDoc=space(10)

    sele 3

    SET SOFTSEEK ON

    SET ORDER TO 1

    GO TOP

    SEEK SUBSTR(DTOC(DATE()),7,4)+SUBSTR(DTOC(DATE()),4,2)+SUBSTR(DTOC(DATE()),1,2)

    DEFINE DIALOG ODLG1 FROM 06,01 TO 35,100 TITLE "Lançamentos"

    @ 2.2, 0 LISTBOX oLbx1 ;

    FIELDS dtoc(cadlan->data),cadlan->documento,cadlan->conta,formatamoe(cadlan->valor),cadlan->tipo,cadlan->historico,cadlan->referencia ;

    HEADERS "Data", "Documento","Conta","valor","tipo","Histórico","Referencia" ;

    SIZE 700, 800 ;

    ON LEFT DBLCLICK cadlan(0);

    OF oDlg1

    ACTIVATE DIALOG ODLG center

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  20. Cannot Create Dialog Box - Agora não entendo mais

    in Programação

    Posted

    E Karo Kamarada Kapiaba e outros Kompanheiros..

    Parece-me que o meu Problema agora e de Versão do FiveWin Pois não localizei a biblioteca que você me indicou. Como estou providenciando a compra do FiveWin esta semana, vai da para agüentar sem utilizar esta biblioteca.

    Obrigado a todos

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  22. Cannot Create Dialog Box - Agora não entendo mais

    in Programação

    Posted

    Companheiros

    Agora não entendo mais nada.....

    Tava Andando todo bem até quando achei de copiar um Dialog em uma minha DLL. Tal Dialog tem uns tal de “TBtnBmp†, entre outros, que Define

    Class ,Style , Info e etc.

    Não encontro nada parecido Worhshop para gera tal controle.

    Já apelei para todas as digas postado no tópico Cannot Create Dialog Box e não resolvi a bronca do meu “Cannot Create Dialog Box†.

    Aguardo uma ajuda dos Companheiros.

    Mangueira

    Clipper53b/Blinker7/Fweval/MED 3.01/WorkShop 4.5

    mangueira@ig.com.br

    Manaus - Amazonas

    Visite Manaus-Am

  25. Ordem de Focus

    in Programação

    Posted

    Karo Kapiaba

    Não é best não é problema mesmo. E que não Koloquei bem meus problema .

    A ordem de focus que quero e a id 101, id 102, id 103, id 104 e id 105 só que quando roda ta na ordem 101, 102, 105, 103,104. . Entendo que o problema esta no meu DIALOG mas, não sei mudar a ordem WorkShop.

    Mangueira

    Clipper53b/Blinker7/fweval

    mangueira@ig.com.br

×
×
  • Create New...