Re: [delphi-br] Commit não insere todos os registros
Bom dia Laura, Como não vi o seu código, vou fazer apenas suposições, ok? 1. Vc está fazendo estes inserts dentro de um laço while ou for. Neste caso, vc colocou um commit após o end? 2. Não posso afirmar que o firebird tem um limite de inserts antes do commit, mas sempre que preciso fazer esse tipo de inserção uso commit retaining para cada registro e um commit simples a cada 500 registros. tem funcionado bem. Também não sei se este é o limite de registros, mas é a quantidade que o pessoal da lista firebird tem aconselhado com frequência. Espero ter ajudado. Laura Schwarz Ferrari escreveu: Boa tarde a todos, Tenho um programa aqui feito em Delphi7 onde, em um certo formulário, o usuário deve buscar um arquivo txt que chega a ter no máximo 1000 linhas de registros. O programa começa a ler o arquivo linha por linha, jogando os valores para variáveis, trata campos de data, verifica se já existe registro igual, e por fim dá o Commit. Tudo isso dentro de um try catch sendo que, caso ele caia no Exception, acontece um Rollback. Problema: Nem todos os registros estão sendo inseridos...as vezes fica faltando 60 registros, outras vezes 30...ou seja, ele está ignorando o Rollback. Por acaso o Firebird tem algum tipo de limitação quanto ao número de registros que devem ser inseridos quando é dado o commit? O programa não aparenta ter erros, isso que é o mais estranho. Se alguém souber de algo que possa ajudar, ficarei muito grata! Laura -- []’s. Evandro Siqueira Programador de Sistemas L’essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Linguagem ZPL - impressora Zebra
eu já trabalhei muito com elas e com as eltron. Pode convencer seu cliente de desistir da acentuação. Não dá certo. Sai caracteres tudo trocado na hora de imprimir porque a impressora não trabalha com o código padrão Ansi []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com SKYPE: WalterChagasJr - Original Message - From: Filippe Maymone To: delphi-br@yahoogrupos.com.br Sent: Monday, March 23, 2009 8:45 PM Subject: [delphi-br] Linguagem ZPL - impressora Zebra Olá, Alguem trabalha com linguagem ZPL da impressora Zebra ? Eu tenho um sistema em delphi, que faz impressora na impressora zebra via linguagem ZPL. Esta funcionando certinho, porem eu não tenho acentuação, um cliente necessita que as etiquetas saeem com acetuações. Alguem sabe resolver este problema ??? abraços, Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda sobre delphi 2009 e sql server 2000
Bom dia a todos, Estou iniciando uma aplicação com delphi 2009 e sql server 2000. Tenho um form onde utilizei o método nested para cadastro de companhias e plantas da companhia. Estou passando por vários tipos de erros sem nenhum sentido. Alguém pode me ajudar? METALÚRGICA JANO LTDA FUNDIÇÃO DE AÇO CARBONO - INOX - MANGANÊS Alessandro Pichiteli Analista de TI (37) 3214-1140 P Antes de imprimir, pense na sua responsabilidade com o Meio Ambiente e nos custos de sua empresa [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Off Topic - Planejando bem, Evitando os Jacarés
Realmente muito interessante, lí ele pela manhã e tirei várias conclusões do meu trabalho diário. 2009/3/23 Walter Chagas (Bol) wchag...@bol.com.br Muito interessante este texto. Repassei ele pra outras listas que tratam deste tipo de assunto []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Emanuel Coutinho To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, March 23, 2009 12:48 PM Subject: [delphi-br] Off Topic - Planejando bem, Evitando os Jacarés Colegas. É do conhecimento da maioria que embora seja desenvolvedor, atuo diretamente em empresa de engenharia, e mais especificamene no setor de planejamento. Assim, por fazer parte de um grupo de planejadores, recebi esta mensagem, que reputo de grande importãncia, e desejo compartilhar com os colegas, para que agregue valor ao nosso dia a dia. Cuidado com o jacaré! Inspirado na aula do professor Larry Greiner, da Universidade do Sul da Califórnia. Se você tem um jacaré a lhe morder a perna, a tendência é esquecer que sua tarefa principal que era drenar o pântano. Nessa hora a sobrevivência fala mais alto. Você entra no pântano, cheio de vontade de executar a tarefa de drená-lo. Aí, o jacaré morde a sua perna. E você vai querer matar o jacaré, claro. O pântano que espere. O jacaré desta história é o nosso dia-a-dia. É a rotina que lhe ataca de manhã e que impede que você faça todas as tarefas que planejou para o dia. E ao final, exausto, você olha a pilha de jacarés mortos e é cobrado, pelo seu chefe, pelo pântano que não drenou. Saber enfrentar a rotina é uma tarefa fundamental para quem quer ter alta performance. Evitar o jacaré é planejar melhor, é testar todas as hipóteses, é prever os desvios e inconsistências. O jacaré detesta planejamento. Ele anda pela empresa com sua casca grossa, rabo comprido e braços curtos dizendo que planejamento não serve para nada, que nunca dá certo, que é um jogo de adivinhação. Tudo mentira. O jacaré morre de medo do planejamento, que, quando bem-feito, é um exercício de previsibilidade. E que não é feito para dar certo, mas sim para testar antecipadamente todas as hipóteses.. Olhe bem a sua volta. Os jacarés estão por todos os lugares, com sua fala mansa e andar desengonçado. E, se você bobear, um deles ataca: Cadê a cópia do relatório A45 que você ficou de me mandar?: Pronto, ele mordeu sua perna! Agora vai ter de matar este... e lá se vão quase duas horas do dia. Fique atento. Planeje e priorize as atividades do seu dia. Exercite o planejamento, pratique o exercício da previsibilidade, ou você vai se tornar um especialista em matar jacarés. E o duro desta vida é que o reconhecimento, as oportunidades e as recompensas só virão para os que drenarem o pântano. Sds, _ Emanuel Coutinho Salvador-Ba-Brasil Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Ajuda sobre delphi 2009 e sql server 2000
Alessandro, Post os erros... talvez ajude. []s De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de TI - Metalurgica Jano Enviada em: terça-feira, 24 de março de 2009 08:22 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Ajuda sobre delphi 2009 e sql server 2000 Bom dia a todos, Estou iniciando uma aplicação com delphi 2009 e sql server 2000. Tenho um form onde utilizei o método nested para cadastro de companhias e plantas da companhia. Estou passando por vários tipos de erros sem nenhum sentido. Alguém pode me ajudar? METALÚRGICA JANO LTDA FUNDIÇÃO DE AÇO CARBONO - INOX - MANGANÊS Alessandro Pichiteli Analista de TI (37) 3214-1140 P Antes de imprimir, pense na sua responsabilidade com o Meio Ambiente e nos custos de sua empresa [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] conversion of a char data type to a datetime data type resulted in an
Bom dia pessoal, Eu estou fazendo uma pesquisa em uma adoquary para encontrar determinadas datas e esta dando esse erro quando execulto a quary: conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.. O código é esse : var resul tdatetime; sdata : string; begin AdoqFeriados.Close; AdoqFeriados.SQL.Clear; AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data='''+ sdata +; AdoqFeriados.Open; já tentei o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr(DateToStr (resul)); outra tentativa tambem foi o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + DateToStr (resul); Outra : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr (sdata); e nada ... Alguem pode me ajudar com isso ?
[delphi-br] Caracteres estranhos
Caros, Baixei um arquivo em site na internet, e ele veio comuns caracteres estranhos, alguem podia me ajudar como faço para tornar legível o texto Exemplo do texto: Modbus ͨÐÅÐÒéÒ³Â룬1/10 Modbus ͨÐÅÐÒé ¹¤Òµ¿ØÖÆÒÑ´Óµ¥»ú¿ØÖÆ×ßÏò¼¯Öмà¿Ø¡¢¼¯É¢¿ØÖÆ£¬Èç½ñÒѽøÈëÍøÂçʱ´ú£¬¹¤Òµ¿ØÖÆÆ÷Á¬ÍøÒ² ΪÍøÂç¹ÜÀíÌṩÁË·½±ã¡£Modbus ¾ÍÊǹ¤Òµ¿ØÖÆÆ÷µÄÍøÂçÐÒéÖеÄÒ»ÖÖ¡£ Ò»¡¢Modbus ÐÒé¼ò½éModbus ÐÒéÊÇÓ¦ÓÃÓÚµç×Ó¿ØÖÆÆ÷ÉϵÄÒ»ÖÖͨÓÃÓïÑÔ¡£Í¨¹ý´ËÐÒ飬¿ØÖÆÆ÷ Ï໥֮¼ä¡¢¿ØÖÆÆ÷¾ÓÉÍøÂ磨ÀýÈçÒÔÌ«Íø£©ºÍÆäËüÉ豸֮¼ä¿ÉÒÔͨÐÅ¡£ËüÒѾ³ÉΪһͨÓù¤Òµ±ê Obrigado
Re: [delphi-br] Caracteres estranhos
Mas o arquivo que baixou é referente a que? Cuidado com o que anda baixando na internet, pode lhe trazer sérios transtornos... 2009/3/24 Rogerio Nazar rogeri...@petrobras.com.br Caros, Baixei um arquivo em site na internet, e ele veio comuns caracteres estranhos, alguem podia me ajudar como faço para tornar legível o texto Exemplo do texto: Modbus ͨÐÅÐÒéÒ³Â룬1/10 Modbus ͨÐÅÐÒé ¹¤Òµ¿ØÖÆÒÑ´Óµ¥»ú¿ØÖÆ×ßÏò¼¯Öмà¿Ø¡¢¼¯É¢¿ØÖÆ£¬Èç½ñÒѽøÈëÍøÂçʱ´ú£¬¹¤Òµ¿ØÖÆÆ÷Á¬ÍøÒ² ΪÍøÂç¹ÜÀíÌṩÁË·½±ã¡£Modbus ¾ÍÊǹ¤Òµ¿ØÖÆÆ÷µÄÍøÂçÐÒéÖеÄÒ»ÖÖ¡£ Ò»¡¢Modbus ÐÒé¼ò½éModbus ÐÒéÊÇÓ¦ÓÃÓÚµç×Ó¿ØÖÆÆ÷ÉϵÄÒ»ÖÖͨÓÃÓïÑÔ¡£Í¨¹ý´ËÐÒ飬¿ØÖÆÆ÷ Ï໥֮¼ä¡¢¿ØÖÆÆ÷¾ÓÉÍøÂ磨ÀýÈçÒÔÌ«Íø£©ºÍÆäËüÉ豸֮¼ä¿ÉÒÔͨÐÅ¡£ËüÒѾ³ÉΪһͨÓù¤Òµ±ê Obrigado [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] conversion of a char data type to a datetime data type resulted in an
Alexsandro, conseguiu debugar e verificar o que está passando para a variável sdata ? Coloca um ShowMessage(AdoqFeriados.SQL.Text); antes do AdoqFeriados.Open e capture a query que ele está tentando executar, provavelmente a variável está gravando um valor incorreto. Faça o teste e nos apresente os detalhes. 2009/3/24 Alexsandro a...@ig.com.br Bom dia pessoal, Eu estou fazendo uma pesquisa em uma adoquary para encontrar determinadas datas e esta dando esse erro quando execulto a quary: conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.. O código é esse : var resul tdatetime; sdata : string; begin AdoqFeriados.Close; AdoqFeriados.SQL.Clear; AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data='''+ sdata +; AdoqFeriados.Open; já tentei o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr(DateToStr (resul)); outra tentativa tambem foi o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + DateToStr (resul); Outra : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr (sdata); e nada ... Alguem pode me ajudar com isso ? [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Caracteres estranhos
Fica tranquilo, E somente um txt com alguns pedaços de codigo para acessar um plc com protocolo modbus. --- Em delphi-br@yahoogrupos.com.br, Rogerio Nazar rogeri...@... escreveu Caros, Baixei um arquivo em site na internet, e ele veio comuns caracteres estranhos, alguem podia me ajudar como faço para tornar legível o texto Exemplo do texto: Modbus ͨÐÅÐÒéÒ³Â룬1/10 Modbus ͨÐÅÐÒé ¹¤Òµ¿ØÖÆÒÑ´Óµ¥»ú¿ØÖÆ×ßÏò¼¯Öмà¿Ø¡¢¼¯É¢¿ØÖÆ£¬Èç½ñÒѽøÈëÍøÂçʱ´ú£¬¹¤Òµ¿ØÖÆÆ÷Á¬ÍøÒ² ΪÍøÂç¹ÜÀíÌṩÁË·½±ã¡£Modbus ¾ÍÊǹ¤Òµ¿ØÖÆÆ÷µÄÍøÂçÐÒéÖеÄÒ»ÖÖ¡£ Ò»¡¢Modbus ÐÒé¼ò½éModbus ÐÒéÊÇÓ¦ÓÃÓÚµç×Ó¿ØÖÆÆ÷ÉϵÄÒ»ÖÖͨÓÃÓïÑÔ¡£Í¨¹ý´ËÐÒ飬¿ØÖÆÆ÷ Ï໥֮¼ä¡¢¿ØÖÆÆ÷¾ÓÉÍøÂ磨ÀýÈçÒÔÌ«Íø£©ºÍÆäËüÉ豸֮¼ä¿ÉÒÔͨÐÅ¡£ËüÒѾ³ÉΪһͨÓù¤Òµ±ê Obrigado
[delphi-br] Erro applyupdate
Bom dia, Seguinte pessoal, estou com erro em minha aplicação! Estou trabalhando em n-camadas, utilizando SOAP. Faço uma inserção de dados no clientdataset(via código, não tem nenhum formulário), dou um post no mesmo (é possível verificar que a alteração esta em cache fazendo RecordCount no CDs). Coloquei no evento AfterPost do ClientDataSet o evento para ApplyUpdates pelo código, a seguir: if (DataSet as TClientDataSet).ApplyUpdates(1) 0 then begin saveLog('Erro no applyUpdates'); raise EDataBaseError.Create(Exception(exceptobject).Message); end else (DataSet as TClientDataSet).Refresh; Ao ir no meu log verifico que acontece o seguinte erro: 10:34:53 - Access violation at address 0054DE3E in module 'ClienteSOAP.exe'. Read of address 0004. Já mexi e remexi e nada de encontrar uma solução! Agradeço sugestões pra encontrar o erro! Huander [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] maiuscula em todos os dedits
bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.ComponentCount - 1 do if (frmFinasa.Components[j] is tdbEdit) then (frmFinasa.Components[j] as tdbEdit).Text := UpperCase((frmFinasa.Components[j] as TdbEdit).Text); ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.ComponentCount - 1 do if (frmFinasa.Components[j] is tdbEdit) then (frmFinasa.Components[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Como detectar o modelo da placa mãe pelo D elphi
Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
Bom, talvez eu tenha entendido errado o que vc quer, mas o componente TDBEdit contém uma propriedade CharCase, que vc poderá deixa-la apontada para ecUpperCase e tudo ficará em maiúsculas. Espero ter ajudado... Abs Rodinei Amorim Programador Delphi (11) 8208-9503 rodinei_amo...@hotmail.com From: felipe govoni Sent: Tuesday, March 24, 2009 11:17 AM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.ComponentCount - 1 do if (frmFinasa.Components[j] is tdbEdit) then (frmFinasa.Components[j] as tdbEdit).Text := UpperCase((frmFinasa.Components[j] as TdbEdit).Text); ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.ComponentCount - 1 do if (frmFinasa.Components[j] is tdbEdit) then (frmFinasa.Components[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: conversion of a char data type to a datetime data type resulted in an
Opa Humberto, Ele me traz o valor correto 31/03/2009 O interessante de tudo é que, aqui na minha máquina ele funciona blz. Ou seja quando eu uso o banco de dados de testes da minha máquina fica blz, agora quanto eu uso o banco de dados do Servidor.. da esse erro. Uso SQL Server 2003 --- Em delphi-br@yahoogrupos.com.br, Humberto Oliveira holiveira.wordpr...@... escreveu Alexsandro, conseguiu debugar e verificar o que está passando para a variável sdata ? Coloca um ShowMessage(AdoqFeriados.SQL.Text); antes do AdoqFeriados.Open e capture a query que ele está tentando executar, provavelmente a variável está gravando um valor incorreto. Faça o teste e nos apresente os detalhes. 2009/3/24 Alexsandro a...@... Bom dia pessoal, Eu estou fazendo uma pesquisa em uma adoquary para encontrar determinadas datas e esta dando esse erro quando execulto a quary: conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.. O código é esse : var resul tdatetime; sdata : string; begin AdoqFeriados.Close; AdoqFeriados.SQL.Clear; AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data='''+ sdata +; AdoqFeriados.Open; já tentei o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr(DateToStr (resul)); outra tentativa tambem foi o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + DateToStr (resul); Outra : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr (sdata); e nada ... Alguem pode me ajudar com isso ? [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] maiuscula em todos os dedits
frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: felipe govoni govoni.fel...@gmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
Por que vc não muda a propriedade CharCase dos dbedit para ecUpperCase? 2009/3/24 felipe govoni govoni.fel...@gmail.com bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.ComponentCount - 1 do if (frmFinasa.Components[j] is tdbEdit) then (frmFinasa.Components[j] as tdbEdit).Text := UpperCase((frmFinasa.Components[j] as TdbEdit).Text); ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.ComponentCount - 1 do if (frmFinasa.Components[j] is tdbEdit) then (frmFinasa.Components[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftw...@gmail.com (GoogleTalk) thales_...@hotmail.com (MSN) Blog: http://tebosoftware.blogspot.com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
É verdade, existe um espaço na palavra Components... Mas na minha opinião, seria melhor o CharCase como o Rodnei explicou acima. 2009/3/24 Emanuel Coutinho emanuelcouti...@yahoo.com.br frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: felipe govoni govoni.fel...@gmail.com govoni.felipe%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Danfe com ReportBuilder
Alguém aqui tem ou sabe onde encontrar um modelo de Danfe para NFe feito com o ReportBuilder? Carlos H. Cantu www.firebase.com.br
Re: [delphi-br] Re: conversion of a char data type to a datetime data type resulted in an
Correto, ele te retorna '31/03/2009'. Você capturou o SQL.Text da query após a passagem do parâmetro? Rodou o resultado no Query Analyzer conectado na base de desenvolvimento e produção? Isso tá com cara de formato de data enviado para o seu servidor de produção. Faz um teste aí rodando o resultado do SQL.Text e rode no Query Analyzer do banco de produção, veja se ocorre erro. 2009/3/24 Alexsandro a...@ig.com.br Opa Humberto, Ele me traz o valor correto 31/03/2009 O interessante de tudo é que, aqui na minha máquina ele funciona blz. Ou seja quando eu uso o banco de dados de testes da minha máquina fica blz, agora quanto eu uso o banco de dados do Servidor.. da esse erro. Uso SQL Server 2003 --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Humberto Oliveira holiveira.wordpr...@... escreveu Alexsandro, conseguiu debugar e verificar o que está passando para a variável sdata ? Coloca um ShowMessage(AdoqFeriados.SQL.Text); antes do AdoqFeriados.Open e capture a query que ele está tentando executar, provavelmente a variável está gravando um valor incorreto. Faça o teste e nos apresente os detalhes. 2009/3/24 Alexsandro a...@... Bom dia pessoal, Eu estou fazendo uma pesquisa em uma adoquary para encontrar determinadas datas e esta dando esse erro quando execulto a quary: conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.. O código é esse : var resul tdatetime; sdata : string; begin AdoqFeriados.Close; AdoqFeriados.SQL.Clear; AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data='''+ sdata +; AdoqFeriados.Open; já tentei o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr(DateToStr (resul)); outra tentativa tambem foi o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + DateToStr (resul); Outra : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr (sdata); e nada ... Alguem pode me ajudar com isso ? [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Urgente: Como detectar o modelo da pl aca mãe pelo Delphi
Um programa em delphi para determinar o tipo do processador? Você terá de apaelar para código assembly para conseguir isso. Os livros específicos de cada chipset da Intel tem este algoritmo (em assembly) pronto para você usar/adaptar para as suas necessidades. O problema é que estas soluções são específicas de cada fabricante, ou seja, um programa que detecta uma determinada família de processadores da Intel poderá não funcionar com processadores da AMD, e vice-versa. Eu te sugiro procurar algum software já pronto que possa lhe dar as informações necessárias, e você de dentro do teu programa Delphi, ativar estes outros softwares, os quais irão gerar algum tipo de relatório/arquivo. De posse deste arquivo você poderá fazer a leitura das informações desejadas. Abaixo segue um site (achei usando o google) que você poderá usar para obter informações de processadores AMD e Intel. Não sei se estes programas irão atender as tuas necessidades, mas vale você dar uma conferida neles. http://web.inter.nl.net/hcc/J.Steunebrink/chkcpu.htm Clayton. _ De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Jorge Ericsson Enviada em: terça-feira, 24 de março de 2009 11:28 Para: undisclosed-recipients: Assunto: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Cópia do banco MySQL
Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
o espaço foi erro meu na hora de copia, mas nao sabia dessa propriedade vlw pela ajuda galera!!! 2009/3/24 Humberto Oliveira holiveira.wordpr...@gmail.com É verdade, existe um espaço na palavra Components... Mas na minha opinião, seria melhor o CharCase como o Rodnei explicou acima. 2009/3/24 Emanuel Coutinho emanuelcouti...@yahoo.com.bremanuelcoutinho%40yahoo.com.br frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: felipe govoni govoni.fel...@gmail.com govoni.felipe%40gmail.comgovoni.felipe% 40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Compactar / Descompactar Mensagem Texto
Pessoal, Tenho um trabalho a ser feito, em que tenho uma mensagem XML que é enviada para um web service , E estamos gerando um trafego muito grande no servidor com isso solicitaram que fizemos uma compactação da mensagem andes de enviar para o webservice e no webservice descompactar tudo isso. Bom acho que isso vai acabar gerando um outro problema relacionado com processamento no servidor, mais como a ordem da gerencia no presente é liberar banda no servidor. Gostaria de saber se alguem tem algum algoritimo de compacatação te texto, ou ferramenta e que eu possa depois implementar no meu aplicativo em Delphi e tambem fazer a descompactação no WebService Java. Dede já Obrigado. -- Reginaldo D. Felix regife...@hotmail.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente: Como detectar o modelo da p laca mãe pelo Delphi
Valew Clayton mas eu já resolvi meu problema e pesquisando eu encontrei o TJvComputerInfoEx da biblioteca JEDI, já tenho o que precisava, obrigado. 2009/3/24 clayton clay...@agriness.com Um programa em delphi para determinar o tipo do processador? Você terá de apaelar para código assembly para conseguir isso. Os livros específicos de cada chipset da Intel tem este algoritmo (em assembly) pronto para você usar/adaptar para as suas necessidades. O problema é que estas soluções são específicas de cada fabricante, ou seja, um programa que detecta uma determinada família de processadores da Intel poderá não funcionar com processadores da AMD, e vice-versa. Eu te sugiro procurar algum software já pronto que possa lhe dar as informações necessárias, e você de dentro do teu programa Delphi, ativar estes outros softwares, os quais irão gerar algum tipo de relatório/arquivo. De posse deste arquivo você poderá fazer a leitura das informações desejadas. Abaixo segue um site (achei usando o google) que você poderá usar para obter informações de processadores AMD e Intel. Não sei se estes programas irão atender as tuas necessidades, mas vale você dar uma conferida neles. http://web.inter.nl.net/hcc/J.Steunebrink/chkcpu.htm Clayton. _ De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Jorge Ericsson Enviada em: terça-feira, 24 de março de 2009 11:28 Para: undisclosed-recipients: Assunto: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Ericsson Sistemas e Soluções (61) 3797-4785 / 3244-8689 / 9227 4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@hotmail.com skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Cópia do banco MySQL
Olá amigo. Usa o MySQL Dump pra fazer a cópia do SCRIPT SQL Executar isso no prompt de comando: mysqldump.exe --host=ip --user=usuario --password=senha --databases nome_bd backup.sql Valeu Wanderlei
Re: [delphi-br] Cópia do banco MySQL
InnoDB usa vários outros arquivos... como: ib_logfile0 ib_logfile1 ibdata1 E os da pasta DATABASENAME que você criou. []s Luiz Escobar From: Bruno Lepesqueur Sent: Tuesday, March 24, 2009 2:52 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Cópia do banco MySQL Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] maiuscula em todos os dedits
Concordo contigo, mas o código dele está quase pronto, e não sei quantos componentes ele terá de fazer mudar na mão grande... assim, automatizando é mais rápido para resolver... então dei foco a ajudar o erro do código... No meu caso, quando formato minhas telas, sempre uso as propriedades tipo CharCase, quando necessito disso, mas como ele não tinah feito... Imagina ele ter de fazer isso em 30 componentes de um formulario (mesmo estando em um pagecontrol... caramba... muito trabalho... mas se apagar o errinho no código... voilá... dois palitos!!! Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: Humberto Oliveira holiveira.wordpr...@gmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 12:55:52 Assunto: Re: [delphi-br] maiuscula em todos os dedits É verdade, existe um espaço na palavra Components ... Mas na minha opinião, seria melhor o CharCase como o Rodnei explicou acima. 2009/3/24 Emanuel Coutinho emanuelcoutinho@ yahoo.com. br frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba- Brasil _ _ __ De: felipe govoni govoni.felipe@ gmail.com govoni.felipe% 40gmail.com Para: delphi...@yahoogrup os.com.br delphi-br%40yahoog rupos.com. br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Cópia do banco MySQL
É verdade, esqueci de falar, SGDB não é igual aos DBFs. Esse negocio de ficar copiando as bases não vai rolar não.. principalmente para InnoDB. O melhor a fazer é usando o MuSQLDUMP no seu cliente, como o amigo disse, e o MySQLIMPORT na sua casa. []s Luiz Escobar From: Wanderlei - Yahoo Sent: Tuesday, March 24, 2009 3:59 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Cópia do banco MySQL Olá amigo. Usa o MySQL Dump pra fazer a cópia do SCRIPT SQL Executar isso no prompt de comando: mysqldump.exe --host=ip --user=usuario --password=senha --databases nome_bd backup.sql Valeu Wanderlei [As partes desta mensagem que não continham texto foram removidas]
Res: Re: [delphi-br] Cópia do banco MySQL
Mas eu devo copiar esses ib_logfile0 e ib_logfile1 também ou não? Obrigado! ---Mensagem original--- De: Luiz Escobar Data: 03/24/09 16:55:55 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Cópia do banco MySQL InnoDB usa vários outros arquivos... como: ib_logfile0 ib_logfile1 ibdata1 E os da pasta DATABASENAME que você criou. []s Luiz Escobar From: Bruno Lepesqueur Sent: Tuesday, March 24, 2009 2:52 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Cópia do banco MySQL Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
O detalhe que questionei é ao invés de setar UpperCase em todos os DBEdits, utilizar a propriedade CharCase, mas fazendo o for do jeito que ele estava fazendo, mas ao invés de usar a propriedade Text, já setava o CharCase. Mas ele já resolveu, está tudo em casa. 2009/3/24 Emanuel Coutinho emanuelcouti...@yahoo.com.br Concordo contigo, mas o código dele está quase pronto, e não sei quantos componentes ele terá de fazer mudar na mão grande... assim, automatizando é mais rápido para resolver... então dei foco a ajudar o erro do código... No meu caso, quando formato minhas telas, sempre uso as propriedades tipo CharCase, quando necessito disso, mas como ele não tinah feito... Imagina ele ter de fazer isso em 30 componentes de um formulario (mesmo estando em um pagecontrol... caramba... muito trabalho... mas se apagar o errinho no código... voilá... dois palitos!!! Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 12:55:52 Assunto: Re: [delphi-br] maiuscula em todos os dedits É verdade, existe um espaço na palavra Components ... Mas na minha opinião, seria melhor o CharCase como o Rodnei explicou acima. 2009/3/24 Emanuel Coutinho emanuelcoutinho@ yahoo.com. br frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba- Brasil _ _ __ De: felipe govoni govoni.felipe@ gmail.com govoni.felipe% 40gmail.com Para: delphi...@yahoogrup os.com.br delphi-br%40yahoog rupos.com. br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: Re: [delphi-br] Cópia do banco MySQL
Não, não... apenas usa o MySQLDUMP|IMPORT []s Luiz Escobar From: Bruno Lepesqueur Sent: Tuesday, March 24, 2009 5:12 PM To: delphi-br@yahoogrupos.com.br Subject: Res: Re: [delphi-br] Cópia do banco MySQL Mas eu devo copiar esses ib_logfile0 e ib_logfile1 também ou não? Obrigado! ---Mensagem original--- De: Luiz Escobar Data: 03/24/09 16:55:55 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Cópia do banco MySQL InnoDB usa vários outros arquivos... como: ib_logfile0 ib_logfile1 ibdata1 E os da pasta DATABASENAME que você criou. []s Luiz Escobar From: Bruno Lepesqueur Sent: Tuesday, March 24, 2009 2:52 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Cópia do banco MySQL Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
emanuel realmente o charcase facilito e muito, mas na verdade meu codigo nao estava errado eu apenas copiei errado, pois eu estava compilando certo, mas na hora ela nao limpava os dbedit. eu copiei a ideia de uma dica pra limpa edit e so alterei pra dbedit. 2009/3/24 Emanuel Coutinho emanuelcouti...@yahoo.com.br Concordo contigo, mas o código dele está quase pronto, e não sei quantos componentes ele terá de fazer mudar na mão grande... assim, automatizando é mais rápido para resolver... então dei foco a ajudar o erro do código... No meu caso, quando formato minhas telas, sempre uso as propriedades tipo CharCase, quando necessito disso, mas como ele não tinah feito... Imagina ele ter de fazer isso em 30 componentes de um formulario (mesmo estando em um pagecontrol... caramba... muito trabalho... mas se apagar o errinho no código... voilá... dois palitos!!! Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 12:55:52 Assunto: Re: [delphi-br] maiuscula em todos os dedits É verdade, existe um espaço na palavra Components ... Mas na minha opinião, seria melhor o CharCase como o Rodnei explicou acima. 2009/3/24 Emanuel Coutinho emanuelcoutinho@ yahoo.com. br frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba- Brasil _ _ __ De: felipe govoni govoni.felipe@ gmail.com govoni.felipe% 40gmail.com Para: delphi...@yahoogrup os.com.br delphi-br%40yahoog rupos.com. br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
Coloque esse codigo no onShow var i : integer; begin for i := 0 to ComponentCount -1 do if (Components[i] is TDBEdit) then TDBEdit(Components[i]).CharCase := ecUpperCase; end; falow 2009/3/24 Humberto Oliveira holiveira.wordpr...@gmail.com O detalhe que questionei é ao invés de setar UpperCase em todos os DBEdits, utilizar a propriedade CharCase, mas fazendo o for do jeito que ele estava fazendo, mas ao invés de usar a propriedade Text, já setava o CharCase. Mas ele já resolveu, está tudo em casa. 2009/3/24 Emanuel Coutinho emanuelcouti...@yahoo.com.bremanuelcoutinho%40yahoo.com.br Concordo contigo, mas o código dele está quase pronto, e não sei quantos componentes ele terá de fazer mudar na mão grande... assim, automatizando é mais rápido para resolver... então dei foco a ajudar o erro do código... No meu caso, quando formato minhas telas, sempre uso as propriedades tipo CharCase, quando necessito disso, mas como ele não tinah feito... Imagina ele ter de fazer isso em 30 componentes de um formulario (mesmo estando em um pagecontrol... caramba... muito trabalho... mas se apagar o errinho no código... voilá... dois palitos!!! Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: Humberto Oliveira holiveira.wordpr...@gmail.comholiveira.wordpress%40gmail.com holiveira.wordpress%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 12:55:52 Assunto: Re: [delphi-br] maiuscula em todos os dedits É verdade, existe um espaço na palavra Components ... Mas na minha opinião, seria melhor o CharCase como o Rodnei explicou acima. 2009/3/24 Emanuel Coutinho emanuelcoutinho@ yahoo.com. br frmFinasa.Componen ts[j] -- Tem um espaço em branco no components[j] Retire-o for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; Sds, _ Emanuel Coutinho Salvador-Ba- Brasil _ _ __ De: felipe govoni govoni.felipe@ gmail.com govoni.felipe% 40gmail.com Para: delphi...@yahoogrup os.com.br delphi-br%40yahoog rupos.com. br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftw...@gmail.com (GoogleTalk) thales_...@hotmail.com (MSN) Blog: http://tebosoftware.blogspot.com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] MyDAC
Como que eu faço pra comprar o MyDAC para o delphi 7? Obrigado! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Meio OFF: - Erro IbExpert: Cannot drop this view because there are some dependencies. Use Recreate Script Instead.
Colegas, Estou criando umas views para ir totalizando dados de consultas diversase ao tentar inserir um novo aggregate field em uma das views me retornou uma mensagem de erro Cannot drop this view because there are some dependencies. Use Recreate Script Instead. O Inglês eu entendi... Existem dependências mas não consegui enxergar, quais. olha o conteúdo do recreate script... Será que alguém tem uma idéia de como resolver isso? [codigo] /*-*/ /* Dropping old views */ /*-*/ DROP VIEW VIEW_TUB_AVC_GERAL; DROP VIEW VIEW_ISOMETRICOS_PESOS; /*-*/ /* Creating new views */ /*-*/ CREATE VIEW VIEW_ISOMETRICOS_PESOS( CODIGOISO, LINHA, CODIGOAREA, IDENTIFICACAO, TDIAMETRO, DDIAMETRO, CHVCRONOGRAMA, ITEMEAP, REVISAO, IS_CODIGO, VIS_CODIGO, PESO, FMED, SUPERFICIE, QT_VALVULAS,--- Este é o novo campo a ser apresentado PESO_VALVULAS, FMED_VALVULAS) AS select isometricos.is_codigo as CodigoIso, isometricos.is_linha as LINHA, ISOMETRICOS.ar_codigo AS CODIGOAREA, isometricos.is_identificacao as Identificacao , isometricos.is_diametro_t as tDiametro, isometricos.is_diametro_n as dDiametro, isometricos.is_chavecronograma as ChvCronograma, isometricos.is_item_eap as ItemEap, isometricos.is_revisaoatual as Revisao, isometricos_lm.is_codigo, isometricos_valvulas.is_codigo as vis_codigo, sum(isometricos_lm.lm_peso) as peso, sum(isometricos_lm.lm_fatormedicao) as fmed, sum(isometricos_lm.lm_areapintura) as superficie, count(isometricos_valvulas.is_codigo) as qt_valvulas, Está sendo criado aqui... sum(isometricos_valvulas.isv_peso) as PESO_VALVULAS, sum(isometricos_valvulas.isv_fatormedicao) as FMED_VALVULAS from isometricos left outer join isometricos_lm on(isometricos_lm.is_codigo = isometricos.is_codigo) left outer join isometricos_valvulas on (isometricos_valvulas.is_codigo = isometricos.is_codigo) group by isometricos.is_codigo, isometricos.is_linha, ISOMETRICOS.ar_codigo, isometricos.is_identificacao,isometricos.is_diametro_t, isometricos.is_diametro_n, isometricos.is_chavecronograma, isometricos.is_item_eap, isometricos.is_revisaoatual, isometricos_lm.is_codigo, isometricos_valvulas.is_codigo ; CREATE VIEW VIEW_TUB_AVC_GERAL( CODIGOISO, LINHA, CODIGOAREA, IDENTIFICACAO, REVISAO, PESO_TUBULACAO, SUPERFICIE, PESO_VALVULAS, PESO_TOTAL, IS_CODIGO, MONTADO, IS_CODIGO1, TESTADO, IS_CODIGO2, FABRICADO, TDIAMETRO, DDIAMETRO, CHVCRONOGRAMA, ITEMEAP, IS_CODIGO3, VIS_CODIGO, FMED, FMED_VALVULAS, PCT_FAB, PCT_MONT, PCT_TEST) AS select view_isometricos_pesos.codigoiso, view_isometricos_pesos.linha, view_isometricos_pesos.codigoarea, view_isometricos_pesos.identificacao, view_isometricos_pesos.revisao, view_isometricos_pesos.peso AS PESO_TUBULACAO, view_isometricos_pesos.superficie, view_isometricos_pesos.peso_valvulas, (view_isometricos_pesos.peso+view_isometricos_pesos.peso_valvulas) AS PESO_TOTAL, view_tub_avc_montagem.is_codigo, view_tub_avc_montagem.montado, view_tub_avc_teste.is_codigo, view_tub_avc_teste.testado, view_tub_avc_fab.is_codigo, view_tub_avc_fab.fabricado, view_isometricos_pesos.tdiametro, view_isometricos_pesos.ddiametro, view_isometricos_pesos.chvcronograma, view_isometricos_pesos.itemeap, view_isometricos_pesos.is_codigo, view_isometricos_pesos.vis_codigo, view_isometricos_pesos.fmed, view_isometricos_pesos.fmed_valvulas, ((view_tub_avc_fab.fabricado/view_isometricos_pesos.peso) * 100) AS PCT_FAB, ((view_tub_avc_montagem.montado/view_isometricos_pesos.peso) * 100) AS PCT_MONT, ((view_tub_avc_teste.testado/view_isometricos_pesos.peso) * 100) AS PCT_TEST from view_isometricos_pesos left outer join view_tub_avc_montagem on (view_isometricos_pesos.codigoiso = view_tub_avc_montagem.is_codigo) left outer join view_tub_avc_teste on (view_isometricos_pesos.codigoiso = view_tub_avc_teste.is_codigo) left outer join view_tub_avc_fab on (view_isometricos_pesos.codigoiso = view_tub_avc_fab.is_codigo) ; /*-*/ /* Restoring descriptions for views */ /*-*/ /*-*/ /* Restoring descriptions of view columns */ /*-*/ /*-*/ /* Restoring privileges */
[delphi-br] Delphi 2009 e sql server 2000
Quando editor um campo da tabela e do o applyupdate(0); aparece a mensagem abaixo: Não é possível criar uma nova conexão porque o modo usado é o de transação manual ou distribuída METALÚRGICA JANO LTDA FUNDIÇÃO DE AÇO CARBONO - INOX - MANGANÊS Alessandro Pichiteli Analista de TI (37) 3214-1140 P Antes de imprimir, pense na sua responsabilidade com o Meio Ambiente e nos custos de sua empresa [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] maiuscula em todos os dedits
Nada melhor do que várias cabeças pensando!!! Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: Thales (Shubacca) - Tebo Software tebosoftw...@gmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 18:40:27 Assunto: Re: [delphi-br] maiuscula em todos os dedits Coloque esse codigo no onShow var i : integer; begin for i := 0 to ComponentCount -1 do if (Components[ i] is TDBEdit) then TDBEdit(Components[ i]).CharCase := ecUpperCase; end; falow 2009/3/24 Humberto Oliveira holiveira.wordpress @gmail.com O detalhe que questionei é ao invés de setar UpperCase em todos os DBEdits, utilizar a propriedade CharCase, mas fazendo o for do jeito que ele estava fazendo, mas ao invés de usar a propriedade Text, já setava o CharCase. Mas ele já resolveu, está tudo em casa. Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Delphi / Banco de Dados - Ajunda em SQL
Olá Emanuel. Estou aqui pensando... se as views não são as tabelas dinâmicas o que estaria lhe faltando? Bem, como e não entendo muito de access (pra não dizer que não entendo nada) acho que você deveria dar uma olhada nas STORED PROCEDURES do Firebird. Aqui há bastante conteúdo sobre Firebird: http://www.ibphoenix.com/main.nfs?a=ibphoenixpage=ibp_60_sqlref Mas é um tanto desatualizado. Recomendo que verifique as release notes da versão que estiver usando. Perca um tempo com isso. Sempre vale a pena. Você pode fazer um laço FOR numa stored procedure, que compute valores de registros e lhe retorne uma tabela. Pode até consultar posteriormente esta SP (stored procedure) usando where. Claro que perderá desempenho, mas dependendo do volume de dados, não será um problema. Ou pode mesmo bolar sua SP, já com parâmetros de entrada que filtrem os dados. Mas... nem sei se é disso mesmo que precisa... Será que é? Abraços.
RE: [delphi-br] Linguagem ZPL - impressora Zebra
Concordo com o Walter, já trabalhei com ZPL também, e acentuar vai dar galho, com toda certeza... To: delphi-br@yahoogrupos.com.br From: wchag...@bol.com.br Date: Mon, 23 Mar 2009 22:41:54 -0300 Subject: Re: [delphi-br] Linguagem ZPL - impressora Zebra eu já trabalhei muito com elas e com as eltron. Pode convencer seu cliente de desistir da acentuação. Não dá certo. Sai caracteres tudo trocado na hora de imprimir porque a impressora não trabalha com o código padrão Ansi []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com SKYPE: WalterChagasJr - Original Message - From: Filippe Maymone To: delphi-br@yahoogrupos.com.br Sent: Monday, March 23, 2009 8:45 PM Subject: [delphi-br] Linguagem ZPL - impressora Zebra Olá, Alguem trabalha com linguagem ZPL da impressora Zebra ? Eu tenho um sistema em delphi, que faz impressora na impressora zebra via linguagem ZPL. Esta funcionando certinho, porem eu não tenho acentuação, um cliente necessita que as etiquetas saeem com acetuações. Alguem sabe resolver este problema ??? abraços, Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/ [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] maiuscula em todos os dedits
Engraçado, eu tb sugeri para o Felipe algo parecido, só que minhas respostas na lista estão demorando séculos para chegar; êêê... sei não viu... []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° De: rodinei_amo...@hotmail.com rodinei_amo...@hotmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 12:09:18 Assunto: Re: [delphi-br] maiuscula em todos os dedits Bom, talvez eu tenha entendido errado o que vc quer, mas o componente TDBEdit contém uma propriedade CharCase, que vc poderá deixa-la apontada para ecUpperCase e tudo ficará em maiúsculas. Espero ter ajudado... Abs Rodinei Amorim Programador Delphi (11) 8208-9503 rodinei_amorim@ hotmail.com From: felipe govoni Sent: Tuesday, March 24, 2009 11:17 AM To: delphi...@yahoogrup os.com.br Subject: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Cópia do banco MySQL
Amigo, você acertou na mega sena, usar InnoDB é a melhor coisa que existe. Usando este engine você terá Integridade referencial, crash recovery, suporte a transações e mais um monte de recursos que o InnoDB, além de sofrer com corrupção dos dados caso seu servidor seja desligado. No innodb a coisa funciona um pouco diferente, os dados e os indices das tabelas ficam no TableSpace, um arquivo chamado IbData, os outros dois são arquivos de log. Na pasta do banco ficam apenas os arquivos frm que são os headers da tabela. você tem duas opções para copiar um banco innodb: 1 - para o serviço, copiar os arquivos Ibdata e iblog e a pasta do banco que esta dentro da pasta data. (fazendo isso ao colocar no destino você apagará qualquer banco existente, visto que todos são salvos no arquivo IbData) 2 - Essa opção é a melhor e mais segura, gerar um script do banco com a ferramenta de sua preferência e executar esse script na máquina de destino e recriar o banco. é isso ai, seja feliz com Innodb e dê adeus aos problemas de corrupção com tabelas MyISAM. 2009/3/24 Bruno Lepesqueur brunolbra...@yahoo.com.br Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente - Indicações
Olá Pessoal, Estou com a seguinte oportunidade: Analista Programador Delphi com Oracle Seria necessário no mínimo três anos de experiência com linguagem delphi e um ano e meio com banco de dados Oracle. Desejável conhecimento em ERP O local de atuação seria na região da Barra Funda, em um projeto por tempo indeterminado com a contratação PJ Por favor me indique profissionais Seguem meus contatos : thais.sant...@cadmus.com.br ou 8349-7541 Abraços. Thais Santana Recursos Humanos Cadmus Soluções em TI Tel: +55 11 3848-2677 Ramal: 2715 Fax: +55 11 3848-2679 _ Rua: Gomes de Carvalho, 1.765 - 9º andar - Vila Olímpia - São Paulo - SP - CEP: 04547-006 Antes de imprimir pense em sua responsabilidade e compromisso com o meio ambiente. Essa mensagem é destinada exclusivamente ao seu destinatário e pode conter informações confidenciais, protegidas por sigilo profissional ou cuja divulgação seja proibida por lei. O uso não autorizado de tais informações é proibido e está sujeito às penalidades cabíveis. This message is intended exclusively for its addressee and may contain information that is confidential and protected by a professional privilege or whose disclosure is prohibited by law. Unauthorized use of such information is prohibited and subject to applicable penalties. [As partes desta mensagem que não continham texto foram removidas]
Re: Re: [delphi-br] Cópia do banco MySQL
Você não deve copiar nenhum deles.. e sim gerar um script/backup do banco e executar no servidor de destino. você pode ate usar esse metodo de copiar, mas de tiver outro banco na máquina de destino ele vai pro brejo. 2009/3/24 Bruno Lepesqueur brunolbra...@yahoo.com.br Mas eu devo copiar esses ib_logfile0 e ib_logfile1 também ou não? Obrigado! ---Mensagem original--- De: Luiz Escobar Data: 03/24/09 16:55:55 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Cópia do banco MySQL InnoDB usa vários outros arquivos... como: ib_logfile0 ib_logfile1 ibdata1 E os da pasta DATABASENAME que você criou. []s Luiz Escobar From: Bruno Lepesqueur Sent: Tuesday, March 24, 2009 2:52 PM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: [delphi-br] Cópia do banco MySQL Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Tabela de dados com milhões de registros
Amigos bom dia, gostaria de saber se alguém pode me indicar uma solução para um problema que parece simples. Temos algumas tabelas que tem baixa manutenção, mas alto índice de pesquisa nas mesmas. Eis ai nosso gargalo, o acesso ao banco de dados, por mais que se melhore o acesso ao BD continua sendo o nosso gargalo. Então uma opção sugerida seria de no iniciar a aplicação essas tabelas fossem lidas do banco e ficassem em memória para sempre (notem as aspas) até que seja realmente necessário fazer o recarregamento da tabela. Gostaria de saber se alguém já teve um caso desses e qual a tecnologia, metodologia ou mágica foi feita. Se puderem me ajudar ficarei muito grato. abs!!!
Re: [delphi-br] maiuscula em todos os dedits
Não precisa de programação para isso... Seleciona todos os Edits que você quer em maiusculo e vai nas propriedades muda o charcase para ecUpperCase --- Em ter, 24/3/09, felipe govoni govoni.fel...@gmail.com escreveu: De: felipe govoni govoni.fel...@gmail.com Assunto: [delphi-br] maiuscula em todos os dedits Para: delphi-br@yahoogrupos.com.br Data: Terça-feira, 24 de Março de 2009, 11:17 bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Desconto de ICMS
Olá Pessoal! Como fica o desconto de ICMS na nota fiscal eletronica? Eu subtraio do valor total do item ou apenas coloco no campo valor do desconto por item? grato.
[delphi-br] Re: conversion of a char data type to a datetime data type resulted in an
Opa; Olha no banco de teste ele roda normal sem erros, com as datas correta. já no banco de produção ele me retorna o erro, porem com a data do comando show... correta tambem. --- Em delphi-br@yahoogrupos.com.br, Humberto Oliveira holiveira.wordpr...@... escreveu Correto, ele te retorna '31/03/2009'. Você capturou o SQL.Text da query após a passagem do parâmetro? Rodou o resultado no Query Analyzer conectado na base de desenvolvimento e produção? Isso tá com cara de formato de data enviado para o seu servidor de produção. Faz um teste aí rodando o resultado do SQL.Text e rode no Query Analyzer do banco de produção, veja se ocorre erro. 2009/3/24 Alexsandro a...@... Opa Humberto, Ele me traz o valor correto 31/03/2009 O interessante de tudo é que, aqui na minha máquina ele funciona blz. Ou seja quando eu uso o banco de dados de testes da minha máquina fica blz, agora quanto eu uso o banco de dados do Servidor.. da esse erro. Uso SQL Server 2003 --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Humberto Oliveira holiveira.wordpress@ escreveu Alexsandro, conseguiu debugar e verificar o que está passando para a variável sdata ? Coloca um ShowMessage(AdoqFeriados.SQL.Text); antes do AdoqFeriados.Open e capture a query que ele está tentando executar, provavelmente a variável está gravando um valor incorreto. Faça o teste e nos apresente os detalhes. 2009/3/24 Alexsandro aq.s@ Bom dia pessoal, Eu estou fazendo uma pesquisa em uma adoquary para encontrar determinadas datas e esta dando esse erro quando execulto a quary: conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.. O código é esse : var resul tdatetime; sdata : string; begin AdoqFeriados.Close; AdoqFeriados.SQL.Clear; AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data='''+ sdata +; AdoqFeriados.Open; já tentei o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr(DateToStr (resul)); outra tentativa tambem foi o : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + DateToStr (resul); Outra : AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + QuotedStr (sdata); e nada ... Alguem pode me ajudar com isso ? [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Delphi 2009 Dbx e sql server 2000
Alguém me ajude por favor, Não é possível criar uma nova conexão porque o modo usado é o de transação manual ou distribuída. Toda vez que do um clientdaset.edit e mudo alguma coisa quando do um clientdaset.post da esse erro acima. [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Compactar / Descompactar Mensagem Texto
Compacta utilizando Zip. Talvez tenham que mudar o ws para ao invés de receber uma string, receber um array de byte. -- José Henrique (Zote) Analista de TI Bludata Software De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Reginaldo Donizete Felix Enviada em: terça-feira, 24 de março de 2009 14:26 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Compactar / Descompactar Mensagem Texto Pessoal, Tenho um trabalho a ser feito, em que tenho uma mensagem XML que é enviada para um web service , E estamos gerando um trafego muito grande no servidor com isso solicitaram que fizemos uma compactação da mensagem andes de enviar para o webservice e no webservice descompactar tudo isso. Bom acho que isso vai acabar gerando um outro problema relacionado com processamento no servidor, mais como a ordem da gerencia no presente é liberar banda no servidor. Gostaria de saber se alguem tem algum algoritimo de compacatação te texto, ou ferramenta e que eu possa depois implementar no meu aplicativo em Delphi e tambem fazer a descompactação no WebService Java. Dede já Obrigado. -- Reginaldo D. Felix regife...@hotmail.com mailto:regifelix%40hotmail.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Linguagem ZPL - impressora Zebra
Nossa que coisa .. cliente é f E o pior que a minha empresa é licenciada dessa marca ... e temos que atender ... Vou ter que fazer a impressão desse cliente fora do sistema, terei que montar via programas de etquetas, o que vai me gerar varios problemas... mais se não tenho solução ...rs.rs Abraços, 2009/3/23 Walter Chagas (Bol) wchag...@bol.com.br eu já trabalhei muito com elas e com as eltron. Pode convencer seu cliente de desistir da acentuação. Não dá certo. Sai caracteres tudo trocado na hora de imprimir porque a impressora não trabalha com o código padrão Ansi []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Filippe Maymone To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, March 23, 2009 8:45 PM Subject: [delphi-br] Linguagem ZPL - impressora Zebra Olá, Alguem trabalha com linguagem ZPL da impressora Zebra ? Eu tenho um sistema em delphi, que faz impressora na impressora zebra via linguagem ZPL. Esta funcionando certinho, porem eu não tenho acentuação, um cliente necessita que as etiquetas saeem com acetuações. Alguem sabe resolver este problema ??? abraços, Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Cópia do banco MySQL
Uma boa opção também é o MySQLAdministrator, com ele você pode Agendar backup's e tem muitos outros recursos. 2009/3/24 Wanderlei - Yahoo wandihut...@yahoo.com.br Olá amigo. Usa o MySQL Dump pra fazer a cópia do SCRIPT SQL Executar isso no prompt de comando: mysqldump.exe --host=ip --user=usuario --password=senha --databases nome_bd backup.sql Valeu Wanderlei -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Urgente: Como detectar o mo delo da placa mãe pelo Delphi
Uma outra alternativa seria listar esse fato no manual do seu sistema ou num FAQ ou melhor ainda informar os usuários sobre esse bug e instruí-los sobre como detectar se o HP Technology está habilitado bem como instruções sobre como desabilitar, caso esse processo traga ganho de performance da sua aplicação. Tentar fazer isso com o Delphi vai envolver código assembly (como já disseram) e pode ser que vc esbarre com o erro de instrução privilegiada. Nesse caso é melhor apelar para algo mais adminstrativo, ou seja, um comunicado aos usuários do que se descabelar atrás de uma solução técnica que pode ou não atingir o usuário. E a propósito, essa solução atende seu requisito de a solução tem que ser pra ontem. Atte, Ricardo. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em ter, 24/3/09, clayton clay...@agriness.com escreveu: Um programa em delphi para determinar o tipo do processador? Você terá de apaelar para código assembly para conseguir isso. Os livros específicos de cada chipset da Intel tem este algoritmo (em assembly) pronto para você usar/adaptar para as suas necessidades. O problema é que estas soluções são específicas de cada fabricante, ou seja, um programa que detecta uma determinada família de processadores da Intel poderá não funcionar com processadores da AMD, e vice-versa. Eu te sugiro procurar algum software já pronto que possa lhe dar as informações necessárias, e você de dentro do teu programa Delphi, ativar estes outros softwares, os quais irão gerar algum tipo de relatório/arquivo. De posse deste arquivo você poderá fazer a leitura das informações desejadas. Abaixo segue um site (achei usando o google) que você poderá usar para obter informações de processadores AMD e Intel. Não sei se estes programas irão atender as tuas necessidades, mas vale você dar uma conferida neles. http://web.inter. nl.net/hcc/ J.Steunebrink/ chkcpu.htm Clayton. _ De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em nome de Jorge Ericsson Enviada em: terça-feira, 24 de março de 2009 11:28 Para: undisclosed- recipients: Assunto: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Linguagem ZPL - impressora Zebra
Agora não tenho uma em mãos mas se não me engano quando li o manual dava para importar uma fonte true type para ela e usar! Walter Chagas (Bol) escreveu: eu já trabalhei muito com elas e com as eltron. Pode convencer seu cliente de desistir da acentuação. Não dá certo. Sai caracteres tudo trocado na hora de imprimir porque a impressora não trabalha com o código padrão Ansi []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br mailto:wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com mailto:whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Filippe Maymone To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Monday, March 23, 2009 8:45 PM Subject: [delphi-br] Linguagem ZPL - impressora Zebra Olá, Alguem trabalha com linguagem ZPL da impressora Zebra ? Eu tenho um sistema em delphi, que faz impressora na impressora zebra via linguagem ZPL. Esta funcionando certinho, porem eu não tenho acentuação, um cliente necessita que as etiquetas saeem com acetuações. Alguem sabe resolver este problema ??? abraços, Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [URGENTE] memo no RAVE
alquem ai sabe como eu faço para imprimir um texto muito grande num memo? tipo eu vou montar o texto todo em tempo de execução num memo. depois queria que o outro memo que esta dentro do rave carregase essas linhas e imprimesse, detalhe que ele fose tambem aparecendo nas proximas paginas e tal como o quick rep fazia.. no quickrep eu botaria na propiedade strenchi se nao me engano como true e ele saia creescendo o memo e colocando ele nas paganas sequintes. e isso que eu gostraria de fazer.. to aguniado e precisando muito de uma forma de escrever isso. obrigado e t+ e muito grato a quem responder t+ -- _ Rafael jorge alves Desenvolvedor/analista Ativa Soluções em TI. Recife - PE [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro applyupdate
Bom dia, Seguinte pessoal, estou com erro em minha aplicação! Estou trabalhando em n-camadas, utilizando SOAP. Faço uma inserção de dados no clientdataset(via código, não tem nenhum formulário), dou um post no mesmo (é possível verificar que a alteração esta em cache fazendo RecordCount no CDs). Coloquei no evento AfterPost do ClientDataSet o evento para ApplyUpdates pelo código, a seguir: if (DataSet as TClientDataSet).ApplyUpdates(1) 0 then begin saveLog('Erro no applyUpdates'); raise EDataBaseError.Create(Exception(exceptobject).Message); end else (DataSet as TClientDataSet).Refresh; Ao ir no meu log verifico que acontece o seguinte erro: 10:34:53 - Access violation at address 0054DE3E in module 'ClienteSOAP.exe'. Read of address 0004. O único detalhe que posso adicionar que quando criei o Soap eu escolhi do tipo CGI-Stand Alone e estou rodando dentro do apache... Já mexi e remexi e nada de encontrar uma solução! Agradeço sugestões pra encontrar o erro! Huander [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] calculo de numeros elevado
Pessoal Boa Tardeestou com o seguinte problema estou tentando utilizar a função EXP. soma := StrToFloat('1') + StrToFloat(TabJuros.Label1. Caption); TabJuros.Edit1.Text := Exp(soma * Ln(StrToFloat(TabJuros.label27.Caption))); mais não estou conseguindo elevar a potencia 1,5 elevado a 1 por exemplo nos calculos da 1,5 e na função 1. será que é mais facil fazer esse tipo de função com a operação ^ Obrigado. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Compactar / Descompactar Mensagem Texto
Tu pode usar a ZLib, que já vem incorporada com o delphi. É só procurar na net que tem vários exemplos. Reginaldo Donizete Felix escreveu: Pessoal, Tenho um trabalho a ser feito, em que tenho uma mensagem XML que é enviada para um web service , E estamos gerando um trafego muito grande no servidor com isso solicitaram que fizemos uma compactação da mensagem andes de enviar para o webservice e no webservice descompactar tudo isso. Bom acho que isso vai acabar gerando um outro problema relacionado com processamento no servidor, mais como a ordem da gerencia no presente é liberar banda no servidor. Gostaria de saber se alguem tem algum algoritimo de compacatação te texto, ou ferramenta e que eu possa depois implementar no meu aplicativo em Delphi e tambem fazer a descompactação no WebService Java. Dede já Obrigado. -- Reginaldo D. Felix regife...@hotmail.com mailto:regifelix%40hotmail.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tabela de dados com milhões de regis tros
Não entendi qual é exatamente o seu problema. Seria trazer muitos registros do banco para a aplicação? Se for esse o caso, você deveria trazer o mínimo possível de registros de acordo com parâmetros com o usuário escolher. [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] maiuscula em todos os dedits
Creio que aí se encontrva seu erro... Não se consegue limpara o conteúdo de um dbEdit, em nenhuma propriedade do dbEdit. Vc tem de usar o banco... O dbEdit é conectado ao banco, e as mudanças que ocorrem no banco refletem nele... As mudanças feitas nele (que se restringem a apenas alguns tipos) refletem no banco depois de um ApplyUpdates. Aí no caso, o charcase facilitou de verdade! Sds, _ Emanuel Coutinho Salvador-Ba-Brasil De: felipe govoni govoni.fel...@gmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 18:02:01 Assunto: Re: [delphi-br] maiuscula em todos os dedits emanuel realmente o charcase facilito e muito, mas na verdade meu codigo nao estava errado eu apenas copiei errado, pois eu estava compilando certo, mas na hora ela nao limpava os dbedit. eu copiei a ideia de uma dica pra limpa edit e so alterei pra dbedit. 2009/3/24 Emanuel Coutinho emanuelcoutinho@ yahoo.com. br Concordo contigo, mas o código dele está quase pronto, e não sei quantos componentes ele terá de fazer mudar na mão grande... assim, automatizando é mais rápido para resolver... então dei foco a ajudar o erro do código... No meu caso, quando formato minhas telas, sempre uso as propriedades tipo CharCase, quando necessito disso, mas como ele não tinah feito... Imagina ele ter de fazer isso em 30 componentes de um formulario (mesmo estando em um pagecontrol. .. caramba... muito trabalho... mas se apagar o errinho no código... voilá... dois palitos!!! Sds, _ Emanuel Coutinho Salvador-Ba- Brasil Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Convite pessoal de felipe govoni
Convite pessoal de felipe govoni [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Ajuda sobre delphi 2009 e sql server 2000
Este é o erro. Não é possível criar uma nova conexão porque o modo usado é o de transação manual ou distribuída METALÚRGICA JANO LTDA FUNDIÇÃO DE AÇO CARBONO - INOX - MANGANÊS Alessandro Pichiteli Analista de TI (37) 3214-1140 P Antes de imprimir, pense na sua responsabilidade com o Meio Ambiente e nos custos de sua empresa _ De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Leandro A. Nunes Enviada em: terça-feira, 24 de março de 2009 09:00 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Ajuda sobre delphi 2009 e sql server 2000 Alessandro, Post os erros... talvez ajude. []s De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de TI - Metalurgica Jano Enviada em: terça-feira, 24 de março de 2009 08:22 Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] Ajuda sobre delphi 2009 e sql server 2000 Bom dia a todos, Estou iniciando uma aplicação com delphi 2009 e sql server 2000. Tenho um form onde utilizei o método nested para cadastro de companhias e plantas da companhia. Estou passando por vários tipos de erros sem nenhum sentido. Alguém pode me ajudar? METALÚRGICA JANO LTDA FUNDIÇÃO DE AÇO CARBONO - INOX - MANGANÊS Alessandro Pichiteli Analista de TI (37) 3214-1140 P Antes de imprimir, pense na sua responsabilidade com o Meio Ambiente e nos custos de sua empresa [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Database Desktop
Comprei um Sony Vaio com Windows Vista, instalei o Delphi 7 mais quando abro o Database Desktop dar problema de compatibilidade, não mostras os botões de salvar e demais... já fui em propriedades de aplicativo e coloquei executar com compatibilidade Windows XP, mesmo assim continua do mesmo jeito. O que eu devo fazer? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Função EXP
soh que o que esta acontecendo não é apenas questão de formatação..o que ocorre quando debug o codigo as variaves na 1 linha vem tudo certo.soma = 1,5...na segunda linha que é esta abaixo vem a soma = 1,5 e o outro campo do Ln vem = 1...então o result deveria ser = 1,5 e não 1 - Original Message - From: Walter Chagas (Bol) To: delphi-br@yahoogrupos.com.br Sent: Monday, March 23, 2009 2:56 PM Subject: [delphi-br] Re: Função EXP Luiz, basta fazer: Edit1.Text := FormatFloat('###,##0.00',Exp(soma * Ln(StrToFloat(label27.Caption; []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com SKYPE: WalterChagasJr Em 23/03/2009 12:22, Luiz de Lima Lopes escreveu: Pessoal Bom Dia, Estou tendo o seguinte problema estou fazendo uma função para um calculo, porem esta dando [Error] (1314): Incompatible types: 'String' and 'Extended'; Porem esta com o mesmo tipo nas duas variaveis...o que pode estar ocorrendo... Segue o codigo 1308 var 1309 soma : real; 1310 1311 begin 1312 1313 soma := StrToFloat('1') + StrToFloat(label1.Caption); 1314 Edit1.Text := Exp(soma * Ln(StrToFloat(label27.Caption))); Obrigado [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Urgente: Como detectar o modelo d a placa mãe pelo Delphi
Esqueci de mencionar, todos os programas D6-PRO ou HARBOUR rodam melhor (mais rapidos) nos HTs, menos no DUO CORE que falei... (graças a DEUS só tem 1) AH, o meu QUAD de 2.6Ghz roda normal to aguardando o QUAD com HT que da 8 nucleos, 4 reais e mais 4 virtuais no HT... []s Luiz Escobar From: Ricardo César Cardoso Sent: Tuesday, March 24, 2009 4:41 PM To: delphi-br@yahoogrupos.com.br Subject: Re: RES: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Uma outra alternativa seria listar esse fato no manual do seu sistema ou num FAQ ou melhor ainda informar os usuários sobre esse bug e instruí-los sobre como detectar se o HP Technology está habilitado bem como instruções sobre como desabilitar, caso esse processo traga ganho de performance da sua aplicação. Tentar fazer isso com o Delphi vai envolver código assembly (como já disseram) e pode ser que vc esbarre com o erro de instrução privilegiada. Nesse caso é melhor apelar para algo mais adminstrativo, ou seja, um comunicado aos usuários do que se descabelar atrás de uma solução técnica que pode ou não atingir o usuário. E a propósito, essa solução atende seu requisito de a solução tem que ser pra ontem. Atte, Ricardo. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em ter, 24/3/09, clayton clay...@agriness.com escreveu: Um programa em delphi para determinar o tipo do processador? Você terá de apaelar para código assembly para conseguir isso. Os livros específicos de cada chipset da Intel tem este algoritmo (em assembly) pronto para você usar/adaptar para as suas necessidades. O problema é que estas soluções são específicas de cada fabricante, ou seja, um programa que detecta uma determinada família de processadores da Intel poderá não funcionar com processadores da AMD, e vice-versa. Eu te sugiro procurar algum software já pronto que possa lhe dar as informações necessárias, e você de dentro do teu programa Delphi, ativar estes outros softwares, os quais irão gerar algum tipo de relatório/arquivo. De posse deste arquivo você poderá fazer a leitura das informações desejadas. Abaixo segue um site (achei usando o google) que você poderá usar para obter informações de processadores AMD e Intel. Não sei se estes programas irão atender as tuas necessidades, mas vale você dar uma conferida neles. http://web.inter. nl.net/hcc/ J.Steunebrink/ chkcpu.htm Clayton. _ De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em nome de Jorge Ericsson Enviada em: terça-feira, 24 de março de 2009 11:28 Para: undisclosed- recipients: Assunto: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] maiuscula em todos os dedits
Eu uso assim sem problemas: --- procedure TCustomEditForm.FormShow(Sender: TObject); var I: Integer; begin for I := 0 to Pred(ComponentCount) do if (Components[I] is TLabeledEdit) then (Components[I] as TLabeledEdit).CharCase := ecUpperCase; end; --- Troque o TLabeledEdit por TDBEdit. []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° De: felipe govoni govoni.fel...@gmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 11:17:32 Assunto: [delphi-br] maiuscula em todos os dedits bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Commit não insere todos os registros
Além da importante dica do Evandro, verifique se o seu objeto responsável pela transação, não está dando Commit sozinho. Pode existir a propriedade AutoCommit (ou alguma que o valha) e esta propriedade estar configurada como True.
Res: RES: [delphi-br] Urgente: Como detectar o m odelo da placa mãe pelo Delphi
Olá galera, Na JVCL tem um componente que detecta, o JvComputerInfoEx. P.S: Espero que minha resposta apareça para os usuários da lista ainda hoje. []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° De: clayton clay...@agriness.com Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 24 de Março de 2009 13:03:30 Assunto: RES: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Um programa em delphi para determinar o tipo do processador? Você terá de apaelar para código assembly para conseguir isso. Os livros específicos de cada chipset da Intel tem este algoritmo (em assembly) pronto para você usar/adaptar para as suas necessidades. O problema é que estas soluções são específicas de cada fabricante, ou seja, um programa que detecta uma determinada família de processadores da Intel poderá não funcionar com processadores da AMD, e vice-versa. Eu te sugiro procurar algum software já pronto que possa lhe dar as informações necessárias, e você de dentro do teu programa Delphi, ativar estes outros softwares, os quais irão gerar algum tipo de relatório/arquivo. De posse deste arquivo você poderá fazer a leitura das informações desejadas. Abaixo segue um site (achei usando o google) que você poderá usar para obter informações de processadores AMD e Intel. Não sei se estes programas irão atender as tuas necessidades, mas vale você dar uma conferida neles. http://web.inter. nl.net/hcc/ J.Steunebrink/ chkcpu.htm Clayton. _ De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em nome de Jorge Ericsson Enviada em: terça-feira, 24 de março de 2009 11:28 Para: undisclosed- recipients: Assunto: [delphi-br] Urgente: Como detectar o modelo da placa mãe pelo Delphi Olá pessoal, eu tó com um problema de lentidão em minhas aplicação que usam Interbase. Simplesmente começaram a ter uma lentidão impressionante, só que descobrir que isso só acontece nas placas com o Intel(R) HP Technology Habilitado, tanto Intel como AMD. Bom eu gostaria de desenvolver algo em delphi que detectasse o modelo da placa e desabilitasse esta opção de forma transparente para o usuário. Alguém tem um exemplo de como posso controlar isso ? Obs.: Não me interessa saber de migração de banco de dados, porque no momento eu tenho várias aplicações espalhadas pelo Brasil e não posso migrar para Firebird, MySQL e etc. Preciso de uma solução para ontem nestes aplicativos. Obrigado pela ajuda desde já. Jorge Ericsson Brasília - DF Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] MyDAC
Escolha a que quizer e use seu cartão internacional (VISA/MASTERCARD)... http://www.devart.com/mydac/ordering.html []s Luiz Escobar From: Bruno Lepesqueur Sent: Tuesday, March 24, 2009 4:12 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] MyDAC Como que eu faço pra comprar o MyDAC para o delphi 7? Obrigado! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Windows Vista x Database Desktop
Comprei um Sony Vaio com Windows Vista, instalei o Delphi 7 mais quando abro o Database Desktop dar problema de compatibilidade, não mostras os botões de salvar e demais... já fui em propriedades de aplicativo e coloquei executar com compatibilidade Windows XP, mesmo assim continua do mesmo jeito. O que eu devo fazer? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] MyDAC
Você deve comprar direto no site da DevArt, a compra é feita on-line, com cartão de crédito fica muito mais fácil. http://devart.com/mydac/ordering.html comprando o MyDAC 5 você poderá usar em todas as Ide's que ele suporta, do Delphi 5 ou 2009, C++ Builder ou Kylix Parabens pela escolha e bem-vindo ao time dos que não tem problema com componente de acesso. 2009/3/24 Bruno Lepesqueur brunolbra...@yahoo.com.br Como que eu faço pra comprar o MyDAC para o delphi 7? Obrigado! [ -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tabela de dados com milhões de regi stros
Creio que deveria ser sanada essa deficiência na leitura do banco. essa metodologia de carregar os dados para a memória não é uma boa opção porque vai afetar o desempenho da estação. nos informe qual é o banco de dados, qual a tecnologia de acesso e mais detalhes específicos do problema. 2009/3/24 josehenriqu...@ymail.com josehenriqu...@ymail.com Amigos bom dia, gostaria de saber se alguém pode me indicar uma solução para um problema que parece simples. Temos algumas tabelas que tem baixa manutenção, mas alto índice de pesquisa nas mesmas. Eis ai nosso gargalo, o acesso ao banco de dados, por mais que se melhore o acesso ao BD continua sendo o nosso gargalo. Então uma opção sugerida seria de no iniciar a aplicação essas tabelas fossem lidas do banco e ficassem em memória para sempre (notem as aspas) até que seja realmente necessário fazer o recarregamento da tabela. Gostaria de saber se alguém já teve um caso desses e qual a tecnologia, metodologia ou mágica foi feita. Se puderem me ajudar ficarei muito grato. abs!!! -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Linguagem ZPL - impressora Zebra
Uma coisa que da para fazer é montar a etiqueta em uma imagem e mandar para impressora Filippe Maymone escreveu: Nossa que coisa .. cliente é f E o pior que a minha empresa é licenciada dessa marca ... e temos que atender ... Vou ter que fazer a impressão desse cliente fora do sistema, terei que montar via programas de etquetas, o que vai me gerar varios problemas... mais se não tenho solução ...rs.rs Abraços, 2009/3/23 Walter Chagas (Bol) wchag...@bol.com.br mailto:wchagasj%40bol.com.br eu já trabalhei muito com elas e com as eltron. Pode convencer seu cliente de desistir da acentuação. Não dá certo. Sai caracteres tudo trocado na hora de imprimir porque a impressora não trabalha com o código padrão Ansi []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br mailto:wchagasj%40bol.com.br wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com mailto:whitesockets%40hotmail.com whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Filippe Maymone To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, March 23, 2009 8:45 PM Subject: [delphi-br] Linguagem ZPL - impressora Zebra Olá, Alguem trabalha com linguagem ZPL da impressora Zebra ? Eu tenho um sistema em delphi, que faz impressora na impressora zebra via linguagem ZPL. Esta funcionando certinho, porem eu não tenho acentuação, um cliente necessita que as etiquetas saeem com acetuações. Alguem sabe resolver este problema ??? abraços, Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Cópia do banco MySQL
Estou migrando aos poucos ao InnoDB também, alias nem migrando o que vem novo é feito em InnoDB, pelas vantagens ja comentadas, porem NUNCA tive problemas com os MyISAM. []s Luiz Escobar From: Eduardo Silva dos Santos Sent: Tuesday, March 24, 2009 4:20 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Cópia do banco MySQL Amigo, você acertou na mega sena, usar InnoDB é a melhor coisa que existe. Usando este engine você terá Integridade referencial, crash recovery, suporte a transações e mais um monte de recursos que o InnoDB, além de sofrer com corrupção dos dados caso seu servidor seja desligado. No innodb a coisa funciona um pouco diferente, os dados e os indices das tabelas ficam no TableSpace, um arquivo chamado IbData, os outros dois são arquivos de log. Na pasta do banco ficam apenas os arquivos frm que são os headers da tabela. você tem duas opções para copiar um banco innodb: 1 - para o serviço, copiar os arquivos Ibdata e iblog e a pasta do banco que esta dentro da pasta data. (fazendo isso ao colocar no destino você apagará qualquer banco existente, visto que todos são salvos no arquivo IbData) 2 - Essa opção é a melhor e mais segura, gerar um script do banco com a ferramenta de sua preferência e executar esse script na máquina de destino e recriar o banco. é isso ai, seja feliz com Innodb e dê adeus aos problemas de corrupção com tabelas MyISAM. 2009/3/24 Bruno Lepesqueur brunolbra...@yahoo.com.br Pessoal... to usando o Delphi 7 com o MySQL 5, e trabalho com eles na empresa e to tentando levar pra casa tb, mas não consigo fazer o banco de dados funcionar em casa. Seguinte... eu usava um banco do tipo MyISAM e agora converti ele para InnoDB. Pelo que entendi o MyISAM não trabalha com relacionamentos entre tabelas (chave estrangeira) e refiz o meu banco todo como InnoDB e fiz os relacionamentos entre tabelas, mas o problema é que se eu apenas copiar a pasta do banco de dados e colar no outro micro ele não aceita! OBS.: O banco que eu tinha no formato MyISAM aceitava eu apenas copiar o banco (C:\Arquivos de programas\MySQL\MySQL Server 5.0\data\nome do banco) de um computador e colar no outro para que tudo funcionasse. O que vcs me sugerem? Obrigado! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro em ShowModal
Tenho um form que é mostrado com ShowModal. Quando o programa mostra uma mensagem com MessageBox o form é joagado para trás dos outros forms abertos. O programa fica travado pois o único form que poderia ser acessado é o form que foi jogado pra trás. Alguém o que pode estar causando esse problema? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tabela de dados com milhões de regi stros
Primeiro, para a gente conseguir te ajudar, você tem que pasar mais algumas informações, do tipo: * qual é o banco de dados * versão do banco * tipo de conexão com o banco de dados * quantidade real de registros na tabela * quantidade real de colunas * faz join com alguma outra tabela? Banco de dados grande, não é banco de dados lento. Atenciosamente Marlon 2009/3/24 Alisson Yahoo alss...@yahoo.com.br Não entendi qual é exatamente o seu problema. Seria trazer muitos registros do banco para a aplicação? Se for esse o caso, você deveria trazer o mínimo possível de registros de acordo com parâmetros com o usuário escolher. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maiuscula em todos os dedits
nossa galera, quanta repercusão hehehe ja resolvi, nao precisava de codigo troquei a propriedade e resolveu. vlw 2009/3/24 Wagne®_Fix wagner_...@yahoo.com.br Não precisa de programação para isso... Seleciona todos os Edits que você quer em maiusculo e vai nas propriedades muda o charcase para ecUpperCase --- Em ter, 24/3/09, felipe govoni govoni.fel...@gmail.comgovoni.felipe%40gmail.com escreveu: De: felipe govoni govoni.fel...@gmail.com govoni.felipe%40gmail.com Assunto: [delphi-br] maiuscula em todos os dedits Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Data: Terça-feira, 24 de Março de 2009, 11:17 bom dia algume sabe me dize oq tem de errado nesse codigo: for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: expression illegal in evaluator tentei faze um teste com o seguinte codigo e tambem nao fez nada for j := 0 to frmFinasa.Component Count - 1 do if (frmFinasa.Componen ts[j] is tdbEdit) then (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; alguem pode me ajuda? obrigado -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com. br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]