Ir para conteúdo
Fórum Script Brasil

Erso

Membros
  • Total de itens

    160
  • Registro em

  • Última visita

Tudo que Erso postou

  1. Erso

    tabela de banco

    você tera q criar uma tabela para orçamento e outra para os produtos, e vincula-las com uma chave estrangeira!
  2. 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!
  3. 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:
  4. Erso

    Report Buider com ADO

    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ê!!
  5. 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;
  6. 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.
  7. 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 )
  8. 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
  9. Erso

    Campo calculado

    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!
  10. 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!
  11. 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;
  12. da uma olhada neste tutorial: WebBrowser
  13. Erso

    memo

    sim: você pode trocar seu DBEdit por um DBMemo
  14. Erso

    não repetir no listbox

    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
  15. inicializar um aplicativo com o windows, você pode colocar um atalho no menu inicializar: Iniciar/Inicializar Quanto ao delay você pode usar Sleep;
  16. Utilize o componente "WebBrowser" da paleta Internet. coloque o seguinte codigo no eveno OnCreate do seu Form. procedure TForm1.FormCreate(Sender: TObject); begin WebBrowser1.Navigate('www.google.com'); end;
  17. Erso

    MSG no MEMO

    acho q você esta querendo fazer uma espécie de log!? se for isto faça assim!: Memo1.Lines.Add('Minha mensagem'); mude a propriedade ScrollBars para "ssBoth" para que seu memo tenha barras de rolagem!!
  18. não é possivel selecionar mais de um RadioButton quando esses se encontram dentro do mesmo componente( os RadioButtons podem estar em um Panel ou groupBox..., para que você tenha varios RadioButtons, é necessário separa-los em GroupBox ou Panels ), a função deste componente é justamente essa, selecionar somente uma opção. Para selecionar varias opção utilize o componente CheckBox. espero ter ajudado!!! abraço!!
  19. Erso

    RBuilder e matricial

    opa!! jhonas, eu usei "Generic Text Only " muito boa a ideia, funciona quando eu uso apenas uma colunas.... porem quando utilizo varias colunas para minhas etiquetas ficarem uma ao lado da outra, o driver não obedece o tamanho das colunas, as etiquetas saem todas amontoadas. preciso de uma maneira de impressao para etiquetas, q saiam uma ao lado da outra pois a impressao é feita em formulário continua de impresso de etiquetas :unsure:
  20. Pesoal alguém já utilizou RBuider para imprimir em matricial??? LX-300 por exemplo.... quando mando imprimir pelo driver do windows fica muito lento. obrigado!!!
  21. você pode add as duas colunas q você deseja mostrar no DBGrid: exe: de 2 clicks no seu dbgrid, ira abrir o asistente de edição de colunas, click no botao Add New, sera criado uma coluna, na propriedade FieldName coloque o nome do seu campo. .... agora se você quiser fazer tudo m tempo de execução pode usar assim: DBGrid1.Columns[1].Visible := False; // onde 1 é o indice da coluna q você deseja não mostrar indico a primeira forma, pois a segunda é meio gambiarra!!!:) falou abraços!!
  22. opa!! obrigado era isso mesmo q eu tava procurando!!! cheguei a fazer alguns testes com dragdrop mas não deram resultados, esse exemplo q você me passou acessa "message" q o Windown envia p meu software!!! [:D]
  23. gostaria de saber como se coloca um menu em todas a paginas do meu site, d forma q se eu precisar modificar o menu não tenha q alterar em todas a minhas paginas! obrigado!
  24. estou fazendo um editor de arquivos "txt" e quero arrastar um arquivo de uma pasta ou da area de trabalho para dentro do meu editor, e abrir esse arquivo (como a maioria dos editores) alguém já fez coisa parecida? :huh: obrigado!
×
×
  • Criar Novo...