Daniel Paixão-Cascavel

Sim, seria isso mesmo. Opa, manda aí então, como eu faço pra adicionar uma imagem à um componente pelo Delphi?

Galera, eu me lembro que no Delphi 7 eu tinha a opção de criar arquivos *.dcr no Image Editor do próprio delphi. Depois o Image Editor foi tirado do Delphi. Agora pergunto: Existe algum programa pra criar .dcr sem que seja no Delphi? De preferência free. Abraço.

Galera, esses dias eu instalei um software aqui no meu computador e ele instalou o Firebird sem precisar abrir o instalador do Firebird. Gostaria de saber como se faz isso, ou seja, um instalador que copie todos os arquivos sem precisar abrir o instalador do Firebird. Alguem ai sabe como faz isso?

Obrigado mais uma vez xará! Realmente o problema está na balança e fabricante, mesmo conectando na máquina e me pedindo pra fazer comandos no display da balança, não conseguiu resolver.

Galera, eu sempre usei a opção de leitura manual, ou seja, de solicitar o peso balança com o ACBrBal porém agora estou mudando o PDV e queria implementar a opção de Monitorar a Balança porem não consegui fazer o sistema capturar o peso da balança quando parâmetro ""Monitorar Balança" está ativo. Dai eu peguei o Exemplo que tem na pasta Exemplos do ACBr, ativei o exemplo e marquei a opção de Monitorar Balança e também não lê o peso. Perguntas: Tem que fazer alguma configuração na porta Serial da balança ou até mesmo na própria balança? O que pode ser feito para testar isso de uma maneira eficaz? Lembrando que, com os parâmetros que informei do Device, se clicar em Ler Peso, o sistema le normalmente. Abraço a todos.

Certo, obrigado e desculpa o vacilo pois eu já tinha lido esse post e tinha me esquecido. Cara, eu to tendo alguns problemas na conversão por causa de coisas que mudaram (lógico). Você conhece algum que faria esse serviço? Converter os meus componentes do Delphi 2007 pra XE5 ou XE6?

Galera, eu tenho um sistema bem complexo e grande rodando em Delphi 2007 porém, para poder usufruir das novas tecnologias que o Delphi XE.. nos oferece, gostaria de migrar meu projeto para o Delphi XE5. Eu tenho alguns componentes próprios e alguns de terceiros e fui tentar compilar os pacotes no XE5 e me retorna a seguinte mensagem: [dcc32 Fatal Error] Controle.dpk(33): E2202 Required package 'rtl' not found. Essa mensagem ocorre em qualquer pacote que eu tento compilar. Gostaria de saber de vocês, alguem sabe como faço pra resolver isso? Um abraço e obrigado.

Na verdade TCampoLivre é um objeto meu. Você pode desconsiderar o tipo do dado. Veja que eu uso o TCampoLivre só pra pegar o titulo do campo, o tamanho e o valor que vai dentro dele. É uma coisa interna minha. Se atente principalmente nisso: {Se for o ultimo campo da tela e o próximo campo da tela não couber, ajusta o campo atual pra fechar o tamanho da tela} Inc(iLeft, Lb.Width); if (iLeft > pnCamposLivres.Width) then begin iLeft := 6; Inc(iTop, 40); Lb.Left := iLeft; Lb.Top := iTop; if (OldLb <> nil) then OldLb.Width := (pnCamposLivres.Width - 6 - OldLb.Left); Inc(iLeft, Lb.Width); pnCamposLivres.Height := pnCamposLivres.Height+41; end; Inc(iLeft, 3); OldLb := Lb;

Eu tenho uma rotina que faz isso pra montar campos livres na tela, funciona exatamente como você quer: procedure TFrmRotPesquisa.MontaCamposLivres; var Loop, iLeft, iTop: Integer; F: TField; Lb, OldLb: TMaskLabeledEdit; Campo:TCampoLivre; begin pnCamposLivres.Visible := False; if (Pesquisa.CamposLivres.Count>0) then begin pnCamposLivres.Visible := True; {Retira todos os campos livres da tela} while True do begin Loop := (pnCamposLivres.ControlCount - 1); if (Loop < 0) then Break; pnCamposLivres.Controls[Loop].Destroy; end; OldLb := nil; iLeft := 6; iTop := 18; for Loop := 0 to (Pesquisa.CamposLivres.Count - 1) do begin {Procura o campo pelo nome} Campo := TCampoLivre(Pesquisa.CamposLivres.Items[Loop]); F := cdsPesquisa.Fields.FindField(Campo.NomeCampo); if (F = nil) then Continue; {Cria o campo e redimensiona} Lb := TMaskLabeledEdit.Create(Self); Lb.Parent := pnCamposLivres; Lb.Left := iLeft; Lb.Top := iTop; if (F.DataType=ftInteger) then lb.Width := 50 else Lb.Width := (F.DisplayWidth * 7); Lb.Name := 'ed' + F.FieldName; Lb.Habilitado := False; Lb.LabelSpacing := 0; Lb.TabStop := False; Lb.CaptionLabel := TCampoLivre(Pesquisa.CamposLivres.Items[Loop]).Titulo; {Se for o ultimo campo da tela e o próximo campo da tela não couber, ajusta o campo atual pra fechar o tamanho da tela} Inc(iLeft, Lb.Width); if (iLeft > pnCamposLivres.Width) then begin iLeft := 6; Inc(iTop, 40); Lb.Left := iLeft; Lb.Top := iTop; if (OldLb <> nil) then OldLb.Width := (pnCamposLivres.Width - 6 - OldLb.Left); Inc(iLeft, Lb.Width); pnCamposLivres.Height := pnCamposLivres.Height+41; end; Inc(iLeft, 3); OldLb := Lb; end; end; Espero ter ajudado.

Como faço pra obter uma cópia desse projeto? Posso te ajudar a transformá-lo em um componente.

Vocês usam o ACBr pra desenvolver esse sistema?

Ops! Não.

Mande - me um email com mais detalhes: [email protected]

Galera, eu me cadastrei no site, me mandaram usuário e senha pra acesso ao forum porem, ao clicar em download, diz que eu não tenho permissão pra baixar. Como faço pra fazer o download do fmk?

Cara, acho que seu problema, no geral, está na falta de conhecimento dos processos de geração de boletos, envio de remessa, tratamento de retornos, impressão de boletos. Estude um pouco a respeito disso antes de começar a trabalhar com o componente. O próximo passo seria você, como um programador que deve ser, estudar o demo afinal, é pra isso que ele existe, para ser estudado. o Demo já uma forma "mastigada" de aprender sobre as funcionalidades do componente. Estude meu caro, estude. Nessa nossa profissão nada vem de "mão-beijada" se bem que, se for olhar os demos do ACBr, estão mais do que "mastigados". Estude o OnClick de cada botão que você terá a resposta para as perguntas que procura. Abraço.

Galera, alguem ai que use o Crystal Reports? To precisando tirar umas duvidas com relação a parâmetros com múltiplos valores.

Mas e o SAT-ECF, como fica?

Galera, eu sei que esse assunto já foi batido por aqui mas...o meu caso é um pouco diferente: EU já instalei, em outras ocasiões, o pacote ACBrNFE com o DANFE do Quick Report aqui na minha máquina porém, dessa vez estou tendo alguns problemas: Eu fui tentar instalar com o ACBrInstall e deu o erro que estava faltando o QR5RunD2007. Dai , seguindo orientações aqui do forum, eu abri o pacote ACBrNFeDanfeQRpkg e removi do required essa dcp. Só que, quando eu dou um Build ou compilo o pacote, me da a mensagem que tenho que adicionar algumas referencias conforme a imagem Até aí tudo certo, porém, quando eu dou ok nessa tela, me retorna um erro (imagem abaixo) e não compila. Alguém aí poderia me ajudar? Ps.: Eu uso o Delphi 2007 e instalei a versão 4 do Quick Report.

Cara, resolvi tudo aqui, afff., depois de um parto, agora tudo ok.

Rapaz, eu mechi nas Environment Variables, mais especificamente em BDS e em PATH. Você pode me passar seu skype?

Isaac, fui editar as configurações de Path no meu Delphi 2007 e acho que fiz caca. Agora, quando eu vou compilar qualquer coisa, me retorna o erro: [DCC Error] Project1.dpr(1): F1027 Unit not found: 'System.pas' or binary equivalents (.dcu). Bati cabeça hoje até agora 23:33 e não consegui resolver. Será que você poderia salvar a minha segunda-feira me ajudando a resolver isso cara?? Grande abraço.

Galera, meu sistema estava compilando normalmente no Delphi 2007 e, de repente, começou a dar essa mensagem ao compilar: [DCC Error] ACBrNFeWebServices.pas(62): F2051 Unit SOAPAttach was compiled with a different version of InvokeRegistry.TSOAPAttachment.Create

Galera, alguém aí conhece algum componente para Delphi que faça comparação de dois bancos de dados e me devolva um Script das diferenças igual o IBExpert faz??? Abraço a todos.

Opa, manda ai.

Galera, alguém sabe me dizer se posso ter problemas instando o Delphi XE6 sendo que já tenho instalado o Delphi 2007 e todo meu projeto está desenvolvido nele? Eu digo problemas como algum conflito que possa acontecer. Grato.