Progr'amador

Tem no site sim: Link Não cheguei a usar essa versão, qual é a versão do seu MySQL? É sempre bom esta atualizado, no entanto se funcionar direitinho, não há pra que mudar. Abs. Progr'amador. B)

Olá juniorboll, Particulamente acredito que vale a pena sim, nesse caso teria que usar o mysql-connector-odbc-3.51.12 pra conectar com BDE, atualmente estou usando e nada a reclamar dele. Abs. Progr'amador. B)

Olá Ivano num é complicado não!, pegando um gancho na dica do Micheus, no Field (Campo) de seu ADOQuery ou ADOtable tem a opção Currency é só colocar TRUE, que ele vai usar o formado Moeda, e não precisa nem de mascara. Abs. Progr'amador. B)

Olá Ivano, Minha preferência é por DBE, não gosto do ADO, até porque é mais lento e tem outras desvantagens, claro que se for um banco de poucos dados você quase não vê diferença, já o DBExpress eu nunca usei. Abs. Progr'amador. B)

Olá juniorboll, É difícil de dizer qual é o melhor, mas eu já usei o BDE e nunca reclamei dele nem ele de mim :D , acho que é uma boa opção. Abs. Progr'amador B)

É isso aí Cleverson, São vocês, somos todos nós, que fazemos com que esse fórum exista, eu mesmo quando entrei que no fórum, tava iniciando em delphi ainda, e muita coisa apredi e continuo apredendo. Abs. Progr'amador. B)

Olá, Nos banco de dados que eu conheço não é permitido o uso de '*' no DELETE, até porque não há necessidade disso, sendo que '*' em uma SELECT, quer dizer que você está selecionando todos os campos da tabela para exibição, e pra quê dizer que está selecionando todos os campos em uma deleção, se é deletado o registro inteiro? :huh: Me permite perguntar, mas qual é banco de dados que você consegue fazer isso??? Abs. Progr'amador. B)

Olá Erso, num precisa não, é você relacionar, tipo atravez de duas Query's, por exemplo: * QryPedido >> SQL = 'SELECT * FROM PEDIDO' * QryProdutoPedido >> SQL = 'SELECT * FROM PRODUTO_PEDIDO WHERE Codigo_pedido = :Codigo_pedido' no Object Inspector dessa QryProdutoPedido vai em Params... e defina o tipo desse paramentro (Codigo_pedido), que acredito que seja Integer. (isso de acordo com tipo que realmente está na sua tabela) aí é só setar no DataSource da QryProdutoPedido o dataSource ligada a QryPedido. Espero que tenha entendido, estou explicando tudo assim por cima, é que deu pau na minha máquina e tou sem o delphi por enquanto. Abs. Progr'amador. B)

Desculpe Cleverson, Não consegui entender sua pergunta. Poderia reformular para que eu possa entender. Abs. Progr'amador. B)

Olá, nesse tópico fixo: Links tem uma porção de sites onde você pode encontrar esses exemplos, tipo no: http://www.delphi.eti.br Abs. Progr'amador. B)

Olá Cleverson, eu nunca trabalei com Table sempre uso Query, num conheço esse função FindKey, mas pelo visto é igual a função Locate então no IB tenta assim: if not IBTable.Locate('CAMPO',Edit1.text, []) then MessageDlg ('Não foi possivel localizar esse código', mtinformation, [mbok], 0); Abs. Progr'amador. B)

Olá juniorboll, Na verdade você terá que criar um Sequence (no banco de dados), EX: CREATE SEQUENCE NOME_SEQ INCREMENT BY 1 START WITH 1; e pra usar você faz assim: INSERT INTO NOME_DA_TABELA CAMPO_ID VALUES NOME_SEQ.NEXTVAL; e você pode até usar uma Trigger pra fazer isso automaticamente em cada insert: (no banco de dados) Create Or Replace Trigger TRIGGER_01 Before Insert On NOME_DA_TABELA For Each Row Begin :New.CAMPO_ID := NOME_SEQ.NEXTVAL; End; e se você quizer pegar esse valor diretamente no delphi pra jogar numa variavel (por exemplo) use uma Query: var id_value : integer; begin Query1.Close; Query1.Sql.Clear; Query1.Sql.Add('SELECT NOME_SEQ.NEXTVAL INTO '+''''+id_value+''''+' FROM DUAL'); Query1.Open; end; p.s. acho que é isso - é que estou sem o oracle e sem o delphi no momento. Abs. Progr'amador. B)

Valeu Micheus, isso mesmo, apenas confundi na hora de postar. Abs. Progr'amador. B)

Olá juniorboll, o Dificil não é a conexão e sim a configuração do banco de dados. você já criou e configurou o Alias?? A conexão com delphi pode ser feita atravez do BDE. Abs. Progr'amador. B)

Opa, agora sim, já que você está usando Table, é so pegar o valor do ultimo registro antes de inserir o novo redistro. tipo: var i : integer; begin Table1.Next; i := Table1.FieldByName('Codigo').Value + 1; Table1.Insert; Table1.FieldByName('Codigo').Value := i; etc... end; Abs. Progr'amador. B)

Feito! Churc moderador, Estarei ausente nos proximos dias por motivo de viagem à trabalho ainda hoje, sera no máximo uma semana. Churc, qualquer dúvida colega, pode falar com qualquer Monitor que eles vão te ajudar! Abs. Progr'amador.

Olá galera do fórum, Temos o mais novo Moderador na SB, o colega Churc. E Fica aqui as minhas boas vindas! Abs. Progr'amador. B)

Olá galera, Só justificando a demora pra colocar o Churc como Moderador, é que dependo da disponibilidade de um Administrador e até o momento não obitive contato. Abs. Progr'amador. B)

Ueh!, o componente TTable não tem essa função RecordSet :unsure: e ainda não entendi essa: gerar um código novo automaticamente você está falando "gerar" um novo registro??? é isso? Abs. Progr'amador. B)

Pow essa do ADO eu não sabia, valeu! Eu concordo com você sobre o questionamento, só que eu defendo a opnião de que nem sempre o uso da concatenação seja algo complicado (confuso) e sim algo mais prático em devidos momentos, e quando o caso venha a se complicar aí usa-se parametros. Abs. Progr'amador. B)

Olá, Use o distinct, 'select distinct Turma.Modulo, Turma.Instrutor,...' Abs. Progr'amador. B)

Como assim, gerar um código??? você está usando Table??? :huh: Abs. Progr'amador. B)

É por essas e outras que sempre inssisto no uso de parâmetros e não concatenação (de qualque tipo). Se fosse escrito deste modo, não seria necessário preocupar-se com que tipo de aspas o banco utiliza (simples ou dupla), o mesmo vale para datas (uns utilizam aspas, outros sustenidos...): with DMRelatos.QGeral_01 do begin Close; SQL.Clear; SQL.Add('SELECT * FROM PROTOCOLO WHERE TITULONATUREZAABR = :NATUREZA'); ParamByName('NATUREZA').AsString := 'DMI'; Open; end; []s Olá Micheus, Na verdade se formos olhar os pros e contras, seria muito relativo, na minha programação eu faço o uso tanto de parametros como tambem o uso das aspas, depedendo da situação. Com relação os parametros, por exemplo com ADO, ele não aceita ParamByName e talvez tenha outros que tambem não aceita, e cada um tipo de componente trabalha de uma forma diferente com relação os parametros, por exemplo, eu num sei firmemente como funciona o IB, o ZEUS, eu só trabalho com o BDE, então por isso, quando vou da alguma dica faço mais o uso dessas aspas, que na verdade aspa dupla até agora eu só vi em ACCESS mesmo, e ele aceita tanto aspa simples como dupla, tanto faz. P.S. Mas será que resolveu o problema do hencker? :) Abs. Progr'amador. B)

Tem o quickreport sim, vai no menu Component --> Install Packages..., na tela que abre, clique em Add..., provavelmente ira abrir direto na pasta Bin do delphi, procure o arquivo dclqrt70 e clique em Abrir, OK e proto seu delphi já está com QuickReport. Abs. Progr'amador. B)

Correto Churc, Eu seria mas claro, assuntos relacionados a "pirataria" é proibido aqui no fórum, desculpe. Fechado.