Kbelo

Bom dia galera, Estou com dois problemas 1 quero fazer um botão com bordas arredondadas e outro que o botão seja transparente. Nesse botão transparente quero que fique somente o desenho do icone sendo que sem fundo. Os exemplos do que quero estão em anexo exemplotransparente.bmp exemploarredondado.bmp

Ola amigos. Resolvi dessa forma. Tenho uma tela para preencher o Servidor, banco, usuario e senha. "ConnString = Provider=SQLNCLI10;Driver={SQL Server Native Client 10.0};Server=" + alltrim(servidor) + ";Database=" + alltrim(banco) + ";Uid=" + alltrim(usuario) + ";Pwd=" + alltrim(senha) + ";") um exemplo de como fica "ConnString = Provider=SQLNCLI10;Driver={SQL Server Native Client 10.0};Server=MARCELO-PC\SQLEXPRESS;Database=MeuBanco;Uid=sa;Pwd=sa;"

Boa Tarde. Amigos estou tentando fazer uma conexão com SQL Server e não estou conseguindo. Fiz a conexão ODBC no painel de controle. No sistema estou tentando conectar dessa forma "ConnString = Driver={SQL Server Native Client 10.0};Server=MARCELO-PC\SQLEXPRESS;Database=Rickmarley;Uid=sa;Pwd=sa;" sempre que tento conectar mostra o seguinte erro 03/04/2013 12:14:55: SQLDriverConnect Error: No ODBC connection established IM002 - 0 - [Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado O Problema é que o Drive esta criado no Painel de controle e continua informando que não existe. Help-me

Tem gente ai confundindo as coisas. Windows 32 bits roda aplicação até 16 bits Windows 64 bits roda aplicação até 32 bits Isso independente da versão do Windows. Se for WIN7 32 bits vai rodar clipper com certeza. Se for XP 64 bita não roda. Ou seja não tem haver com versão e sim a plataforma de bits que ele roda. Quanto ao seu sistema a unica alternativa seria retirar o full screen e aumentar as propriedade e fontes no proprio prompt. Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

sei disso e nossos sistemas geram. Isso é para um cliente que usa outro sistema e estamos migrado só que ele precisa do sintegra do ecf e o sistema antigo esta com o banco corrompido. é só um paleativo Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

www.folksistemas.com.br Sistema Dincash De uma olhada acredito que temos o que precisa Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

Bom dia. Onde foi que eu errei??? Quando executo esse teste da erro no executável de enviar relatório. O que eu pude perceber é que quando vai acessar a BemaMFD2.dll mostra um alert e depois ocorre o erro. #INCLUDE "FiveWin.ch" FUNCTION Start() LOCAL hBorland,bAction xDll := LoadLibrary("BEMAFI32.DLL") Private x01 := "09" Private x02 := "2012" Private x03 := "Teste Empresa LTDA" Private x04 := "Rua Padrao de teste" Private x05 := " " Private x06 := space(22) Private x07 := "Sao Luiz " Private x08 := "Criciuma " Private x09 := "88803290" Private x10 := space(12) Private x11 := space(10) Private x12 := space(18) define dialog oDlg resource "ECFTESTE" redefine Get ogx01 var x01 ID 101 OF oDlg Picture "@!" redefine Get ogx02 var x02 ID 102 OF oDlg Picture "@!" redefine Get ogx03 var x03 ID 103 OF oDlg Picture "@!" redefine Get ogx04 var x04 ID 104 OF oDlg Picture "@!" redefine Get ogx05 var x05 ID 105 OF oDlg Picture "@!" redefine Get ogx06 var x06 ID 106 OF oDlg Picture "@!" redefine Get ogx07 var x07 ID 107 OF oDlg Picture "@!" redefine Get ogx08 var x08 ID 108 OF oDlg Picture "@!" redefine Get ogx09 var x09 ID 109 OF oDlg Picture "@!" redefine Get ogx10 var x10 ID 110 OF oDlg Picture "@!" redefine Get ogx11 var x11 ID 111 OF oDlg Picture "@!" redefine Get ogx12 var x12 ID 112 OF oDlg Picture "@!" redefine button obok ID 113 OF oDlg ; ACTION(executa()) oDlg:lHelpicon := .F. activate dialog oDlg center *=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=* static function executa *=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=* nRet := Bematech_FI_GeraRelatorioSintegraMFD(31, "c:\download.mfd", "d:\sintegra.txt", x01, x02, x03, x04, x05, x06, x07, x08, x09, x10, x11, x12) alert('Concluido') return .t. //Ler flag fiscal da impressora DLL32 FUNCTION Bematech_FI_GeraRelatorioSintegraMFD( codigo AS _INT,; Mdf AS STRING,; txtSintegra AS STRING,; x1 AS STRING,; x2 AS STRING,; x3 AS STRING,; x4 AS STRING,; x5 AS STRING,; x6 AS STRING,; x7 AS STRING,; x8 AS STRING,; x9 AS STRING,; x10 AS STRING,; x11 AS STRING,; x12 AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_GeraRelatorioSintegraMFD" LIB xDll id=code>id=code>Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

Bom dia. Onde foi que eu errei??? Quando executo esse teste da erro no executável de enviar relatório. O que eu pude perceber é que quando vai acessar a BemaMFD2.dll mostra um alert e depois ocorre o erro. #INCLUDE "FiveWin.ch" FUNCTION Start() LOCAL hBorland,bAction xDll := LoadLibrary("BEMAFI32.DLL") Private x01 := "09" Private x02 := "2012" Private x03 := "Teste Empresa LTDA" Private x04 := "Rua Padrao de teste" Private x05 := " " Private x06 := space(22) Private x07 := "Sao Luiz " Private x08 := "Criciuma " Private x09 := "88803290" Private x10 := space(12) Private x11 := space(10) Private x12 := space(18) define dialog oDlg resource "ECFTESTE" redefine Get ogx01 var x01 ID 101 OF oDlg Picture "@!" redefine Get ogx02 var x02 ID 102 OF oDlg Picture "@!" redefine Get ogx03 var x03 ID 103 OF oDlg Picture "@!" redefine Get ogx04 var x04 ID 104 OF oDlg Picture "@!" redefine Get ogx05 var x05 ID 105 OF oDlg Picture "@!" redefine Get ogx06 var x06 ID 106 OF oDlg Picture "@!" redefine Get ogx07 var x07 ID 107 OF oDlg Picture "@!" redefine Get ogx08 var x08 ID 108 OF oDlg Picture "@!" redefine Get ogx09 var x09 ID 109 OF oDlg Picture "@!" redefine Get ogx10 var x10 ID 110 OF oDlg Picture "@!" redefine Get ogx11 var x11 ID 111 OF oDlg Picture "@!" redefine Get ogx12 var x12 ID 112 OF oDlg Picture "@!" redefine button obok ID 113 OF oDlg ; ACTION(executa()) oDlg:lHelpicon := .F. activate dialog oDlg center *=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=* static function executa *=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=* nRet := Bematech_FI_GeraRelatorioSintegraMFD(31, "c:\download.mfd", "d:\sintegra.txt", x01, x02, x03, x04, x05, x06, x07, x08, x09, x10, x11, x12) alert('Concluido') return .t. //Ler flag fiscal da impressora DLL32 FUNCTION Bematech_FI_GeraRelatorioSintegraMFD( codigo AS _INT,; Mdf AS STRING,; txtSintegra AS STRING,; x1 AS STRING,; x2 AS STRING,; x3 AS STRING,; x4 AS STRING,; x5 AS STRING,; x6 AS STRING,; x7 AS STRING,; x8 AS STRING,; x9 AS STRING,; x10 AS STRING,; x11 AS STRING,; x12 AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_GeraRelatorioSintegraMFD" LIB xDll id=code>id=code>Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

Ja tentou colocar um barra de rolagem na janela? Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

xBrowse sim. Listbox acredito que não. Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

o Primeiro problema é simples como ja descrito aqui. Voce utilizou um produto no C170 que não esta no 0200. O Segundo problema voce pode até matar a charada. O validador esta informando a linha voce vai la e ve o conteudo dessa linha 4227. Ao que me parece ele estava esperando um outro registro e encontrou esse. Se puder poste essa linha para analisarmos. Se for o registro de uma nota poste o C100 e todos os filhos. Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

Esses dados são necessarios principalmente para quem usa SPED Pis e Cofins. Apesar de a ECF não guardar nada disso o CONTADOR deve passar uma lista para seu cliente informando qual a CST correta de cada produto. O NCM normalmente vem nas NF de compras com isso fica facil o cliente encontrar. Quando for SPED fiscal voce tera que informar a CST de ICMS. Crie um campo no cadastro de produtos e insira la esse valor. Se voce tiver SPED PIS e COFINS ai voce tambem ira precisar da CST de Pis e a CST de Cofins. Sendo que existe a de Entrada e a de Saida para cada CST. Alem disso estude tambem sobre o CSOSN, caso ainda não conheça. Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

A loja virtual tera que acessar um banco de dados para alimentar o estoque. É possivel ter um banco de dados na Loja virtual a qual voce tenha controle? É voce quem controla o site da loja virtual? Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

pretono := rretornarinformacao_ecf_daruma_("78",@valor) Tente assim Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.

************* function main private hDLL := LoadLibrary( "suadll.dll" ) .... No final do prg apos o return DLL32 FUNCTION bSendDisplayMsg( ID AS INT, line1 AS LPSTR, line2 AS LPSTR, timeExhibition AS WORD, typeAnimation AS WORD ) AS BOOL PASCAL LIB hDLL DLL32 FUNCTION bReceiveBarcode( ID AS INT, PORTA AS INT, BUFFER AS LPSTR, NBR AS INT ) AS BOOL PASCAL LIB hDLL DLL32 FUNCTION bSendProdPrice( ID AS INT, nameProd AS LPSTR, priceProd AS LPSTR ) AS BOOL PASCAL LIB hDLL DLL32 FUNCTION bSendProdNotFound( ID AS INT) AS BOOL PASCAL LIB hDLL id=code>id=code>Veja se ajuda. Não sei se ira funcionar mas o caminho é por ai. Marcelo Michels E-mail:marcelo@folksistemas.com.br Msn/E-mail:celo.michels@hotmail.com xHarbour 1.2 + Fwh 106(originalid=red>) + Bcc 5.82 + SQLRDD + Mate.