Erso

você tera q criar uma tabela para orçamento e outra para os produtos, e vincula-las com uma chave estrangeira!

não entendi! :huh: , como assim?

pessoal... Utilizo o componente "TStoredProc" da paleta BDE para executar as procedures do banco de dados ( Oracle).... criei uma "package" no Oracle para organizar melhor essas procedures..., agora, quando vou tentar usar essas procedures no "TStoredProc" elas não são listadas na propriedade StoredProcName, as unicas procedures listadas são as q não estao dentro de "packages". porque sera? :blink: obrigado!

você tera q setar os valores dos Edits: no evendo "AfterScroll" da sua Query ( ou ClientDataSet ) sete os valores dos edits Edit1.Text := Query.FieldByName('NOME_DO_CAMPO').AsString; Edit2.Text := Query.FieldByName('NOME_DO_CAMPO2').AsString; é uma forma de se fazer :mellow:

opa!! no report builder você não precisa usar os pipeLine e querys para inserir sql, as instruções sql são colocadas dentro de proprio relatorio..., é um pouco complexo de inicio trabalhar com report builder seria melhor você observar os exemplos q vem junto o Report builter... se você não tiver esses exemplos deixe seu email q eu envio p você!!

eder o colega Jhonas está certo, fiz o teste com o seu codigo e realmente é so mudar o sinal, porque 10 - 11 = -1, teste o codigo: var Saldo, Saida_Estoque : Integer; begin Saldo:=strtoInt(Edit1.text); Saida_estoque:=strtoInt(Edit2.text); Showmessage(Inttostr(Saldo-Saida_Estoque)); end;

você já tentou executa sua aplicação fora do delphi?.... utilize novamento o "trys, execepts" e rode sua aplicação fora do delphi, pois o delphi entra em modo de debug mesmo utilizando o "trys, execepts", para q você visualiza a exceção ..., se fora do delphi sua aplicação rodar normalmente vá em "Tols -> debugOption...na aba language exceptions... desabulite a opção stop on Delphi Exception": assim o delphi não entra em modo de debug quando houver uma exceção.

bom não sei se minha resposta vai servir mas... tb já tive esse problema estava fazendo um aplicativo de mensagens... resolvi o problema fazendo um protocolo proprio de comunicação com as strings, ex: defina palavras chaves de comunicação, depois passe sempre entre "[ ]" os seus parametros, sempre o que estiver entre os primeiro "[ ]" da sua mensagem você vai saber q é parametros internos do seu systema... foi assim q resolvi meu problema. espero ter ajudado opa! tive outra ideia para t ajudar: Estude estrutura "XML", ai você vai passar as informação por string respeitando o padão "XML", você vai conseguir definir ok é mensagens e ok é parametros internos, podendo assim at definir Niki de usuários essas coisas ( vou at implementar isso no meu aplicativo agora auauhauh )

não sei qual componente de acesso você esta utilizando... mas, onde você indica o caminho do banco dedados, você deve indicar o caminho do servidor, colocando o ip do seu servidor ( onde esta o seu banco de dados ) ":" e o caminho vale lembrar q o "client" do FireBird deve estar instalado nas suas maquinas clientes

Você não vai conseguir usar a função sum na clausura "WHERE", a maneira é fazer um Sub-select Close; Sql.Text := ' select * from ' +' ( ' +' Select produto,decricao,preço,unidade , sum(sugestadecompra) SugCalc from produto ' +' Where produto=:codigo ' +' Group By produto,decricao,preço,unidade ' +' )x ' +' where x.SugCalc > 1 ' +' Order By x.produto,x.decricao,x.preço,x.unidade '; Open; você pode usar um select como se fosse uma tabela dando um select ... from ( select ... from minha_tabela.... ) x, esse "X" é o apelido q dei ao select, ai quando você quiser referenciar algum campo q esse select retorna utilize <Apelido>.<nome_campo> ex: "x.nome_campo" espero ter ajudado!

ola! pessoal! Trabalho com Delphi+Oracle conexão BDE. existe a possibilidade de vincular a sessão aberta pelo sistema a um ID( codigo do operador logado no meu sistema )? ex: Tenho uma trigger que gera logs de alteração nas principais tabelas, gravo esses log numa outra tabela, e gostaria de gravar qual opererador do meu sistema fez a alteração. Obrigado!

talvez por causa do formato da data!!o banco espera o formato americano ('mm/dd/yyyy') e quando você tranforma em string essa data fica no formato brasileiro('dd/mm/yyyy') tente assim: agenda:= DateToStr (Date); label3.Caption:= agenda; DM.QueryAgenda_Consulta.Close; DM.QueryAgenda_Consulta.SQL.Clear; DM.QueryAgenda_Consulta.Sql.Add ('SELECT * FROM agendaconsulta'); DM.QueryAgenda_Consulta.Sql.Add ('WHERE Data_consulta = :AGENDA'); DM.QueryAgenda_Consulta.Params[0].AsDate := Date; DM.QueryAgenda_Consulta.Open;

da uma olhada neste tutorial: WebBrowser

sim: você pode trocar seu DBEdit por um DBMemo

você tb pode fazer assim: porque se já existir o item q você esta tentando inserir sera retornado o indice dele dendro do listbox, caso contrario retornará "-1" ai você insere