datilas

Alguém conseguiu instalar o fortes report no XE5? pois estou tentando e tenho vario problemas. e também não consigo entrar no fórum do fortes para reportar o problema

olhei e li todos os links assisti o video mas ainda não consigo compilar na api 10 (Andorid 2.3) que inclusive: esta na pagina http://docwiki.embarcadero.com/RADStudio/XE5/en/Android_Devices_Supported_for_Application_Development#Location_of_the_Samples_We_Tested não estou usando maquina virtual sera que alguem pode me ajudar

na verdade eu ja tenho esse emulador. eu só dei a ideia pois vi outros amigos do forum pedindo para enviar por email, e se fosse passado o link seria util para o futuro. mas muito obrigado por enviar o link. desculpe o incomodo.

o ideal seria vc passar um link para download, para que todos os interesados possam baixar

eu estava com o mesmo problema, então tive que baixar api's menores estou usando a api 11 (android 3.0)pois é a menor que consegui compilar, na api 10 (Android 2.3) estou tendo problemas para compilar, com a api 11 o apk ficou menor pouca coisa em relação a (api 14 padrão)

o ideal seria transformar em componente usando as classes do acbr, eu estou tentando usando como exemplo as classes do acbrnfe, mais ta dificil, ainda mais pq eu não tenho experiencia em criação de componentes, e ainda tem a questão se os administradores do projeto vão achar interessante adicionar o componente ao projeto, visto que quem vai dar manutenção? todos sabemos que o sngpc não tem grandes modificações,mas caso venha a ter, como o componente do Fabio_Hasman https://sourceforge....ad?source=files, até agora não vi nenhuma melhoria,

vc ja tentou assim: WebBrowser1.OleObject.Document.all.Item('usuario', 0).value := usuario.Text;

nem sempre a pagina salva tem todos os elementos nessesarios, mas não cutsta nada tentar, envia ai.

eu não tenho o login então fica dificil testar

alguma previsão para subir para o svn?

no ACBrValidador tem a opção ExibeDigitoCorreto, eu uso assim eu envio 8 digitos sendo o ultimo um numero aleatório e mando validar então o componente exibe o digito correto então eu uso copy(minhabarra,1,7)+ACBrValidador1.DigitoCalculado; sempre funcionou comigo só para ter ideia, vc pode usar o demo assim procedure TfrValidador.bValidarClick(Sender: TObject); begin bFormatarClick( Sender ); ACBrValidador1.Documento := edDocto.Text ; ACBrValidador1.Complemento := edComple.Text ; ACBrValidador1.IgnorarChar := edIgnorar.Text ; if ACBrValidador1.Validar then mMsgErro.Text := 'Documento OK' else Begin mMsgErro.Text := ACBrValidador1.MsgErro ; mMsgErro.Lines.Add(Copy(edDocto.Text,1,7)+ACBrValidador1.DigitoCalculado); end; end; ou se vc preferir pode usar a função do próprio componente adicionar na uses Math function CalcularDV(ACodigoGTIN: String): String; var Dig, I, DV: Integer; begin DV := 0; Result := '' ; // adicionar os zeros a esquerda, se não fizer isso o cálculo não bate // limite = tamanho maior codigo (gtin14) - 1 (digito) //ACodigoGTIN := PadR(ACodigoGTIN, 13, '0'); While Length(ACodigoGTIN) < 13 do ACodigoGTIN := '0'+ACodigoGTIN; //eu alterei aqui for I := Length(ACodigoGTIN) downto 1 do begin Dig := StrToInt(ACodigoGTIN[I]); DV := DV + (Dig * IfThen(odd(I), 3, 1)); end; DV := (Ceil(DV / 10) * 10) - DV ; Result := IntToStr(DV); end;

como o Daniel disse esse processo é automatico, faça um reset na impressora e depois a calibragem para ela reconhecer o tamanho das etiquetas. Exemplo: http://www.youtube.com/watch?v=7DbgdRBIuSw

na minha opinião dbedits são para manipular dados diretamente no banco (o que não é recomendado no seu caso por ser on-line), a não ser que vc esteja manipulando os dados na memoria ex: ClientDataset sem conexão com o banco, no meu caso eu uso edits e só envio informações para o banco na hora de gravar a informação de preferencia com query pois table deixa a aplicação muito lenta mesmo usando filtered isso no caso que você especificou (Online) sei que no zeos é posivel fazer append post mesmo usando query mas não recomendo por ser muito lento o ideal é manipular os dados na memoria é só depois gravar com execsql, no caso eu uso edis pois dbedits só são possiveis de manipular com o dataset aberto

Você teve algum progresso com esta impressora?

camtasia sempre usei muito bom

Google: Como Usar Zebedee http://www.devmedia.com.br/forum/zebedee-algum-sabe-configurar/288909 http://seucolega.wordpress.com/2008/06/04/conectando-firebird-zebedee/

eu acho que deve ser alguma coisa com o tipo de parametro (WideString)

você poderia postar ele

para buscar o retorno eu faço assim: procedure TForm1.Button1Click(Sender: TObject); var WS: FeixeWebSoap; clie : Cliente; begin Memo1.Lines.Clear; WS := GetFeixeWebSoap(); try WS.Clientes(edit1.Text,edit2.Text) ; Memo1.Lines.Add(clie.CNPJ); Memo1.Lines.Add(clie.Raz_oSocial); Memo1.Lines.Add(clie.NomeFantasia); except on E : exception do Memo1.Lines.Add(E.message); end; end; o problema esta sendo com a conexão que sempre retorna este erro: Server was unable to process request. ---> String reference not set to an instance of a String. Parameter name: s

vc ja tentou usando um for i:= 0 to Registro.Count -1 do Begin variavel1 := Registro[i].FEstabelecimento; variavel2 := Registro[i].FAmbiente; variavel3 := Registro[i].FDataEHora; continua sua rotina End;

sim a messagem do certificado vai sempre aparecer, não consegui passar por cima dela, se vc conseguir posta ai pra gente

eu acho que o erro deve ser de permisão no windows, eu uso o delphi 7 na minha aplicação esta rodando normal, sinto muito mais não tenho como testar no xe2

qual delphi vc ta usando?

a unica mensagem que aparece é: "Para Fazer o Download é nessesario possuir um Certificado de cliente clique ok para fazer o download"

a unica coisa que uso é não lembro qual esta funcionando. testa ai: function DownloadFile(Source, Dest: string): Boolean; begin try Result:= UrlDownloadToFile(nil, PChar(source),PChar(Dest), 0, nil) = 0; except Result:= False; end; end; function TfrmPrincipal.DownloadFile(SourceFile, DestFile: string): Boolean; const BufferSize = 1024; var hSession, hURL: HInternet; Buffer: array[1..BufferSize] of Byte; BufferLen: DWORD; f: File; sAppName: string; begin sAppName := ExtractFileName(Application.ExeName); hSession := InternetOpen(PChar(sAppName),INTERNET_OPEN_TYPE_PRECONFIG,nil, nil, 0); try hURL := InternetOpenURL(hSession,PChar(SourceFile),nil,0,0,0); try AssignFile(f, DestFile); Rewrite(f,1); repeat InternetReadFile(hURL, @Buffer,SizeOf(Buffer), BufferLen); BlockWrite(f, Buffer, BufferLen) until BufferLen = 0; CloseFile(f); Result := True; finally InternetCloseHandle(hURL) end finally InternetCloseHandle(hSession) end; end; no evento OnFileDownload do TEmbeddedWB function TfrmPrincipal.WebBrowser1FileDownload(pmk: IMoniker; pbc: IBindCtx; dwBindVerb, grfBINDF: Cardinal; pBindInfo: PBindInfo; pszHeaders, pszRedir: PWideChar; uiCP: Cardinal): HRESULT; begin if DownloadFile (pszRedir,'C:\teste.xml') then Begin ShowMessage('Download Concluído.'); End; end; pelo menos na minha aplicação não pergunta onde vai salvar.