Jump to content
Fivewin Brasil

CamilaFonseca

Membros
  • Posts

    7
  • Joined

  • Last visited

Recent Profile Visitors

245 profile views

CamilaFonseca's Achievements

Newbie

Newbie (1/14)

1

Reputation

  1. Olá, Algum de vocês já fez assinatura digital da aplicação utilizando certificado digital do tipo Code Sign e que poderia me orientar em como fazer isso? Atualmente minha aplicação vem enfrentando muitos problemas com antivírus e também com o software de segurança que opera junto a maioria dos Gerenciadores Bancários (warshaw) da empresa Gás Tecnologia, e a sugestão que tivemos foi que a assinatura digital da aplicação resolveria esse problema, porem até o momento não encontramos nenhuma orientação de como fazer.
  2. Bom dia, Vamos começar o desenvolvimento da NFC-e e temos algumas dúvidas que quem já desenvolveu ou está implementando possa opinar: 1) Qual a melhor forma de implementar: seguindo o modo de cada fabricante de impressora ou usar um modo geral, exemplo DLLs de cada fabricante ou uma DLL que atenda de forma geral? 2) Existe muita diferença entre usar Daruma ou Bematech para o NFC-e? Muito obrigada.
  3. Boa tarde, Tentei como vocês me orientaram, porém nenhuma das soluções apresentadas resolveu o problema. Um detalhe que notei é que se eu usar somente o teclado, com as teclas de atalho, o erro não é apresentado. E também que só ocorre quando uso a função When() ao criar o botão. Então acredito que o problema esteja na função de click duplo do mouse utilizada pelo FiveWin. Utilizo a função CreateButton da classe TGet: METHOD CreateButton() CLASS TGet local oThis := Self local hBitmap local nBmpWidth := 1 local lFileBmp := .t. if ValType( ::bAction ) == "B" .and. ::IsKindOf( "TGET" ) //Upper( ::ClassName() ) == "TGET" // 2014-06-30 if Empty( ::cBmpName ) @ 0, ::nWidth - ::nHeight - If( ::lSpinner, 20, 0 ) BUTTONBMP ::oBtn OF Self ; ACTION ( Eval( oThis:bAction, oThis ), if( ::lKeepFocus, oThis:SetFocus(), nil ) ) ; SIZE ::nHeight - 4, ::nHeight - 4 PIXEL if Empty( ::oBtn:hBitmap ) ::oBtn:SetText( "..." ) endif else hBitmap = If( ( lFileBmp := File( ::cBmpName ) ), ReadBitmap( 0, ::cBmpName ),; LoadBitmap( GetResources(), ::cBmpName ) ) if ::lAdjustBtn nBmpWidth := nBmpWidth( hBitmap ) + 5 ::SetMargins( 1, nBmpWidth ) else nBmpWidth := ::nHeight - 4 endif if ::lBtnTransparent ::oBtn := TBtnBmp():New( 0, ::nWidth - nBmpWidth - If( ::lSpinner, 20, 4 ), nBmpWidth, ::nHeight - 4,; if ( !lFileBmp, ::cBmpName, ),,if ( lFileBmp, ::cBmpName, ),,{|| Eval( oThis:bAction, oThis ),oThis:SetFocus() },; Self,,,,,,,,,.f.) ::oBtn:lTransparent := ::lBtnTransparent else ::oBtn := TButtonBmp():New( 0, ::nWidth - nBmpWidth - If( ::lSpinner, 20, 4 ),, Self, {|| Eval( oThis:bAction, oThis ),oThis:SetFocus() }, ; nBmpWidth, ::nHeight - 4,,,,.t.,,,,,,,::cBmpName ) endif DeleteObject( hBitmap ) endif ::oBtn:lCancel = .T. // so the GET VALID is not fired when the button is focused if Upper( ::oWnd:ClassName() ) == "TDIALOG" .and. ::oWnd:lResize16 ::oBtn:nWidth = ::nHeight - 5 ::oBtn:nHeight = ::nHeight - 5 ::oBtn:nLeft = ( ::nWidth * 1.167 ) - ::nHeight endif if ! IsAppThemed() ::oBtn:SetPos( 2, ::oBtn:nLeft + 2 ) endif /* // We force a WM_NCCALCSIZE msg to be sent to the GET SetWindowPos( ::hWnd, 0, 0, 0, 0, 0,; nOr( SWP_NOMOVE, SWP_NOSIZE, SWP_NOZORDER, SWP_FRAMECHANGED ) ) */ endif return nil
  4. Bom dia, Após atualizar para FiveWin 15.3, estamos tendo um problema nas telas. Ao clicar em um botão com ícone, ele abre uma tela para selecionar um item em uma ListBox. Após selecionar o item desejado, ele retorna para tela anterior e o foco deveria ter ido para o campo, o Get. Porém o foco está ficando no botão que acaba impedindo o carregamento correto das informações na tela. Alguém teve o mesmo problema? Exemplo de como usamos o botão: Redefine Get oCodiIte Var CodiIte ID 101 Of oDlgNfsInc Picture cMasIte When(lNewNfs_.And.Empty(CodiIte)) Valid(Empty(CodiIte).Or.((LocIte(@CodiIte,oDlgNfsInc,"vNFDesc",.T.,,,,,,@CodiBar).And.CarNfsInc(.F.,lNewNfs_,oDlgNfsInc)))) Bitmap "Lupa" Action(ProcIte(@CodiIte,@CodiBar,oCodiIte,oDlgNfsInc,.F.,"",.F.)) UpDate
  5. Boa tarde Senhores!! Gostaria de saber se alguém conseguiu fazer rodar certinho aí com o xDev? Se sim, dá uma luz aí porque até agora não conseguir nada.
  6. Boa tarde, Gostaria de saber se alguém já implementou a nota legal exigida na homologação PAF-ECF, pois gostaria de maiores informações a respeito desse arquivo, pois tenho que realizar a implementação do mesmo.
×
×
  • Create New...