Ir para conteúdo
Fórum Script Brasil

Progr'amador

Veteranos
  • Total de itens

    1.130
  • Registro em

  • Última visita

Tudo que Progr'amador postou

  1. Progr'amador

    Pesquisar

    Faz assim: WHERE (((Tabela_Software.Nome_Software) Like [Qual o software?]&'*')); Abs. Progr'amador.
  2. Progr'amador

    Pesquisar

    Olá KingOfGod, Vai em exibir Modo SQL, posta o kê ta lá, talvez possa te ajudar. Abs. Progr'amador.
  3. Olá, você ta usando MySql mesmo? o ideal é sempre que for criar uma tabela que tenha campos com tipo number, sempre usar o Default 0(Zero) tipo: CREATE TABLE NOME_TABELA ( CAMPO_TEXTO VARCHAR2(45), VALOR1 NUMBER(*) DEFAULT 0, VALOR2 NUMBER(10,2) DEFAULT 0, VALOR3 NUMBER(10,3) DEFAULT 0); ou se quizer eliminar o NULL d'uma Select, use a função NVL: SELECT NVL(VALOR1,0)VALOR1, NVL(VALOR2,0)VALOR2, NVL(VALOR3,0)VALOR3 FROM NOME_TABELA Abs. Progr'amador.
  4. Olá, cara tu fez isso: no menu Project >> Options..., na aba Application tem a opção Title lá você coloca o Titulo que você quer, ou se você tever se referindo a barra de titulo do programa, verifique o Caption de seu form principal. Ok!!! Abs. Progr'amador.
  5. Olá TBaiano, você ta gravando isso onde? se for *.doc por exemplo, teria que usar uma fonte onde as letras tem o mesmo tamanho, com por exemplo a fonte Courier New. Abs. Progr'amador.
  6. Ola, bem, começar seria bom ter um bom livro de delphi (uma Biblia Delphi), mas se num tiver, tenho uma biblia desse em Word (num é tão boa quanto um livro mas da pra aprender muita coisa), são 11 arquivos doc no total de 17.3 MB, e zipado da 2.02 MB. Se você quizer ae vai o link: http://geocities.yahoo.com.br/ecmsb/bibliadelphi.zip tamos aki pra isso ok! , pode contar com minha ajuda no que eu souber, é claro Abs. Progr'amador.
  7. Olá Marcos, isso ae eu num sei não, mas, pow cara posta ae o cógido que você ta usando pra enviar e-mail to querendo umas dicas dessa faz tempo. Abs. Progr'amador.
  8. Olá TBaiano, tenta fazer isso: Adiciona mas duas variaveis tam1, tam2 : string; ae em vez disso: while Length(Valor1)< 39 do Begin Valor1 := Valor1 + ' '; End; while Length(Valor3) < 39 do Begin Valor3 := Valor3 + ' '; End; faz isso: tam2 := ' ';//tam. 39 letras tam1 := IntToStr(39-length(valor1)); tam2 := Copy(Tam2,1,StrToInt(Tam1)); Insert(valor1,tam2,1); valor1 := tam2; tam2 := ' ';//tam. 39 letras tam1 := IntToStr(39-length(valor3)); tam2 := Copy(Tam2,1,StrToInt(Tam1)); Insert(valor3,tam2,1); valor3 := tam2; ae sim depois: Table1LIN001 := Valor1 + Valor2; Table2LIN002 := Valor3 + Valor4; Abs. Progr'amador.
  9. Ops! Isso num é no Banco de dados e sim no delphi mesmo. Se você quer usar um ComboBox pra gravar os dados num Banco de dados ai é outra coisa, é possível sim. Poderia reformular sua pergunta dinovo mas detalhadamente do que ta querendo, talvez(quase certeza ) possamos te ajudar. Abs. Progr'amador.
  10. Olá OSJunior, Até onde eu sei, no banco isso não é possível. Abs. Progr'amador.
  11. O DBLookupComboBox, funciona da seguinte forma: Exemplo: tenho duas tabelas, tab_cidade com os campos, CODIGO, NOME_CIDADE, UF e a TAB_ESTADO campos: UF, NOME_ESTADO bem simples. Com isso vamos supor que eu já tenha o cadastro de Estados completo(TAB_ESTADO) com todos os estados, então irei cadastrar as cidades no form1, e gostaria de digitar o código e no nome da cidade livremente em DBEdit's e o UF gostaria de trazer d'uma lista de UFs cadastrados (PRA ESSE MOTIVO QUE USO O DBLOOKUPCOMBOBOX), ou seja, o DBLCB ira trazer a lista de Estados cadastrado na tab_estados pra incluir no campo UF da TAB_CIDADE. Agora de você num ta conseguindo incluir abrir o DBLCB Qualquer dúvida posta ae! Abs. Progr'amador.
  12. Eu nunca usei esse IBDataSet, nas se você der dois cliques abrirar uma caixa, dentro dessa caixa clique com o botão direto e escolha o opção Add fields..., isso ira adcionar os campos da sua tabela, por acaso nesses campos num teria uma opção tipo Defalut... ()no object inspector) se tiver tenta colocar 0 (Zero). Mas não tenho certeza disso, como falei "Eu nunca usei esse IBDataSet". Outra opção: Quanto pedir um novo registro(No Delphi), já inserir o valor 0 (zero) nos campos, antes da você preencher os dados, ae o que você não preencher com nenhum valor, consequentemente vai ficar 0 (Zero). Espero que tenho entendido. Abs. Progr'amador.
  13. Como assim!?!?!? Desculpe, mas não entendi. Abs. Progr'amador.
  14. Eu só num entendi no que isso influenciaria pra evitar o NULL! Abs. Progr'amador.
  15. Olá, que componente você ta usando no delphi pra inserir, e posta o código tambem, ok! Abs. Progr'amador.
  16. cara, conselho de amigo: Sempre que for criar uma tabela que tenha campos do tipo NUMBER use sempre o DEFAULT 0, que ae não aconteceria de um campo desse ficar NULL, tipo: CREATE TABLE NOME_TABELA ( VLCOND NUMBER(*) DEFAULT 0, VLDMAE NUMBER(10,2) DEFAULT 0, VLCEXT NUMBER(10,3) DEFAULT 0, ETC, ETC, ETC... (É só um exemplo...) Abs. Progr'amador.
  17. Olá ricardo_sdl, Não querendo ser insistente , mas, no seu tópico anterior ( Que Erro é Este "unassigned Code" ), coloquei uma dica pra tratar data como string, e dentro da procedure faria pra conversão pra data, já que tipo varchar2 (string) aceita valor NULL. Resolvi tratar assim porque tambem tive muito problema com campo tipo data, por isso prefiro tratar data como string e depois fazer a conversão. Abs. Progr'amador.
  18. Olá Ewerton, de uma olhada nesses tópicos: http://scriptbrasil.com.br/forum/index.php...ic=40707&hl=txt http://scriptbrasil.com.br/forum/index.php...ic=39458&hl=txt qualquer dúvida posta ae, falou!!! Abs. Progr'amador.
  19. Olha quando eu disse que era diferente do que conheço, é que eu começo uma trigger dessa forma por exemplo: CREATE TRIGGER TRIG_PLANINQ_GRAVAR BEFORE INSERT OR UPDATE ON PLANINQ FOR EACH ROW BEGIN ... etc ... ... etc ... Abs. Progr'amador.
  20. heheh!!! , bem, é um pouco diferente da que eu conheço, mas tenta fazer assim: em vez de: ACTIVE BEFORE UPDATE POSITION 0 use assim: ACTIVE BEFORE INSERT OR UPDATE POSITION 0 Abs. Progr'amador.
  21. Olá Tbaiano, que banco você ta usando? posta sua trigger completa, falou!!! Abs. Progr'amador.
  22. Viiixii!!! Cara te aconselho a fazer desta forma então: with DMDados.ZQRel do begin Close; SQL.Clear; Sql.Add('SELECT * FROM MNSGNS WHERE DATAENVIO BETWEEN :dataini and :datafin '); ParamByName('dataini').AsDate := StrToDate(DataIni); ParamByName('datafin').AsDate := StrToDate(Datafin); Open; end; Abs. Progr'amador.
  23. Olá hencker, tenta usar a select assim: SQLs := 'SELECT * FROM MNSGNS WHERE DATAENVIO BETWEEN TO_DATE('+#39+DataIni+#39+',''DD/MM/YYY'') AND TO_DATE('+#39+DataFin+#39+',''DD/MM/YYYY'')'; Abs. Progr'amador.
  24. Olá Paulo, fiz um teste aqui e realmente tá acontecendo esses problemas mesmo, e infelizmente ainda num faço ideia de como resolver isso. Abs. Progr'amador.
  25. Progr'amador

    Relatorio

    Olá, dê os comandos Close e Open no componente que ta abrindo a tabela. Tipo: Query1.Close; Query1.Open; ou Table1.Active := False; Table1.Active := True; Abs. Progr'amador.
×
×
  • Criar Novo...