robinhocne

Pessoal, estou tentando instalar a biblioteca JEDI, mas ele dá erro no meio da instalação do jcl, não consiguo nem instalar depois o jvcl. alguém conseguiu >>??

é fiz t também não deu certo....já desistanlei o Delphi e instalei novamente...mas nada.. eu adicionei o dpl manualmente...mas quando eu saio e entro novamento no delphi ele dá o erro e some.

é fiz t também não deu certo....já desistanlei o Delphi e instalei novamente...mas nada..

Olá pessoal, estou tentando instalar um componente que porém sempre utilizei no delphi, mas eu instalei o windows seven no meu pc, e ai instalei o delphi...e está rodando tranquilamente....mas eu to tentando instalar e dá os seguintes erros.... O caminho da biblioteca do componente eu já relacionei...mas continua dando esse erro...já fiz de tudo e não sei o que mais fazer.... alguém pode me ajudar...pois outros componentes eu instalei correto...e deu tudo certo...

Você deve ter um field Quantidade, pois se agrupar teria que acrescentar + 1 na quantidade... então faça assim: Coloque isso no Onclick de um botão... altere perante suas necessidades: procedure TForm1.Button1Click(Sender: TObject); begin if ClientDataSet1.Locate('CODIGO', Edit1.Text, []) then // Edit.text é o edit que você coloca o codigo do pedido, exemplo: codigo 1 é frango a passarinho, 2 é peixe... begin ClientDataSet1.Edit; ClientDataSet1QUANTIDADE.Value := ClientDataSet1QUANTIDADE.Value + StrToInt(Edit2.Text); ClientDataSet1.Post; end else begin ClientDataSet1.Append; ClientDataSet1CODIGO.Value := StrToInt(Edit1.Text); // edit1 codigo do produto ClientDataSet1DESCRICAO.Text := Edit3.Text; // edit3 descricão do produto ClientDataSet1QUANTIDADE.Value := StrToInt(Edit2.Text); //edit2 quantidade... ClientDataSet1.Post; end; end; Espero que tenha ajudado... Abraços não queria seguir esse metodo....mas acho que vai ser o jeito!, mas valeu pela ajuda

Bom dia, Pessoal, estou inserindo em uma tabela temporaria os itens de pedido de mesa, mas ai eu coloquei um botao para agrupar os itens que tenha o mesmo codigo e descricao parecidos, mas não sei fazer isso em tabela temporaria, alguém poderia me ajudar ???

Opa consegui resolver, a linha do insert eu preenchi com algum valor e ai deu certo....

Veja isso na área de desenvolvedores da própria bematech ( poste lá a sua dúvida ) http://www.bematech.com.br/desenvolvedores/sprtdesnv.asp abraço Ok, obrigado, consegui o MSN dos suportes da bematech, mas infelizmente eles não puderam me passar, pois eles falaram que esse modelo não é comercializado no brasil, se alguém puder me ajudar, ou já fez algo desse tipo em alguma impressora bematech de outro modelo, se possivel me passar para eu testar eu agradeço....

Bom, estou fazendo um simulador de pagamentos compostos.... E trabalho com dois TRxMemoryData, um para o de valores (TblValores) e outro para ir somando cada seleção dos valores (TblSimulador)... No TRxMemoryData (TblSimulador) eu coloquei o Campo Total, Divido e Resultado, a medida que vou clicando em cada linha do TblValores ele vai somando no TblSimulador, até ai ok... Ai por exemplo no campo Divido e coloco por quantos eu quero dividir o valor...e no OnColExit do DbGrid eu coloquei para fazer o calculo e obtem o resultado no campo Resultado....até ai ok, .... Mas ai eu quero fazer outra simulaçao....e em vez de ir somando nessa primeira linha eu quero somar na segunda linha do TblSimulador, ai eu dou um insert no TblSimulador, mas ai em vez de ele somar nessa linha nova, ele volta na primeira.... espero que entenderam, mas eu não estou conseguindo fazer que some na outra linha....um novo insert no TblSimulador.

Bom dia Pessoal, Então, estou fazendo um cupom de pedido para restaurante....fiz normal no Fortes Report e está imprimindo ok, mas eu tinha que mandar apos o termino da impressao a impressora cortar o cupom, esse modelo tem o comando de cortar, mas não sei como fazer, pesquisei na net e não achei.....alguém poderia me ajudar ????

A versão do IBDAC do delphi 7 não serve para o Delphi 2007 ... esta versão é paga http://www.vclcomponents.com/Delphi/DataBa...nents-info.html essa versão é para o delphi 2005 ... não tenho certeza, mas acho que ela funciona no delphi 2007 http://www.devart.com/ibdac/ibdac9.exe abraço eu tenho para até a versão do delphi 11 (2007), e tinha acontecido assim...eu instalei..tudo beleza tudo certo..comecei a montar o projeto. ai fechei o delphi..fui entrar de novo e tinha sumido..olhei as packges não tava lá..ai tentei instalar de novo e não estou conseguindo.

não estou conseguindo instalar o IBAC no delphi 2007, eu tenho ele instalado no meu delphi 7 e deu tudo certo, mas fui instalar no delphi 2007 não dá... alguém sabe instalar?

Veja se consegue postar a imagem do que voce esta querendo abraço Assim que eu queria...igual ao menu do delphi 2007 Menu Delphi 2007 Mas ainda teria que ter submenus.....

É eu acho que fiz a pergunta meia estranha.... Eu queria um menu igual ao do delphi 2007....dos componentes que fica ao lado direito...pois ele da para ficar só o nome do menu e ai quando abre ele aparece os submenus.... ???? :rolleyes:

Exemplo de um menu http://www.google.com.br/url?sa=t&sour...es8DhAb2bQov94g abraço não entedi nada

Bom dia .... Estou usando o Delphi 2007 ... e fazendo os menus de um novo projeto... estou usando o componente do JEDI da paleta Jv Non-Visual (JvMainMenu1) e queria travar os submenus...tipo assim quando clica em um item do menu ele fecha...eu queria que ficasse aberto as raizes do menu (submenus)...entenderam ?? alguém pode me ajudar ?

Olá pessoal... estou com problemas em restaurar o backup, ele dá essa mensagem do winrar....nenhum arquivo encontrado. para gerar o backup eu faço assim... if DirectoryExists(TxtSalvar.Text) then begin dtmLoja.dbaLoja.Connected := False; DtmEmp.DbaEmp.Connected := False; Banco := 'C:\IzaLoja\Bancos'; // \IzaLoja.fdb Data := Date; Nome := 'BK-'+ FormatDateTime('dd-mm-yy', Data); Caminho := ChangeFileExt(TxtSalvar.Text+'\'+Nome,'.rar'); LinhadeComando :='C:\Arquivos de programas\WinRAR\WINRAR.EXE a "'+Caminho+'" "'+Banco+'"'; try WinExec(Pchar(LinhadeComando),1); except end; ShowMessage('Backup Gerado com Sucesso!'); dtmLoja.dbaLoja.Connected := True; DtmEmp.DbaEmp.Connected := True; close; end else begin Showmessage('Diretorio Inexistente!' ); end; e para restaurar que está dando o problema...é esse: If not(fileexists(TxtCam.Text)) then begin Showmessage('Backup Inexistente!'); exit; end; if pergunta ('Tem certeza que deseja retornar o Backup selecionado?') then begin if pergunta ('Esse procedimento irá substituir os dados atuais pelo do backup'+#13+'Posso continuar ?') then begin SetCurrentDir(TxtCam.Text); dtmLoja.dbaLoja.Connected := False; CaminhoRetorno :='c:\'; LinhadeComando :='C:\Arquivos de programas\WinRAR\WINRAR.EXE e "'+TxtCam.Text+'""'+CaminhoRetorno+'"'; try WinExec(Pchar(LinhadeComando),1); except end; ShowMessage('Backup Retornado com Sucesso!'); dtmLoja.dbaLoja.Connected := true; close; end else begin close; end; end else begin close; end;

em questao do tamanho ele está certo, mas quando termino de imprimir que é saltado um pouco de papel para fora...eu tenho que voltar o papel para imprimir no topo certo e se eu não voltar ai comeca imprimir na parte errada.

Funcionou muito bem mais tem um problema como eu trabalho com status aguardando (-1) aprovado (1) reprovado (0) quando eu seleciono todos eu gostaria só que os reprovados ficassem vermelho

Se voce não precisar usar o quickreport , é possivel usando o componente VDOPrint para impressão direta abraço eu utilizo o Fortes Report.

Mas só para que antes de imprimir novamente o papel seja posicionado, é preciso de fazer esse trajeto todo, pois ai teria que fazer nas maquinas que estao instaladas as impressoras, não tem nenhum comando para que possa fazer antes de imprimir ?

Geralmente vai dar conflito na hora de você compilar.!

as variaveis declaradas fora do private acaba sendo publica para todos os outros formularios desde que o formulario (FrmCaixa) esteja declarado em uso. no private você deixa as variaveis somente para aquele formulario em que você declarou, tanto como na public ou fora da public vai ser publica para o formulario.

Opa, falta de pesquisar...achei na internet aqui.... no BeforePrint do RLDBText.... text := formatcurr('##,##0.00', strtocurr(text)); fonte

E se você fazer uma instrução sql e filtrar esse codigo...assim só trazendo os registros desse codigo e manda para o relatorio!