[delphi-br] Dúvidas com Firebird e componentes infopower?
Bom dia.. Estou implementando uma pesquisa em outras tabelas (Ex: estou no cadastro de pedidos e quero consultar o cliente),através do componente TwwSearchDialog, qdo eu estava utilizando o Paradox, eu tinha que ter dois componentes TTable no DataModulo, Um apontava diretamente para a tabela e o outro para ser utilizado na propriedade ShadowSearch do TwwSearchDialog. O interessante neste componente é que não é necessário criar um form para pesquisa. Como vc´s estão fazendo: Sendo que o TwwSearchDialogue ficava com as propriedas SearchTable e ShadowSearche definidas assim: SearchTable := DataLojas.Clientes // Componente TTable apontando diretamente para a tablea de clientes. ShadowSearch := TblCli //Outro componente TTable apontando para uma cópia da Tabela clientes. Resumindo a logica do componente é que ele procura na ShadowSearch e faz uma sincronização com a Tabela original.. até ai tudo bem.. O problema é que agora estou utilizando o FB com DBExpress com os seguinte componentes.. SqlDataSet + DataSetProvider + ClientDataSet + DataSource. O que eu quero saber se no Fb com estes componentes como ficaria a perfomance pois eu simplesmente posso criar um ClientDataSet para cada tabela que for utilizar TwwSearchDialog.. Fausto Se alguém puder me dar uma ajuda, aceito até mesmo outra sugestões quanto a criar um form genérico para pesquisar em outras tabelas. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: DBGRID
Blz cara valeupode ser isso mesmo que está acontecendo.pois estou utilizando um servidor com SQL SERVER... Mais uma vez valeu - Original Message - From: Luciano Pelissoli To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 7:28 PM Subject: [delphi-br] Re: DBGRID Usei o exemplo em um aplicativo que acessava tabelas do paradox e do dbase e funcionou, mas quando utiliza-se uma tabela ou consulta que acessa os dados em um servidor SQL,(usei o SQL Server) não funciona. O problemas esta na propriedade RECNo, pois ela não funciona direito com os resultados obtidos de um servidor SQL. Então sugiro a utilização de um flag para poder variar entre uma cor e outra. --- Em delphi-br@yahoogrupos.com.br, [EMAIL PROTECTED] escreveu Pessoal estou tentando deixar o dbgrid zebrado. peguei este exemplo o mais está ficando apenas uma cor. O que está errado? procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if odd(query1.RecNo) then begin DBGrid1.Canvas.Font.Color:= clWhite; DBGrid1.Canvas.Brush.Color:= clGreen; end else begin DBGrid1.Canvas.Font.Color:= clBlack; DBGrid1.Canvas.Brush.Color:= clWhite; end; DBGrid1.Canvas.FillRect(Rect); DBGrid1.Canvas.TextOut(Rect.Left+2,Rect.Top,Column.Field.AsString); end; [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.6.4 - Release Date: 7/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Database - Pergunta de iniciante
Bom dia a todos!!! Alguém poderia me esclarecer qual é a função do Database num form??? A função dele é apenas se conectar ao BD e permitir acesso e ele??? Um abraço. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] idade atual
Pessoal, estouu usando uma função que eu peguei das 800 Dicas e Truques delphi,
só que quando gero o relatório tem uma pessoa que está com 71 anos está saindo
no bloco do 70 anos, Mas se troco a data do windows em 9 dias ela saí no bloco
dos 71 anos. Abaixo segue a função.
Alguem pode me ajudar? Uso Delphi 7 com Paradox. Tem algum erro?
A FUNÇÃO
{$R *.DFM}
// função idade atual
function IdadeAtual(Nasc : TDate; DTATUAL : TDate): Integer;
Var AuxIdade, Meses : String;
MesesFloat, DiasFloat : Real;
IdadeInc, IdadeReal : Integer;
begin
AuxIdade := Format('%0.2f', [(DTATUAL- Nasc) / 365.6]);
Meses := FloatToStr(Frac(StrToFloat(AuxIdade)));
if AuxIdade = '0' then
begin
Result := 0;
Exit;
end;
if Meses[1] = '-' then
begin
Meses := FloatToStr(StrToFloat(Meses) * -1);
end;
Delete(Meses, 1, 2);
if Length(Meses) = 1 then
begin
Meses := Meses + '0';
end;
if (Meses '0') And (Meses '') then
begin
MesesFloat := Round(((365.6 * StrToInt(Meses)) / 100) / 30.47)
end else
begin
MesesFloat := 0;
end;
if MesesFloat 12 then
begin
IdadeReal := Trunc(StrToFloat(AuxIdade)); // + MesesFloat;
end else
begin
IdadeInc := Trunc(StrToFloat(AuxIdade));
Inc(IdadeInc);
IdadeReal := IdadeInc;
end;
Result := IdadeReal;
end;
[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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Urgente - Instalar a biblioteca JEDI + QuickRepo rt 4
Grato pela ajuda. Mas vc poderia esplicar melhor. eu nao entendi direito. Walter Alves Chagas Junior escreveu: Este erro normalmente ocorre quando há duas units com mesmo nome mas nas duas BPL´s. Pode ser isto daí []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Ridson [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 9 de março de 2005 16:36 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Urgente - Instalar a biblioteca JEDI + QuickReport 4 Por favor quem ja teve este tipo de problema me ajude. Estou tentando instalar o QuickReport 4 junto com o JEDI esta dando erro de bpl nao pode ser acessado(qrpt70). Ai eu apago esta bpl(qrpt70) e instala o QuickReport 4 direitinho mas o JEDI para de funcionar. E tambem quando entro nos fontes do meu sistema aparece uma mensagen de que nao conseguiu achar este componemte JvCurrEdit. Como resolvo isso. eu realmente uso este componente! Estou usando o Windows XP SP2 + Delphi 7 com SP1 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Database - Pergunta de iniciante
Bom dia, Além de conectar ao banco, o componente database é responsável pelo controle de transações em banco de dados. Andre de Souza Ferreira [EMAIL PROTECTED] wrote: Bom dia a todos!!! Alguém poderia me esclarecer qual é a função do Database num form??? A função dele é apenas se conectar ao BD e permitir acesso e ele??? Um abraço. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Qual o melhor banco de dados FREE
Esse dilema é tão antigo quanto a minha bisavó aqui nas listas. A dúvida sempre diverge para várias probabilidades mas nunca converge para a única resposta sensata que existe para ela: NÃO EXISTE O MELHOR BANCO DE DADOS. NÃO EXISTE ISTO NA INFORMÁTICA. O QUE EXISTE É O BANCO QUE MELHOR SE ADEQUE ÀS NECESSIDADES E FUNCIONALIDADES DE UM PROJETO ESPECÍFICO. Então se alguém pretende adotar o banco X ou o banco Y, deve analisar o projeto primeiro e ver as características de cada banco. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Joao Paulo L.G. [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 9 de março de 2005 12:12 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Qual o melhor banco de dados FREE Olá, Acho que o BD Free que melhor se adapta ao Delphi é o Firebird. O PostgreSQL tem um histórico muito bom, e também é muito indicado. Já o MySQL seria o mais recomendado se a aplicação for voltada apenas para consultas (pela sua performance). Sobre o MSDE, acredito ser apenas recomendado caso exista a previsão de migração para a versão full. --- delphi-br@yahoogrupos.com.br escreveu: Assunto: RES: Qual o melhor banco de dados FREE Perguntinha difícil esta... :-) Pra se integrar ao Delphi, o melhor disparado é o Firebird. Mas também pode usar o MySQL, PostGree, ou mesmo o MSDE (a versão free do SQL-Server). Só que o MSDE (até a versão 2000 pelo menos) tem a limitação de bancos com até 2 Gb e 8 acessos simultâneos, a partir daí ele (propositalmente) começa a degradar o desempenho (coisas da M$, é claro). Agora dizer qual é o melhor é meio arriscado, depende muito do seu projeto e todas as circunstâncias que o envolvem. João Paulo L.G. [EMAIL PROTECTED] ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] compactador de executável
Tempo de carga mais rápido Se você rodar o executável apenas, o tempo de carga necessário, é o tempo para você carregar o .exe Agora com um compactador, o tempo de carga seria o tempo de carga para carregar o compactado + o tempo para descompactar ele + o tempo de execução do .exe descompactado. Mas como eu já disse, já tive muitos problemas desagradáveis nas listas, ao expor meu ponto de vista a respeito disto. Hoje eu não discuto compactadores de exe com mais ninguem. Cada um faz o que bem entender de seus projetos. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Joao Paulo L.G. [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 9 de março de 2005 21:33 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] compactador de executável Pessoal, Li o artigo comentado aqui na lista sobre compactação de executável, e realmente está bem escrito e explica muita coisa. Só quero colocar a razão principal pela qual eu utilizei, e que não foi citada no artigo: executável na rede. Diminui o tempo de carga do programa. E como nunca tive problemas, como foi reportado no artigo, sempre achei válida sua utilização. Valeu. João Paulo L.G. [EMAIL PROTECTED] ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Database - Pergunta de iniciante
Oi Fernanda; Se for usar um table ou uma query tenho que linkar os dois ao database? -Mensagem original- De: Fernanda Aparecida Sobral [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 08:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Database - Pergunta de iniciante Bom dia, Além de conectar ao banco, o componente database é responsável pelo controle de transações em banco de dados. Andre de Souza Ferreira [EMAIL PROTECTED] wrote: Bom dia a todos!!! Alguém poderia me esclarecer qual é a função do Database num form??? A função dele é apenas se conectar ao BD e permitir acesso e ele??? Um abraço. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: http://br.rd.yahoo.com/SIG=12aogim1s/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1110540927/A=2191897/R=0/SIG=10vqa2grn/*http://br.diversao.yahoo.com/ http://br.rd.yahoo.com/SIG=12aogim1s/M=264379.5078783.6203979.1588051/D=brclubs/S=2137111264:HM/EXP=1110540927/A=2191897/R=1/SIG=10vqa2grn/*http://br.diversao.yahoo.com/ São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília _ 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: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Banco de dados Access
Abra o seu banco de dados (arquivo com a extensao MDB) pelo MS-ACCESS e coloque uma senha no banco. Desta forma o usuario nao poderah abrir o seu banco. - Original Message - From: Hudson BHTE [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 1:32 PM Subject: [delphi-br] Banco de dados Access Galera Como eu faço para reter o usuario não ter acesso ao banco de dados access. por exemplo: tenho um sistema com ADO no banco de dados access... Neste sistema, o usuario tem q digitar a sua senhamas se ele entrar no banco access ele terá acesso a todas informação? alguem já teve essa duvida? -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/05 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Melhor componente de acesso
Você usa o DBX Francisco? O que vc acha dela? Já teve algum problema com a sua utilização? Já utilizou quais bancos de dados? Se voce puder me ajudar eu te agradeço... - Original Message - From: Francisco Thiago [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 5:49 PM Subject: Re: [delphi-br] Re: Melhor componente de acesso Não depende da MIDAS.DLL não... Quem depende dela é o ClientDataSet... isso se você não adicionar a MidasLib no Uses Francisco Thiago de Almeida EnterPlug Informática Divisão: Desenvolvimento e Banco de dados MSN: [EMAIL PROTECTED] - Original Message - From: Filipe Belchior [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 12:00 PM Subject: [delphi-br] Re: Melhor componente de acesso o DBX nao tem ligacao com BDE, mas depende de uma dll, MIDAS.dll... acredito q para esta situacao, o Zeos é uma boa... --- Em delphi-br@yahoogrupos.com.br, Thiago [EMAIL PROTECTED] escreveu Qual o melhor componente para conexão com o banco de dados. De preferência que permita vários bancos de dados (Interbase, Oracle, MySQL...)? O DBExpress utiliza algum software intermediário como o BDE? Obrigado pela ajuda -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Database - Pergunta de iniciante
Sim, vc deve, pois se vc estiver utilizando os componentes do BDE, não existe outra forma de vc fazer a conexão com o banco. Andre de Souza Ferreira [EMAIL PROTECTED] wrote: Oi Fernanda; Se for usar um table ou uma query tenho que linkar os dois ao database? -Mensagem original- De: Fernanda Aparecida Sobral [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 08:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Database - Pergunta de iniciante Bom dia, Além de conectar ao banco, o componente database é responsável pelo controle de transações em banco de dados. Andre de Souza Ferreira wrote: Bom dia a todos!!! Alguém poderia me esclarecer qual é a função do Database num form??? A função dele é apenas se conectar ao BD e permitir acesso e ele??? Um abraço. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília _ 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! . [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: RES: [delphi-br] Database - Pergunta de iniciante
Uê, aqui aonde tou trabalhando eu faça a conexão com o banco diretamente com as Queries mesmo. Não uso o database. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Fernanda Aparecida Sobral [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 09:03 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Database - Pergunta de iniciante Sim, vc deve, pois se vc estiver utilizando os componentes do BDE, não existe outra forma de vc fazer a conexão com o banco. Andre de Souza Ferreira [EMAIL PROTECTED] wrote: Oi Fernanda; Se for usar um table ou uma query tenho que linkar os dois ao database? -Mensagem original- De: Fernanda Aparecida Sobral [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 08:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Database - Pergunta de iniciante Bom dia, Além de conectar ao banco, o componente database é responsável pelo controle de transações em banco de dados. Andre de Souza Ferreira wrote: Bom dia a todos!!! Alguém poderia me esclarecer qual é a função do Database num form??? A função dele é apenas se conectar ao BD e permitir acesso e ele??? Um abraço. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília _ 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! . [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: RES: [delphi-br] Urgente - Instalar a biblioteca JEDI + Quic kRepo rt 4
Agora to comecando a enterder. Vc por um acaso nao sabe em quais units estao usando ela? Eu procurei este arquivo xpto.pas e nao o encontrei. Walter Alves Chagas Junior escreveu: considere a unit xpto.pas Se voce tem dois pacotes de componentes distintos e que cada um tenha uma BPL específica. Não pode haver nas duas, ao mesmo tempo, a unit xpto.pas. Somente em uma do contrário dá conflito na hora da carga da bpl []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Ridson [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 07:33 Para: delphi-br@yahoogrupos.com.br Cc: [EMAIL PROTECTED] Assunto: Re: RES: [delphi-br] Urgente - Instalar a biblioteca JEDI + QuickRepo rt 4 Grato pela ajuda. Mas vc poderia esplicar melhor. eu nao entendi direito. Walter Alves Chagas Junior escreveu: Este erro normalmente ocorre quando há duas units com mesmo nome mas nas duas BPL´s. Pode ser isto daí []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Ridson [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 9 de março de 2005 16:36 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Urgente - Instalar a biblioteca JEDI + QuickReport 4 Por favor quem ja teve este tipo de problema me ajude. Estou tentando instalar o QuickReport 4 junto com o JEDI esta dando erro de bpl nao pode ser acessado(qrpt70). Ai eu apago esta bpl(qrpt70) e instala o QuickReport 4 direitinho mas o JEDI para de funcionar. E tambem quando entro nos fontes do meu sistema aparece uma mensagen de que nao conseguiu achar este componemte JvCurrEdit. Como resolvo isso. eu realmente uso este componente! Estou usando o Windows XP SP2 + Delphi 7 com SP1 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Melhor componente de acesso
(Thiago, por favor :D) Uso DBXpress sim e acho uma ótima opção para programadores que não querem estar presos a uma única base de dados. Na minha opnião é a melhor suite de componentes para trabalho em multicamadas pelo fato dela não manter cache dos dados e ser unidirecional (detalhes estes que a deixam bem rápida)./ Problemas com o DBXpress eu nunca tive. O que tive mesmo foi alguns impasses com a UIB (biblioteca para acesso ao FireBird). Mas voltei para a dbexpint.dll e ficou tudo em casa (só algumas modificações em tipos de dados). Eu particularmente trabalho com Interbase / Firebird. Mas tenho amigos que trabalham com Oracle e acham o desempenho supreendente. Só não aconselharia o seu uso com SQLServer (e nem aconselho o uso do SQLServer :D). Para SQLServer, o melhor seria ADO. Espero ter ajudado Francisco Thiago de Almeida EnterPlug Informática Divisão: Desenvolvimento e Banco de dados MSN: [EMAIL PROTECTED] - Original Message - From: Thiago Gmail [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 10, 2005 9:00 AM Subject: Re: [delphi-br] Re: Melhor componente de acesso Você usa o DBX Francisco? O que vc acha dela? Já teve algum problema com a sua utilização? Já utilizou quais bancos de dados? Se voce puder me ajudar eu te agradeço... - Original Message - From: Francisco Thiago [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 5:49 PM Subject: Re: [delphi-br] Re: Melhor componente de acesso Não depende da MIDAS.DLL não... Quem depende dela é o ClientDataSet... isso se você não adicionar a MidasLib no Uses Francisco Thiago de Almeida EnterPlug Informática Divisão: Desenvolvimento e Banco de dados MSN: [EMAIL PROTECTED] - Original Message - From: Filipe Belchior [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 12:00 PM Subject: [delphi-br] Re: Melhor componente de acesso o DBX nao tem ligacao com BDE, mas depende de uma dll, MIDAS.dll... acredito q para esta situacao, o Zeos é uma boa... --- Em delphi-br@yahoogrupos.com.br, Thiago [EMAIL PROTECTED] escreveu Qual o melhor componente para conexão com o banco de dados. De preferência que permita vários bancos de dados (Interbase, Oracle, MySQL...)? O DBExpress utiliza algum software intermediário como o BDE? Obrigado pela ajuda -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: RES: RES: [delphi-br] Urgente - Instalar a biblioteca JEDI + Quic kRepo rt 4
Walter Alves Chagas Junior escreveu: Meu amigo xpto.pas NÃO EXISTE! Eu usei este nome fictíciamente para você entender. Você tem que olhar nas mensagens de geração e carga da bpl que o linkeditor irá te informar. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Ridson [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 08:03 Para: Walter Alves Chagas Junior Cc: delphi-br@yahoogrupos.com.br Assunto: Re: RES: RES: [delphi-br] Urgente - Instalar a biblioteca JEDI + Quic kRepo rt 4 Agora to comecando a enterder. Vc por um acaso nao sabe em quais units estao usando ela? Eu procurei este arquivo xpto.pas e nao o encontrei. Walter Alves Chagas Junior escreveu: considere a unit xpto.pas Se voce tem dois pacotes de componentes distintos e que cada um tenha uma BPL específica. Não pode haver nas duas, ao mesmo tempo, a unit xpto.pas. Somente em uma do contrário dá conflito na hora da carga da bpl []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Ridson [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 07:33 Para: delphi-br@yahoogrupos.com.br Cc: [EMAIL PROTECTED] Assunto: Re: RES: [delphi-br] Urgente - Instalar a biblioteca JEDI + QuickRepo rt 4 Grato pela ajuda. Mas vc poderia esplicar melhor. eu nao entendi direito. Walter Alves Chagas Junior escreveu: Este erro normalmente ocorre quando há duas units com mesmo nome mas nas duas BPL´s. Pode ser isto daí []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Ridson [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 9 de março de 2005 16:36 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Urgente - Instalar a biblioteca JEDI + QuickReport 4 Por favor quem ja teve este tipo de problema me ajude. Estou tentando instalar o QuickReport 4 junto com o JEDI esta dando erro de bpl nao pode ser acessado(qrpt70). Ai eu apago esta bpl(qrpt70) e instala o QuickReport 4 direitinho mas o JEDI para de funcionar. E tambem quando entro nos fontes do meu sistema aparece uma mensagen de que nao conseguiu achar este componemte JvCurrEdit. Como resolvo isso. eu realmente uso este componente! Estou usando o Windows XP SP2 + Delphi 7 com SP1 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] Ha soh, desculpe minha ignorancia. rsrsrs... Grato pela ajuda. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] idade atual
Se vc usa o Delphi 7, teste esta minha sugestão:
{ Precisa da unit DateUtils. Para esta função, vc passa a data de nascimento
da pessoa e
uma data de referência. Se não passar nada na data de referência, assume
data atual. }
function CurrentAge(BirthDate: TDateTime; ReferenceDate: TDateTime = 0):
Integer;
begin
if ReferenceDate = 0 then
Result := Trunc(YearSpan(Date, BirthDate))
else
Result := Trunc(YearSpan(ReferenceDate, BirthDate));
end;
[]s
-Mensagem original-
De: Info Desenvolvimento [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 10 de março de 2005 07:19
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] idade atual
Pessoal, estouu usando uma função que eu peguei das 800 Dicas e Truques delphi,
só que quando gero o relatório tem uma pessoa que está com 71 anos está saindo
no bloco do 70 anos, Mas se troco a data do windows em 9 dias ela saí no bloco
dos 71 anos. Abaixo segue a função. Alguem pode me ajudar? Uso Delphi 7 com
Paradox. Tem algum erro?
A FUNÇÃO
{$R *.DFM}
// função idade atual
function IdadeAtual(Nasc : TDate; DTATUAL : TDate): Integer; Var AuxIdade,
Meses : String;
MesesFloat, DiasFloat : Real;
IdadeInc, IdadeReal : Integer;
begin
AuxIdade := Format('%0.2f', [(DTATUAL- Nasc) / 365.6]);
Meses := FloatToStr(Frac(StrToFloat(AuxIdade)));
if AuxIdade = '0' then
begin
Result := 0;
Exit;
end;
if Meses[1] = '-' then
begin
Meses := FloatToStr(StrToFloat(Meses) * -1);
end;
Delete(Meses, 1, 2);
if Length(Meses) = 1 then
begin
Meses := Meses + '0';
end;
if (Meses '0') And (Meses '') then
begin
MesesFloat := Round(((365.6 * StrToInt(Meses)) / 100) / 30.47)
end else
begin
MesesFloat := 0;
end;
if MesesFloat 12 then
begin
IdadeReal := Trunc(StrToFloat(AuxIdade)); // + MesesFloat;
end else
begin
IdadeInc := Trunc(StrToFloat(AuxIdade));
Inc(IdadeInc);
IdadeReal := IdadeInc;
end;
Result := IdadeReal;
end;
[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: [EMAIL PROTECTED] ou [EMAIL
PROTECTED]
Links do Yahoo! Grupos
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005
--
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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] função
RUBEM ROCHA. Já está funcionando, a pessoa foi para o seu bloco (71-80 anos), cara não sei nem como te agradecer, cheguei a ficar emocionado, muito obrigado mesmo. MUITO OBRIGADO PAULO FERNANDES PORTO ALEGRE RS [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Enviando os dados do ClientDataSet via WebServices (SOLUÇÃO)
Caros amigos, Recentemente mandei uma pergunta pra lista sobre como enviar os dados do ClientDataSet (propriedade Data) para um WebServices. Bem, depois de muitas tentativas (chutes) eu descobri que tirando o const da procedure enviava normalmente. O Interessante é que: Em outros casos funciona... apenas neste que não... Esquisito né?! Em todo caso, se alguém passar por isso já sabe :D []'s Francisco Thiago de Almeida EnterPlug Informática Divisão: Desenvolvimento e Banco de dados MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] PTaskEntry (duvida)
galera estou usando um programa q quando ele esta em execulção fechara todos os outros...com este codigo procedure TForm1.ButtonKillAllClick(Sender: TObject); var pTask : PTaskEntry; Task : Bool; ThisTask: THANDLE; begin GetMem (pTask, SizeOf (TTaskEntry)); pTask^.dwSize := SizeOf (TTaskEntry); Task := TaskFirst (pTask); while Task do begin if pTask^.hInst = hInstance then ThisTask := pTask^.hTask else TerminateApp (pTask^.hTask, NO_UAE_BOX); Task := TaskNext (pTask); end; TerminateApp (ThisTask, NO_UAE_BOX); end; mas o defeito esta no (PTaskEntry) diz que não veracho q ñ declarei na seção usesmas dando uma olhada a declaração e System para este.oq esta errado? -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Fw: Leia com Atenção
- Original Message - From: Rogério To: [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] Sent: Thursday, March 10, 2005 8:12 AM Subject: Leia com Atenção Na Bíblia está escrito (Gálatas 6:7): Não vos enganeis, de Deus não se zomba, pois tudo o que o homem semear, isto também ceifará. Eis alguns homens: JOHN LENNON: Alguns anos depois de dar uma entrevista a uma revista americana, disse: O cristianismo vai se acabar, vai se encolher, desaparecer. Eu não preciso discutir sobre isso. Eu estou certo. Jesus era legal, mas suas disciplinas são muito simples. Hoje, nós somos mais populares que Jesus Cristo.(1966).Lennon, depois de ter dito que os Beatles estavam mais Famosos que Jesus Cristo,recebeu cinco tiros de seu próprio fã; TANCREDO NEVES: Na ocasião da campanha presidencial, disse que se tivesse 500 votos do seu partido (PDS), nem Deus o tiraria da presidência da república. Os votos ele conseguiu, mas o trono lhe foi tirado um dia antes de tomar posse. BRIZOLA: No ano de 1990, quando houve uma outra campanha presidencial, disse que aceitava até o apoio do demônio para se tornar presidente. A campanha,quando acabou, apontou Collor como presidente e não mostrou Brizola nem em segundo lugar. CAZUZA: Em um show no Canecão ( Riode Janeiro ), deu um trago em um cigarro de maconha, soltou a fumaça para cima e disse: Deus essa é para você! Nem precisa falar em qual situação morreu esse homem. O CONSTRUTOR DO NAVIO TITANIC: Na ocasião em que foi construído, apontaram-no como o maior navio de passageiros da época. No dia de entrar em alto- mar, uma repórter fez a seguinte pergunta para o construtor: O que o senhor tem a dizer para a imprensa concernente a segurança do seu navio? O homem, com um tom irônico, disse: - Minha filha nem se Deus quiser ele tomba o meu navio. O resultado foi o maior naufrágio de um navio de passageiros no mundo. MARILYN MONROE: Foi visitada por Billy Graham durante a apresentação de um show. Ele, um pregador do evangelho, na época havia sido mandado pelo Espírito Santo àquele lugar, para pregar a Marilyn. Porém ela, depois de ouvir a mensagem do Evangelho, disse: Não preciso do seu Jesus. Uma semana depois foi encontrada morta em seu apartamento. BON SCOTE: Ex-vocalista do conjunto AC/DC. Cantava no ano de 1979 uma música com a seguinte frase: Don´t stop me, I´m going down all the way, wow the highway to hell (Não me impeça... Vou seguir o caminho até o fim, na auto-estrada para o inferno). No dia 19 de fevereiro de 1980, Bom Scote foi encontrado morto,asfixiado pelo próprio vômito. Muitos outros homens importantes também se esqueceram que a nenhu moutro nome foi dada tanta autoridade como a que há no nome de JESUS . Não esqueça disso : Muitos morreram, mas somente um ressuscitou: Jesus! P.S. se fosse uma piadinha ...vc enviaria pra todo mundo .será que este texto vc tb terá coragem pra enviar ... eu já fiz a minha parte Jesus Cristo dizia: Se te envergonhares de mim, eu me envergonha-rei de ti perante meu pai [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Fw: Leia com Atenção
O que é isso? Ta tendo uma invasão de mensagens deste tipo na lista? MODERADOR ? VC TA AI? Daniel A. Bastos On Thu, 10 Mar 2005 10:14:25 -0300, Adenes I. Freire Junior [EMAIL PROTECTED] wrote: - Original Message - From: Rogério To: [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] Sent: Thursday, March 10, 2005 8:12 AM Subject: Leia com Atenção Na Bíblia está escrito (Gálatas 6:7): Não vos enganeis, de Deus não se zomba, pois tudo o que o homem semear, isto também ceifará. Eis alguns homens: JOHN LENNON: Alguns anos depois de dar uma entrevista a uma revista americana, disse: O cristianismo vai se acabar, vai se encolher, desaparecer. Eu não preciso discutir sobre isso. Eu estou certo. Jesus era legal, mas suas disciplinas são muito simples. Hoje, nós somos mais populares que Jesus Cristo.(1966).Lennon, depois de ter dito que os Beatles estavam mais Famosos que Jesus Cristo,recebeu cinco tiros de seu próprio fã; TANCREDO NEVES: Na ocasião da campanha presidencial, disse que se tivesse 500 votos do seu partido (PDS), nem Deus o tiraria da presidência da república. Os votos ele conseguiu, mas o trono lhe foi tirado um dia antes de tomar posse. BRIZOLA: No ano de 1990, quando houve uma outra campanha presidencial, disse que aceitava até o apoio do demônio para se tornar presidente. A campanha,quando acabou, apontou Collor como presidente e não mostrou Brizola nem em segundo lugar. CAZUZA: Em um show no Canecão ( Riode Janeiro ), deu um trago em um cigarro de maconha, soltou a fumaça para cima e disse: Deus essa é para você! Nem precisa falar em qual situação morreu esse homem. O CONSTRUTOR DO NAVIO TITANIC: Na ocasião em que foi construído, apontaram-no como o maior navio de passageiros da época. No dia de entrar em alto- mar, uma repórter fez a seguinte pergunta para o construtor: O que o senhor tem a dizer para a imprensa concernente a segurança do seu navio? O homem, com um tom irônico, disse: - Minha filha nem se Deus quiser ele tomba o meu navio. O resultado foi o maior naufrágio de um navio de passageiros no mundo. MARILYN MONROE: Foi visitada por Billy Graham durante a apresentação de um show. Ele, um pregador do evangelho, na época havia sido mandado pelo Espírito Santo àquele lugar, para pregar a Marilyn. Porém ela, depois de ouvir a mensagem do Evangelho, disse: Não preciso do seu Jesus. Uma semana depois foi encontrada morta em seu apartamento. BON SCOTE: Ex-vocalista do conjunto AC/DC. Cantava no ano de 1979 uma música com a seguinte frase: Don´t stop me, I´m going down all the way, wow the highway to hell (Não me impeça... Vou seguir o caminho até o fim, na auto-estrada para o inferno). No dia 19 de fevereiro de 1980, Bom Scote foi encontrado morto,asfixiado pelo próprio vômito. Muitos outros homens importantes também se esqueceram que a nenhu moutro nome foi dada tanta autoridade como a que há no nome de JESUS . Não esqueça disso : Muitos morreram, mas somente um ressuscitou: Jesus! P.S. se fosse uma piadinha ...vc enviaria pra todo mundo .será que este texto vc tb terá coragem pra enviar ... eu já fiz a minha parte Jesus Cristo dizia: Se te envergonhares de mim, eu me envergonha-rei de ti perante meu pai [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Qual o melhor banco de dados FREE
Francisco, Tb podemos utilizar o PostGreSQL 8.0 (agora eh nativo, tambem, para Windows) Sem pestanejar, neste tb. MSc.: Murilo Cesar Starke da Cunha Engenheiro Agrônomo [EMAIL PROTECTED] [EMAIL PROTECTED] (MSN) -Mensagem original- De: Francisco Thiago [mailto:[EMAIL PROTECTED] Enviada em: segunda-feira, 7 de março de 2005 23:01 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Qual o melhor banco de dados FREE O nome é só um, meu caro, não tenha dúvida e nem pestaneje: FIREBIRD Existe uma comunidade bem grande na internet e vários sites especializados (www.firebase.com.br, por exemplo) é isso ae :D Thiago -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Query e RecordCount
Antes de utilizar o RecordCount coloque o seguinte comando: Query.FetchAll Um abraço, Fabiano Catrinck - Programador Softguild Informática Ltda www.softguild.com.br ICQ 178241485 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Amigos, Já sei pq acontece o LOCK FILE IS GROW TOO LARGE e quero colocar uma rotina de verificação nos arquivos PDOXUSRS.NET, PDOXUSRS.LCK e PARADOX.LCK. Qual dos arquivos é o q causa esse problema e qual o tamanho maximo pra ele? []'s -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Amigo, vc poderia dizer qual a causa desse erro. Uma vez aconteceu esse erro comigo e eu fiquei louco tentando corrigi-lo, e não lembro qual foi a solução. -Mensagem original- De: Joubert Rinaldi Vieira [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 11:09 Para: Delphi 2 Assunto: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE? Amigos, Já sei pq acontece o LOCK FILE IS GROW TOO LARGE e quero colocar uma rotina de verificação nos arquivos PDOXUSRS.NET, PDOXUSRS.LCK e PARADOX.LCK. Qual dos arquivos é o q causa esse problema e qual o tamanho maximo pra ele? []'s -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Já tive esse tipo de problema. Esta dizendo que o arquivos .LCK, arquivos de lock é muito grande, feralmente isso acontece quando o relatório é muito grande. O que eu fiz: Criei duas pastas NET e PRIV junto ao sistema e configurei o NET DIR Para a pasta NET e inclui um componente chamado SESSION e configurei ele apontando para a pasta PRIV. PAULO FERNANDES PORTO ALEGRE RS [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Paulo, Sempre soube que o NET DIR tinha q ser a mesma coisa pra todas as estações... Isso q vc esta indicando é o contrario... É isso mesmo? []'s On Thu, 10 Mar 2005 11:47:05 -0300, Info Desenvolvimento [EMAIL PROTECTED] wrote: Já tive esse tipo de problema. Esta dizendo que o arquivos .LCK, arquivos de lock é muito grande, feralmente isso acontece quando o relatório é muito grande. O que eu fiz: Criei duas pastas NET e PRIV junto ao sistema e configurei o NET DIR Para a pasta NET e inclui um componente chamado SESSION e configurei ele apontando para a pasta PRIV. PAULO FERNANDES PORTO ALEGRE RS [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: 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: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro com Rave Reports
Pessoal, estou tentando criar um projeto no Rave. Insiro um Databse Conection blzinha, mas quando vou incluir um Driver Direct View ele dá o seguinte erro: Access Violation at address 027742CC in module DataLinkDBX.rvd. Write of address 0008. Alguém já teve este problema? Abraço e agradecimento aos colegas Tiago -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Isso acontece quando vc faz uma SQL dentro de um Loop ou acessa um grande volume de dados e os arquivos .LCK passam do tamanho maximo. Acho q é isso mesmo... Ou tem mais alguma coisa? []'s On Thu, 10 Mar 2005 11:19:09 -0300, Eduardo Silva ® [EMAIL PROTECTED] wrote: Amigo, vc poderia dizer qual a causa desse erro. Uma vez aconteceu esse erro comigo e eu fiquei louco tentando corrigi-lo, e não lembro qual foi a solução. -Mensagem original- De: Joubert Rinaldi Vieira [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 11:09 Para: Delphi 2 Assunto: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE? Amigos, Já sei pq acontece o LOCK FILE IS GROW TOO LARGE e quero colocar uma rotina de verificação nos arquivos PDOXUSRS.NET, PDOXUSRS.LCK e PARADOX.LCK. Qual dos arquivos é o q causa esse problema e qual o tamanho maximo pra ele? []'s -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] ERRO COM RAVE REPORTS
Pessoal, estou tentando criar um projeto no Rave. Insiro um Databse Conection blzinha, mas quando vou incluir um Driver Direct View ele dá o seguinte erro: Access Violation at address 027742CC in module DataLinkDBX.rvd. Write of address 0008. Alguém já teve este problema? Abraço e agradecimento aos colegas Tiago -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Problemas com RAVE - Preciso de Ajuda :-(
Pessoal, estou tentando criar um projeto no Rave. Insiro um Databse Conection blzinha, mas quando vou incluir um Driver Direct View ele dá o seguinte erro: Access Violation at address 027742CC in module DataLinkDBX.rvd. Write of address 0008. Alguém já teve este problema? Abraço e agradecimento aos colegas Tiago -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Servidor de Arquivos SAMBA + Paradox?
Joubert, Presumo, pelo seu e-mail, que quando os arquivos estavam numa pasta em uma máquina Windows você não tinha esse problema, certo? Então, resta saber: outros programas acessando arquivos do servidor SAMBA gozam de problemas de lentidão ou é apenas o Paradox? Uma coisa que pode ser útil para você é analisar os parâmetros do smb.conf e ajustá-los para que fiquem otimizados. Algumas sugestões: sync always strict sync strict locking socket options Eu uso socket options = TCP_NODELAY SO_RCVBUF=8192 SO_SNDBUF=8192 e aqui tudo funciona bem rápido. É certo que não uso Paradox, mas uso várias outras coisas que poderiam também dar problemas de lentidão. Para saber mais a respeito dos parâmetros use man smb.conf ou vá direto à documentação do samba. Você verá, para parte dos sockets, que consultar man setsockopt também pode ajudar. Versões do seu SO, Kernel e Samba também podem ajudar a identificar o problema. Cordialmente, Demian Lessa Salavdor - Brasil Joubert Rinaldi Vieira wrote: Amigos, Configurei um servidor de arquivos SAMBA e coloquei neles as tabelas (Paradox) do meu sistema e depois disso o sistema ficou muito lento. Demora pra abrir, pra fechar e pra rodar os relatorios. Alguem já teve esse tipo de problema? []'s -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Tem. O problema do SQL dentro de um loop é facilmente resolvido usando o prepare. Uma das cousas desse erro é o travamento da máquina, o arquivo vai inchando até chegar a 65 kb, que é o tamanho máximo para ele. - Original Message - From: Joubert Rinaldi Vieira [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 10, 2005 12:07 PM Subject: Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE? Isso acontece quando vc faz uma SQL dentro de um Loop ou acessa um grande volume de dados e os arquivos .LCK passam do tamanho maximo. Acho q é isso mesmo... Ou tem mais alguma coisa? []'s On Thu, 10 Mar 2005 11:19:09 -0300, Eduardo Silva ® [EMAIL PROTECTED] wrote: Amigo, vc poderia dizer qual a causa desse erro. Uma vez aconteceu esse erro comigo e eu fiquei louco tentando corrigi-lo, e não lembro qual foi a solução. -Mensagem original- De: Joubert Rinaldi Vieira [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 11:09 Para: Delphi 2 Assunto: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE? Amigos, Já sei pq acontece o LOCK FILE IS GROW TOO LARGE e quero colocar uma rotina de verificação nos arquivos PDOXUSRS.NET, PDOXUSRS.LCK e PARADOX.LCK. Qual dos arquivos é o q causa esse problema e qual o tamanho maximo pra ele? []'s -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília -- -- -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- MSN: [EMAIL PROTECTED] -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] função
como faço para usar essa função? function YearSpan(const ANow, AThen: TDateTime): Double; [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Socorro, erro!!!
Modifiquei os cadastros de uma das tabelas e agora quando tento executar, da o seguinte erro: Exception EWin32Error in module VCL30.DPL at 00010B7F. A Win32 API function failed. O que faço -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Exemplo: Se tu tens o teu sistema em um servidor configura o teu BDE para que o NET DIR setado para o pasta NET e assim respectivamente para as maquinas cliente, vais ter de mapear as unidade para o servidor. Agora se tens dois sistemas usando o BDE deves setar os dois para o mesmo NET DIR, ou sejaonde está sendo criado o arquivo chamado Pdoxusrs.net e o PATH para seus respectivos ALIAS. Quanto a pasta PRIV, faça que eu fiz aqui. Acrescenta um componente chamado Session1 e na propriedade PrivateDir tu direciona o caminho da pasta PRIV. Coloca o active para falso e quando começar a rodar o sistema tu passa active para true, e quando fechar retorna active para falso. Coloquei componente Session na minha tela principal, onde os usuários fazem login do sistema. PAULO FERNANDES PORTO ALEGRE RS [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
só mais uma coisinha não esquece de configurar o teu LOCAL SHARE para true, assim as modificações de hora e data do arquivo Pdoxusrs.net são atualizadas. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Before Print
Pessoal estou com um pepino que não resolvi até agora porque ele entra nessa rotina novamente, explico. Estou executando um relatório onde são gerados as faixas etárias do cadastrados, com quantidade por faixa e percentual e tem o total geral. O que ta acontecendo: Coloquei a rotina no before print do Quickreport. Quando eu gero o reLatório na tela aparece tudo certo, só que coloquei um BreakPint para saber o que tava acontecendo etive uma surpresa. Aós a impressão a rotina faz um novo calculo e assim modifica o percentual, somente o percentual. Minha pergunta existe algum macete que após mostrar na tela eu imprima o que realmente é. sem entrar novamente na rotina? PAULO FERNANDES PORTO ALEGRE RS [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Alguem conhece uma funcao no mysql ou no delphi
Alguem conhece uma funcao no mysql ou no delphi que verifique se um valor X está presente em um numero Y formado pela soma de outros numeros estilo questao de somatoria em vestibular? ex de como funfa 1 2 4 8 16 32 por exemplo se eu pegar o 2,8,32 somando fica 42 ai a função funcionaria assim: if func(2,42) then sim else nao; if func(1,42) then sim else nao; as respostas seriao sim e nao consecutivamente... estou querendo essa funcao para criar um tipo de validação (pensando alto!!!) Leandro... [ Mutuka ] __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Erro: LOCK FILE IS GROW TOO LARGE?
Já faz tempo que não uso o Paradox mas também penei com esse problema. Na época um colega mandou o documento abaixo que foi tiro e queda. []'s Technical documents from Inprise Technical Information Document (TI2993) Removing Lock file has grown too large Error Product: BDE Version: All Platform: Windows 3.1, Windows 95, Windows NT Lock file has grown too large, Decimal:9495 Hex:2517 This problem is specific to Paradox tables and can be caused in any BDE (16 or 32 Bit) application that meet some or all of the following criteria: The Executable is in the same directory as the table. The Private Directory is not correctly set or not set at all. Delphi: Having a TTable open on a paradox table and then performing multiple TQuery operations. C / C++: Having a table open with DbiOpenTable and then performing multiple queries with DbiQExec and/or DbiQExecDirect. LOCAL SHARE set to true in the BDE Configuration Utility on the System page. To solve the problem, make sure that your application has done ALL of the following: Under the directory where the executable is, create three new directories: TABLES, PRIV, and NET. Place all the tables for the application into the TABLES directory. Set the session's private directory to the PRIV directory. Take the following steps according to the software you are using. DELPHI: Session.PrivateDir := ExtractFilePath(ParamStr(0)) + 'PRIV'; C / C++: DbiSetPrivateDir(szPath); // szPath is the fully qualified path (not relative) to the PRIV directory. Set the session's network directory to the NET directory. Take the following steps according to the software you are using. DELPHI: Session.NetFileDir := ExtractFilePath(ParamStr(0)) + 'NET'; C / C++: DbiSetProp(hSes, sesNETFILE, (UINT32)szPath); // szPath is the fully qualified path (not relative) to the NET directory. // hSes is the current session handle. This can be retrieved using the DBiGetCurrSession function. If LOCAL SHARE is set to true and you are not sharing tables between different applications at the same time, change LOCAL SHARE to false. The above steps will correct the Lock File Too Large error. DISCLAIMER: You have the right to use this technical information subject to the terms of the No-Nonsense License Statement that you received with the Borland product to which this information pertains. Trademarks Copyright © 1998 INPRISE Corporation. Last modified on 4-February-1999. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Before Print
Paulo, se entendi bem nao seria o caso de controle atraves de uma variavel? isto é bem grotesco mas seria uma maneira do calculo ser feito somento uma vez. Otavio -Mensagem original- De: Info Desenvolvimento [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 14:09 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Before Print Pessoal estou com um pepino que não resolvi até agora porque ele entra nessa rotina novamente, explico. Estou executando um relatório onde são gerados as faixas etárias do cadastrados, com quantidade por faixa e percentual e tem o total geral. O que ta acontecendo: Coloquei a rotina no before print do Quickreport. Quando eu gero o reLatório na tela aparece tudo certo, só que coloquei um BreakPint para saber o que tava acontecendo etive uma surpresa. Aós a impressão a rotina faz um novo calculo e assim modifica o percentual, somente o percentual. Minha pergunta existe algum macete que após mostrar na tela eu imprima o que realmente é. sem entrar novamente na rotina? PAULO FERNANDES PORTO ALEGRE RS [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Controlar Imagens...URGENTE.......................
Eu utilizo o banco sybase com Delphi 6. Na realidade eu ainda não estou tendo nenhum problema, só quero uma sujestão de quem ja tenha feito ou visto algo parecido, pra eu poder começar o programa mais ou menos definido... obrigado JR - Original Message - From: silvajatem [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 9:49 PM Subject: [delphi-br] Re: Controlar Imagens...URGENTE... Olá! Tente ser mais especifico em sua questão, assim aumenta a possibilidade de alguem entender e responder sua dúvida. Você está tendo problemas com o que? Gravar a imagem no banco? Que banco utiliza? --- Em delphi-br@yahoogrupos.com.br, Lindolfo Junior [EMAIL PROTECTED] escreveu Olá pessoal da lista...estou com a seguinte situação : Preciso fazer um controle de imagens que são relacionadas com os meus clientes, por exemplo, o joão tem 3 RX a joana tem 2 RX. Eu preciso fazer a consulta pelo nome do paciente e se encontrar que o sistema me mostre as imagens relacionadas com o mesmo e ainda me de a opção de fazer a impressãoSerá que alguém tem uma sugestão ou viu algo parecido que possa me ajudar?? desde já agradeço a atenção de todos os colegas... abraços Junior Obs.: desculpe a insistência, mas estou precisando urgente... [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Before Print
Sim os dados são alimentados em QRLabels no QuickReport, veja abaixo a minha
rotina.
procedure TRel_FxEtaria.SummaryBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
// total de irmãs em cada faixa
QRL99.Caption:= INTTOSTR(AUX_FAIXA99);
QRL90.Caption:= INTTOSTR(AUX_FAIXA90);
QRL80.Caption:= INTTOSTR(AUX_FAIXA80);
QRL70.Caption:= INTTOSTR(AUX_FAIXA70);
QRL60.Caption:= INTTOSTR(AUX_FAIXA60);
QRL50.Caption:= INTTOSTR(AUX_FAIXA50);
QRL40.Caption:= INTTOSTR(AUX_FAIXA40);
QRL30.Caption:= INTTOSTR(AUX_FAIXA30);
QRL20.Caption:= INTTOSTR(AUX_FAIXA20);
// PERCENTUAL DAS FAIXAS
// Faixa acima de 90 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA99 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp99.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp99.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp99.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa entre 81 até 90 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA90 * 100/AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp90.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp90.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp90.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa entre 71 até 80 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA80 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp80.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp80.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp80.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa de 60 a 70 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA70 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp70.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
AUX_FAIXA70:= 0;
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp70.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção'); END;
ON EINVALIDOP DO
BEGIN
QRLp70.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 60 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA60 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp60.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp60.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp60.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 50 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA50 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp50.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp50.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp50.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 40 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA40 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp40.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp40.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp40.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 30 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA30 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp30.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp30.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção'); END;
ON EINVALIDOP DO
BEGIN
QRLp30.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa de até de 20 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA20 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp20.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp20.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp20.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
** Penso que AQUI devo colocar algo do tipo EXIT ou Print, seria isso?
end;
[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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
[delphi-br] ordenar dbgrid atraves de campo calculado
iae pessoal, blz? estou ordendando um dbgrid ao clicar no nome da coluna, mas eis que surgiu uma dúvida: se a coluna for um campo calculado, como posso fazer para ordenar por ele? vlz []'s Eduardo -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Novamente - Rave (alguem utiliza?)
Pessoal, estou tentando criar um projeto no Rave. Insiro um Databse Conection blzinha, mas quando vou incluir um Driver Direct View ele dá o seguinte erro: Access Violation at address 027742CC in module DataLinkDBX.rvd. Write of address 0008. Alguém já teve este problema? Abraço e agradecimento aos colegas Tiago -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] ordenar dbgrid atraves de campo calculado
se vc estiver usando o recurso de indices dinamicos do clientdataset naum vai conseguir a naum ser q vc crie um dataset imagem dinamicamente para liga-lo ao grid, e seus campos sejam todos do tipo fkdata, mas este dataset so servira para amostragem. []´s Bruno Lichot Gerente de Novas Tecnologias - Micrologos Equipe ClubeDelphi.NET DevMedia Group www.micrologos.com.br - www.clubedelphi.net - www.delphirio.assespro-rj.org.br - Original Message - From: juniormello [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 10, 2005 3:09 PM Subject: [delphi-br] ordenar dbgrid atraves de campo calculado iae pessoal, blz? estou ordendando um dbgrid ao clicar no nome da coluna, mas eis que surgiu uma dúvida: se a coluna for um campo calculado, como posso fazer para ordenar por ele? vlz []'s Eduardo -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Res: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi
nao sei se te ajuda... eu tenho esta função que fiz ha muito tempo que me retorna uma sequencia de bits com zeros e uns eu a uso para erros em serie,tipo vou fazer varias validações e quero informar ao usuario onde esta o erro, ai eu atribuo um valor binario para o erro (1,2,4,8,16,32,64,128) e vou somando, a soma destes me da onde foi achado erros, depois eu so conto a posição do bit aceso e vejo qual erro foi encontrado... a função e a seguinte: function ver_erro(entra:byte):string; var monta:string; sobra:integer; begin monta:=''; sobra:=entra; if sobra-128 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-128; end; if sobra-64 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-64; end; if sobra-32 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-32; end; if sobra-16 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-16; end; if sobra-8 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-8; end; if sobra-4 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-4; end; if sobra-2 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; sobra:=sobra-2; end; if sobra-1 0 then begin monta:=monta+'0'; end else begin monta:=monta+'1'; end; result:=monta; end; por exemplo no seu caso se passar pra ela o 42 ela te retorna 00101010 que sao os bits 32,8 e 2 acesos... [EMAIL PROTECTED] 600 modelos de sites profissionais - Imperdivel http://www.kitsites.com/index.php?ref=50 ---Mensagem original--- De: delphi-br@yahoogrupos.com.br Data: 03/10/05 14:40:44 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi Alguem conhece uma funcao no mysql ou no delphi que verifique se um valor X está presente em um numero Y formado pela soma de outros numeros estilo questao de somatoria em vestibular? ex de como funfa 1 2 4 8 16 32 por exemplo se eu pegar o 2,8,32 somando fica 42 ai a função funcionaria assim: if func(2,42) then sim else nao; if func(1,42) then sim else nao; as respostas seriao sim e nao consecutivamente... estou querendo essa funcao para criar um tipo de validação (pensando alto!!!) Leandro... [ Mutuka ] __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.7.1 - Release Date: 09/03/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi
Mutuka,
Faça assim, seguindo seu exemplo:
var
Soma: Integer;
Teste: Integer;
Begin
Soma := 2 + 8 + 32; 42
Teste := 2;
if (Soma AND Teste) = Teste then
ShowMessage('SIM')
else
ShowMessage('NÃO');
end;
Você pode facilmente transformar isso em uma função. Qualquer dúvida é só
falar.
[]´s
Gustavo Fujita
-Mensagem original-
De: [ Mutuka ] [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 10 de março de 2005 14:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi
Alguem conhece uma funcao no mysql ou no delphi
que verifique se um valor X está presente em um
numero Y formado pela soma de outros numeros
estilo questao de somatoria em vestibular? ex de
como funfa
1
2
4
8
16
32
por exemplo se eu pegar o 2,8,32 somando fica 42
ai a função funcionaria assim:
if func(2,42) then sim else nao;
if func(1,42) then sim else nao;
as respostas seriao sim e nao consecutivamente...
estou querendo essa funcao para criar um tipo de
validação (pensando alto!!!)
Leandro...
[ Mutuka ]
__
Converse com seus amigos em tempo real com o Yahoo! Messenger
http://br.download.yahoo.com/messenger/
--
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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/2005
--
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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
[delphi-br] Delphi 7 + Dot Net
Olá Pessal... Boa tarde.. Bom, eu estou querendo migrar para programação Delphi + Dot Net, começando primeiro com o Delhpi7 e depois indo para o Delphi 8, alguém pode me ajudar com apostila, endereço na internet que eu possa pegar alguns artigos e apostilas, dicas onde posso obter estes conhecimentos? Desde já obrigado. Cleber. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi
Gustavo, creio que isso não dará certo: veja esse exemplo: 0001 0011 = 19 1011 = 11 1000 = 8 0001 0011 = 19 1011 = 11 realizando um AND teremos 0011 = 3. Apesar de 11 fazer parte da soma de 19, se usarmos o operador AND entre eles obteremos o número 3. Gabriel. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] NextMonth
alguem conhece essa função NextMonth()??? tenhjo ela em um exemplo, mas não sei a unit q tenha ela.. se alguem puder me ajudar agradeço [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi
Opa! Desculpa, me esqueci do grande detalhe! Tem que ser sempre 2 elevado a alguma coisa 2 elevado a 0 = 1; 2 elevado a 1 = 2; 2 elevado a 2 = 4 e assim por diante... (1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, ...) []´s Gustavo Fujita -Mensagem original- De: Gabriel Ferrarini [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 16:14 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi Gustavo, creio que isso não dará certo: veja esse exemplo: 0001 0011 = 19 1011 = 11 1000 = 8 0001 0011 = 19 1011 = 11 realizando um AND teremos 0011 = 3. Apesar de 11 fazer parte da soma de 19, se usarmos o operador AND entre eles obteremos o número 3. Gabriel. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Comando no beforePrint
Alguém conhece algum comando que eu possa colocar no BeforePrint do relatório para enviar direto a impressora? ou que não passa novamente? O que ta acontecendo. Gera o relatório aparece o percentual das variáveis que foram alimentadas e quando imprime o sistema retorna para o beforeprint e calcula novamente enviando a impressora valores divido pelo total antes visto na tela. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] NextMonth
Ela só existe a partir do Delphi 6 na unit DateUtils. []s -Mensagem original- De: Alan Vieceli [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 15:13 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] NextMonth alguem conhece essa função NextMonth()??? tenhjo ela em um exemplo, mas não sei a unit q tenha ela.. se alguem puder me ajudar agradeço [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Mostrar Zero ao inves de Nulo
Das duas, uma: 1) Usar a função COALESCE() do FireBird; 2) Programar em um evento do componente utilizado para mostrar o campo como 0,00 em caso de NULL. []s -Mensagem original- De: Murilo Cunha (Yahoo) [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 15:40 Para: [EMAIL PROTECTED]; [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Mostrar Zero ao inves de Nulo Pessoal, Estou tentando fazer um relatorio com QuickReport 4.04 e não estou conseguindo formatar meus dados. Em minha tabela tenho um campo de quantidades. Este campo pode conter valores nulos (em branco). Quero q ao mostrar meu relatorio todos os registros com valores nulos em quantidade sejam mostrados como: 0,00 Como implementar isto??? Uso D7, IBX 7.08, FB 1.5.2 e QR 4.04 MSc.: Murilo Cesar Starke da Cunha Engenheiro Agrônomo [EMAIL PROTECTED] [EMAIL PROTECTED] (MSN) [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] OFF Topic: Quick report
Boa tarde!! Alguém sabe se é possível no Qreport, imprimir uma página Fixa antes dos dados, como uma folha de abertura de livro de registros. Tipo assim... Quero imprimir na primeira folha o termo de abertura de um livro de registros, após a 1a página, imprimir as folhas com os detalhes (dados), e seguidamente imprimir uma folha com o termo de encerramento do livro. Alguém sabe se tem como fazer isso no Quick. Obs: Tem que ser no QR, pois é manutenção em sistema de terceiro que utiliza esta ferramenta. D5 + QR Grato, Marcos Esteves Simão Programador de Computador - Unimed Vitória [EMAIL PROTECTED] GERIN - CODES -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Criar legendas de cores
Alguém tem alguma idéia de como eu possa criar um esquema de legendas de cores ?? Porque usando um random() acaba gerando as vezes cores muito parecidas, como tons de vermelho semelhantes, e deixando de fora cores básicas... Um detalhe, não dá para criar uma lista de constantes, porque o número de cores a escolher não dá pra definir. às vezes pode ser 2, às vezes pode ser 50... -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Comando no beforePrint
Olá, Se é alguma variável que guarda dados cumulativos.. procedure seuformulario.QuickRep1BeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin suavariavel := 0; end; Ou seja, sempre inicialize ela no BeforePrint do quickreport... Um abraço, Carlos --- Em delphi-br@yahoogrupos.com.br, Info Desenvolvimento [EMAIL PROTECTED] escreveu Alguém conhece algum comando que eu possa colocar no BeforePrint do relatório para enviar direto a impressora? ou que não passa novamente? O que ta acontecendo. Gera o relatório aparece o percentual das variáveis que foram alimentadas e quando imprime o sistema retorna para o beforeprint e calcula novamente enviando a impressora valores divido pelo total antes visto na tela. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Mostrar Zero ao inves de Nulo
Olá, select coalesce(quantidade,0) (ou seja, se for nulo mostra zero)... Se for qrdb, coloque no mask do qrdb #,##0.00, se for qrlabel FloatToStrF(quantidade, ffNumber, valor_inteiro, decimais); Um abraço, Carlos --- Em delphi-br@yahoogrupos.com.br, Murilo Cunha \(Yahoo\) [EMAIL PROTECTED] escreveu Pessoal, Estou tentando fazer um relatorio com QuickReport 4.04 e não estou conseguindo formatar meus dados. Em minha tabela tenho um campo de quantidades. Este campo pode conter valores nulos (em branco). Quero q ao mostrar meu relatorio todos os registros com valores nulos em quantidade sejam mostrados como: 0,00 Como implementar isto??? Uso D7, IBX 7.08, FB 1.5.2 e QR 4.04 MSc.: Murilo Cesar Starke da Cunha Engenheiro Agrônomo [EMAIL PROTECTED] [EMAIL PROTECTED] (MSN) [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Criar legendas de cores
Osmar, Utilize um esquema de aprovação das cores geradas. Primeiramente, separe os componentes RGB das cores. Compare o novo valor com todas as cores geradas anteriormente. Se houver uma cor anteriormente gerada com pelo menos N (N=1..3) componentes variando menos que um patamar definido por você (DELTA), gere outra cor. Você pode tanto deixar N e DELTA para serem configurados externamente, como pode oferecer valores padrão para eles. Neste segundo caso, ao invés de passar cores aleatórioa, passe-as de uma lista e teste o resultado. Vá então ajustando DELTA e N para os valores que forçam a geração de cores aleatórias distantes o suficiente. Depois que tiver chegado aos valores de N e DELTA, coloque a rotina de aprovação de cor no seu código de aprovação de cores ou como o valor padrão ou como o valor fixo. Lembrando ainda que cor = $AB0732 == R=$AB, G=$07 e B=$32 NOTA: Os valores de N e DELTA dependem, quase que certamente, da configuração de cores do ambiente do usuário (256, 32K, 64K, ...). Cordialmente, Demian Lessa Salvador - Brasil Osmar de Souza Júnior wrote: Alguém tem alguma idéia de como eu possa criar um esquema de legendas de cores ?? Porque usando um random() acaba gerando as vezes cores muito parecidas, como tons de vermelho semelhantes, e deixando de fora cores básicas... Um detalhe, não dá para criar uma lista de constantes, porque o número de cores a escolher não dá pra definir. às vezes pode ser 2, às vezes pode ser 50... -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] POR FAVOR! Consulta SQL *Ajuda
Pessoal, estou com uma consulta aqui e não consigo fazer de forma alguma, preciso de ajuda por favor. A situação é mais ou menos a seguinte. Tenho 3 tabelas com a seguinte estrutura: Tabela CENTRO_CUSTO: CEN_CODIGO | DESCRICAO 1 | MATRIZ 2 | FILIAL 1 3 | FILIAL 2 4 | FILIAL 3 7 | RATEIO DO VALOR Tabela COMPROMISSOS: COM_CODIGO | CEN_CODIGO | VALOR | DESCRICAO 1 | 2 | 150,00 | Pgto. Água 2 | 7 | 200,00 | Pgto. ISS (Rateio entre filiais) Tabela COMPROMISSOS_RATEIO COM_CODIGO | CEN_CODIGO | VALOR 2 | 1 | 60,00 2 | 2 | 40,00 2 | 3 | 50,00 2 | 4 | 50,00 O programa funciona da seguinte maneira: Ele grava todos os compromissos a pagar na tabela COMPROMISSOS, sempre indicando qual o centro de custo a qual o compromissos esta sendo pago, mas, caso o centro de custo seja 7 - RATEIO DO VALOR então, grava-se no campo VALOR da tabela COMPROMISSOS o valor total do compromisso, e na tabela COMPROMISSOS_RATEIO grava-se o valor desse compromisso com o rateio para cada centro de custo como no exemplo a cima, onde para o CODIGO 2 na tabela COMPROMISSOS foi indicado o CODIGO 7 no campo CEN_CODIGO, portanto, para o valor desse compromissos, foi feito o rateio na tabela COMPROMISSOS_RATEIO, onde cada filial foi responsavel por uma certa quantia do valor total. Bom, na verdade foi feito dessa maneira, porque o programa não foi projetado para ratear o valor entre as filias, isso apareceu depois de pronto, então teve que ser contornado o problema. Agora a dúvida é a seguinte, preciso fazer uma consulta que me mostre o valor total por filial, somando os valores da tabela COMPROMISSOS e agrupando por CENTRO DE CUSTO, porém, caso o centro de custo seja o RATEIO DO VALOR, então a consulta precisa achar esse compromisso na tabela COMPROMISSOS_RATEIO, e somar ele no valor total. Deu pra entender? Bom, se alguém tiver alguma opinião de como fazer, fico muito agradecido... Obrigado pela colaboração Anderson -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Criar legendas de cores
Valeu pela dica. Realmente não tinha pensando em separar as cores RGB. Isso pode facilitar muito as coisas... --- Em delphi-br@yahoogrupos.com.br, Demian Lessa [EMAIL PROTECTED] escreveu Osmar, Utilize um esquema de aprovação das cores geradas. Primeiramente, separe os componentes RGB das cores. Compare o novo valor com todas as cores geradas anteriormente. Se houver uma cor anteriormente gerada com pelo menos N (N=1..3) componentes variando menos que um patamar definido por você (DELTA), gere outra cor. Você pode tanto deixar N e DELTA para serem configurados externamente, como pode oferecer valores padrão para eles. Neste segundo caso, ao invés de passar cores aleatórioa, passe-as de uma lista e teste o resultado. Vá então ajustando DELTA e N para os valores que forçam a geração de cores aleatórias distantes o suficiente. Depois que tiver chegado aos valores de N e DELTA, coloque a rotina de aprovação de cor no seu código de aprovação de cores ou como o valor padrão ou como o valor fixo. Lembrando ainda que cor = $AB0732 == R=$AB, G=$07 e B=$32 NOTA: Os valores de N e DELTA dependem, quase que certamente, da configuração de cores do ambiente do usuário (256, 32K, 64K, ...). Cordialmente, Demian Lessa Salvador - Brasil Osmar de Souza Júnior wrote: Alguém tem alguma idéia de como eu possa criar um esquema de legendas de cores ?? Porque usando um random() acaba gerando as vezes cores muito parecidas, como tons de vermelho semelhantes, e deixando de fora cores básicas... Um detalhe, não dá para criar uma lista de constantes, porque o número de cores a escolher não dá pra definir. às vezes pode ser 2, às vezes pode ser 50... -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Para quem utiliza o Rave R
Desculpem minha insistencia, mas eu preciso mtttooo da ajuda do pessoal da lista. Espero que alguém já tenha passado por este problema. Pessoal, estou tentando criar um projeto no Rave. Insiro um Databse Conection blzinha, mas quando vou incluir um Driver Direct View ele dá o seguinte erro: Access Violation at address 027742CC in module DataLinkDBX.rvd. Write of address 0008. Alguém já teve este problema? Abraço e agradecimento aos colegas Tiago -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Como reconhecer letras através do Teclado ???????????????
Olá pessoal, mais uma vez venho pedir uma ajuda a vcs. Estou com dificuldade para fazer uma rotina onde eu pressione a letra D ,por exemplo, e ele dê um clique num botão. Eu consigo usar as funções de VK_F1 para esse tipo de coisa mais as letras do teclado não conseguir. Quando coloco o VK_D no evento keypress ele diz que não foi declarado ? Alguém pode me ajudar ? Agradeço antecipadamente Marx - Yahoo! Mail - Com 250MB de espaço. Abra sua conta! [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Relatório e Rede
Tenho uma aplicação que está rodando em Win XP, num servidor não dedicado e 3 estações. Nesta aplicação eu gero um relatório a partir de uma consulta SQL - em seguida o usuário visualiza o relatório e em seguida pode mandar para impressora. Acontece que, rodando no servidor a visualização do relatório ocorre sem probelmas, entretanto, se eu fizer este mesmo procedimento numa das estações, o relatório não é visualizado e o usuário não consegue clicar para imprimir em seguida, ou seja, ele aperta ESC e volta à tela anterior. Alguém poderia me orientar sobre como visualizar os relatórios nas estações da rede? Uso Delphi 5, Paradox e plataforma WinXP. Desde já, obrigado. Magno Nascimento __ TramaPaulista .:sites .:sistemas 11 4786.8167 9441.3165 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Alterar hora Windows 98
Ola, Aqui com o Windows 98 tambem ocorre. Acho que e' porque o Windows atualiza o relogio da bandeja periodicamente (talvez a cada 30s). Nao tenho certeza. Deve haver alguma rotina para dar um refresh no relogio. Fernando Cristina Orthmann wrote: Olá pessoal, Não sei o que está acontecendo, mas ao alterar a hora de um computador com windows 98, via aplicação, demora mais de 30 segundos para o relógio ser atualizado. Com o XP, minha máquina de desenvolvimento, a atualização do relógio é rápida, quase que instantânea. Estou usando o seguinte código. var newHora : TSystemTime; begin GetLocalTime(newHora); newHora.wHour := StrToInt(Copy(edtHora.Text,1,2)); newHora.wMinute := StrToInt(Copy(edtHora.Text,4,2)); SetLocalTime(newHora); end; -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.298 / Virus Database: 266.6.2 - Release Date: 04/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Imagem no Delphi
As imagens para os botoes devem conter dois desenhos, um indicando o botao ativado (normalmente colorido) e outro indicando o botao desativado (normalmente sombras cinzas), um ao lado do outro. No Delphi ajuste a propriedade NumGlyphs para 2. Veja os exemplos de imagens que vem com o Delphi, em C:\Arquivos de programas\Arquivos comuns\Borland Shared\Images\Buttons. Fernando Andre Nunes wrote: Pessoal Boa Noite, coloco uma imagem no botao e quando ponho para rodar o botao fica enable := false; e as vezes nao aparece a imagem Andre Nunes -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.298 / Virus Database: 266.6.2 - Release Date: 04/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Exemplo de Tratamentos de Erro
Bom dia Pessoal! Como faço para fazer um tratamento de erros da aplicação meu personalizado,gostaria que toda vez que ocorrer um erro aparece um Formulario padrão ,com o tipo de erro e detalhes dele ,eu não queria usar MessageDLG e nem Showmessage,alguem tem algum exemplo ou alguma idéia. Gratos a todos Edinho - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] idade atual
Crie um form com 2 edits e 1 botao e faça o teste.
function Calcula_Idade(data : string) : string;
var
ano_nasc : word;
mes_nasc : word;
dia_nasc : word;
ano_atu : word;
mes_atu : word;
dia_atu : word;
idade: shortint;
begin
decodedate(strtodate(data),ano_nasc,mes_nasc,dia_nasc);
decodedate(date,ano_atu,mes_atu,dia_atu);
idade := ano_atu - ano_nasc;
if mes_nasc mes_atu then
dec(idade)
else
if mes_nasc = mes_atu then
if dia_nasc dia_atu then
dec(idade);
result := inttostr(idade) + ' anos';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
edit2.text := calcula_idade(edit1.text);
end;
Espero ter ajudado.
- Original Message -
From: Info Desenvolvimento [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, March 10, 2005 8:18 AM
Subject: [delphi-br] idade atual
Pessoal, estouu usando uma função que eu peguei das 800 Dicas e Truques
delphi, só que quando gero o relatório tem uma pessoa que está com 71 anos
está saindo no bloco do 70 anos, Mas se troco a data do windows em 9 dias
ela saí no bloco dos 71 anos. Abaixo segue a função.
Alguem pode me ajudar? Uso Delphi 7 com Paradox. Tem algum erro?
A FUNÇÃO
{$R *.DFM}
// função idade atual
function IdadeAtual(Nasc : TDate; DTATUAL : TDate): Integer;
Var AuxIdade, Meses : String;
MesesFloat, DiasFloat : Real;
IdadeInc, IdadeReal : Integer;
begin
AuxIdade := Format('%0.2f', [(DTATUAL- Nasc) / 365.6]);
Meses := FloatToStr(Frac(StrToFloat(AuxIdade)));
if AuxIdade = '0' then
begin
Result := 0;
Exit;
end;
if Meses[1] = '-' then
begin
Meses := FloatToStr(StrToFloat(Meses) * -1);
end;
Delete(Meses, 1, 2);
if Length(Meses) = 1 then
begin
Meses := Meses + '0';
end;
if (Meses '0') And (Meses '') then
begin
MesesFloat := Round(((365.6 * StrToInt(Meses)) / 100) / 30.47)
end else
begin
MesesFloat := 0;
end;
if MesesFloat 12 then
begin
IdadeReal := Trunc(StrToFloat(AuxIdade)); // + MesesFloat;
end else
begin
IdadeInc := Trunc(StrToFloat(AuxIdade));
Inc(IdadeInc);
IdadeReal := IdadeInc;
end;
Result := IdadeReal;
end;
[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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005
--
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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] Relatório e Rede
Olá, From: Trama Paulista .:sites .:sistemas [EMAIL PROTECTED] Alguém poderia me orientar sobre como visualizar os relatórios nas estações da rede? Sei não, um dos motivos para o relatório não ser visualizado é, no micro, não haver nenhuma impressora instalada. Parece estranho, mas já aconteceu isto comigo. Saudações, Eduardo Paci Galvão Engenheiro Eletricista UFMG 1990 www.egalvao.com.br MSN: [EMAIL PROTECTED] Skype: eduardogalvao -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Problemas ao conectar MySQL com Delphi[POR FAVOR]
Olá, Me parece que o problema pode estar acontecendo por ele não estar reconhecendo a tabela que vc está querendo consultar. Verifique se o nome da tabela está certinho, se vc está selecionando o database em que a tabela está localizada. Faça um teste com a mesma consulta fora do Delphi (exemplo: com o utilitário mysql, que vem com o banco). delphi-br@yahoogrupos.com.br wrote: Assunto: Re: Problemas ao conectar MySQL com Delphi[POR FAVOR] eu já coloquei a dll(libmysql.dll) dentro da pasta system e da system32, e o erro que da é o seguinte missing query, table name or procedure. Estou usando os componentes sqlconnection , sqldataset , datasetprovider, clientdataset, e um datasource. O sqlconnection faz a conecção corretamente, mas quando vou ligar o sqldataset com o sqlconnection da um tal erro missing query, table name or procedure. espero ter conseguido passar a minha duvida .. agradeço muito quem tem tentado me ajudar .. desculpe minha ignorancia mas é que nao sou leigo em delhpi ainda.. João Paulo L.G. [EMAIL PROTECTED] - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! agora. [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Filtrar por data
Pessoal, Estou a horas tentando e nao consigo substituir as duas datas por duas variaveis ou conteudo de um Rxdatedit Olha o código procedure TFrmConsultaObr.BitBtn3Click(Sender: TObject); var Filtro, FiltroAntigo, Valor : String; FiltradoAntes: Boolean; begin FiltroAntigo := dtmDados.frequencia.Filter; FiltradoAntes := dtmDados.frequencia.Filtered; dtmDados.frequencia.Filtered := False; Filtro := 'id 0'; Filtro := Filtro + ' and Nr_Glsb = ' + dtmDados.MembrosNrGlbsb.Value; Filtro := Filtro + ' and Data = ''01/03/2005'''; --- quero colocar o valor do edit 1 aqui Filtro := Filtro + ' and Data = ''09/03/2005'''; --- e aqui do edit 2 dtmDados.frequencia.Filter := Filtro; dtmDados.frequencia.Filtered := True; dtmDados.frequencia.IndexFieldNames := 'Data'; end; No Clipper eu deito e rolo, mas no Delphi, as vezes pinta essa burrice. Alguém me salva? [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Delphi+MySQL
Amigo, neste exato momento estou iniciando um projeto em Delphi e devo usar o MySQL... poderia mandar pr mim tambm, se no fosse abuso meu? Julio Reinecken [EMAIL PROTECTED] __Vip.Net Multimdia Automao Industrial, Integrao eletro-eletrnica, Projetos personalizados, programao para os principais ambientes (DOS, WINDOWS, LINUX E WEB) MSN: [EMAIL PROTECTED] Visite nosso site: www.vipnet.fronteiradapaz.com Conhea nossa fronteira www.fronteiradapaz.com - Original Message - From: Clerton Araujo [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, February 24, 2005 11:41 AM Subject: Re: RES: [delphi-br] Delphi+MySQL Jimmy, esse software era distribuido pelo autor completamente freware. Existe at uma seo na pgina do cara, para receber donativos. Mas isso uma deciso de cada um, de fazer ou no, esse donativo. Mande uma msg em PVT pra mim, que eu te mando o arquivo de instalao, sem nenhum problema. - Original Message - From: Demian Lessa [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, February 24, 2005 11:34 AM Subject: Re: RES: [delphi-br] Delphi+MySQL Jimmy, Apesar de o MySQL-Front 2.5 ser Freeware (vide README.txt), no h qualquer referncia quanto distribuio dele e, portanto, no posso simplesmente envi-lo a voc por no ser eu o fabricante do software. Se voc conseguir encontrar os termos da licena dessa verso ou uma indicao nos fruns do MySQL-Front (http://www.mysqlfront.de/forum/) quanto aos termos de distribuio dessa verso, disponibilizarei o arquivo sem problemas. Cordialmente, Demian Lessa Salvador - Brasil Jimmy wrote: Demian, tem como vc mandar pra mim essa verso 2.5 do MySQL front, eu usava ela, mais depois de uma formatao aqui em minha mquina perdi tudo e acho essa ferramenta espetacular, eu uso a verso nova do MySQL e front e cheia de bugs. Pode mandar pro meu e-mail [EMAIL PROTECTED] Salvador Ba. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/02/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/02/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que voc faz do Yahoo! Grupos est sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] aplicações COM+
Gostaria de saber como se faz pra fazer aplicaçoes simples utilizando a tecnologia COM+(ex.: fazer uma calculadora, registrar e depois usar uma aplicação q faça referencia a esta COM+), nao achei nenhum site com informacao sobre isso, so com o dbexpress. Estou utilizando o delphi 7 e o S.O Windows XP. Obrigado a todos. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] *** AJUDAR UM INICIANTE ***
Pessoal, sou iniciante e estou prestes a concluir minha primeira rotina de cadastro. Tenhos duas dúvidas. 1 - No botão gravar, além dos comandos TableBancos.Post; BitBtnGravar.Enabled:=False . gostaria que nesse mesmo botão onde estão estes comandos, antes de gravar ele verificasse se o DBEditNome está vazio ou não, para que ele não consiga gravar o cadastro em branco. 2 - Coloquei do lado do DBEditCodigo, um botãozinho para que qdo o usuário clique sobre ele, abra uma janela para que seja efetuada uma consulta caso ele queira ir diretamente para um determinado código, li em alguma apostila sobre InputQuery, como utilizo. Espero ajudas Obs: = Estou usando o Paradox. Mais uma coisa, alguém de vcs possuem mais ícones para serem usados em aplicações. Cristiano. _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] ***AJUDA INICIANTE***
Olá pessoal como sou iniciante, ainda estou encontrando dificuldades. Gostaria de colocar dentro de um botão uma função que abrisse uma caixa de digitação (acho que inputquery) e nela fosse digitado o código e ele localizasse o código em um banco de dados. Como fazer? O campo código está definido como autoincle alguma coisa... Ah, gostaria também que esse botão fosse equivalente a tecla f2 por exemplo Aguardo ajuda... _ MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Alguem conhece uma funcao no mysql ou no delphi
Olá,
Vc pode usar um and do número com a potência de 2 pra
verificar se pertence ou não. Algo do tipo:
if num1 and num2 = num2 then
ShowMessage('Pertence')
else
ShowMessage('Nao Pertence');
Importante fazer um teste antes pra verificar se num2
é realmente uma potência de 2.
--- delphi-br@yahoogrupos.com.br escreveu:
Assunto: [delphi-br] Alguem conhece uma funcao no
mysql ou no delphi
Alguem conhece uma funcao no mysql ou no delphi
que verifique se um valor X está presente em um
numero Y formado pela soma de outros numeros
estilo questao de somatoria em vestibular? ex de
como funfa
1
2
4
8
16
32
por exemplo se eu pegar o 2,8,32 somando fica 42
ai a função funcionaria assim:
if func(2,42) then sim else nao;
if func(1,42) then sim else nao;
as respostas seriao sim e nao consecutivamente...
estou querendo essa funcao para criar um tipo de
validação (pensando alto!!!)
João Paulo L.G.
[EMAIL PROTECTED]
Yahoo! Mail - Com 250MB de espaço. Abra sua conta!http://mail.yahoo.com.br/
--
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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
[delphi-br] Livro de OOP
Alguém conhece um bom livro de OOP usando Object Pascal? Agradeço qualquer sugestão. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Before Print
Depois do AfterPrint da banda Summary, zere as variáveis.
Espero ter ajudado.
- Original Message -
From: Info Desenvolvimento [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, March 10, 2005 2:57 PM
Subject: Re: [delphi-br] Before Print
Sim os dados são alimentados em QRLabels no QuickReport, veja abaixo a minha
rotina.
procedure TRel_FxEtaria.SummaryBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
// total de irmãs em cada faixa
QRL99.Caption:= INTTOSTR(AUX_FAIXA99);
QRL90.Caption:= INTTOSTR(AUX_FAIXA90);
QRL80.Caption:= INTTOSTR(AUX_FAIXA80);
QRL70.Caption:= INTTOSTR(AUX_FAIXA70);
QRL60.Caption:= INTTOSTR(AUX_FAIXA60);
QRL50.Caption:= INTTOSTR(AUX_FAIXA50);
QRL40.Caption:= INTTOSTR(AUX_FAIXA40);
QRL30.Caption:= INTTOSTR(AUX_FAIXA30);
QRL20.Caption:= INTTOSTR(AUX_FAIXA20);
// PERCENTUAL DAS FAIXAS
// Faixa acima de 90 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA99 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp99.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp99.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp99.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa entre 81 até 90 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA90 * 100/AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp90.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp90.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp90.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa entre 71 até 80 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA80 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp80.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp80.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp80.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa de 60 a 70 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA70 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp70.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
AUX_FAIXA70:= 0;
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp70.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção'); END;
ON EINVALIDOP DO
BEGIN
QRLp70.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 60 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA60 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp60.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp60.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp60.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 50 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA50 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp50.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp50.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp50.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 40 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA40 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp40.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp40.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp40.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa até 30 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA30 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp30.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp30.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção'); END;
ON EINVALIDOP DO
BEGIN
QRLp30.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
// Faixa de até de 20 anos
TRY
AUX_FAIXA_PERC:= AUX_FAIXA20 * 100 / AUX_FAIXA_TOTAL;
AUX_FAIXA_PERC:= Round(AUX_FAIXA_PERC * 100) / 100;
QRLp20.Caption:= FLOATTOSTR(AUX_FAIXA_PERC)+ '%';
EXCEPT
ON EDIVBYZERO DO
BEGIN
QRLp20.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
ON EINVALIDOP DO
BEGIN
QRLp20.Caption:= '0%';
SHOWMESSAGE('Nenhuma Irmã encontrada na seleção');
END;
END;
** Penso que AQUI devo colocar algo do tipo EXIT ou Print, seria isso?
end;
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Re: [delphi-br] compactador de executável
Olá, Sem querer defender a idéia com unhas e dentes, só acho que, em uma rede lenta, o tempo de se transferir um executável grande pela rede é maior do que o tempo de se descompactá-lo. Novamente, não utilizei exaustivamente a ferramenta e, nas poucas vezes que utilizei, nunca encontrei problemas. Acredito que para redes Fast Ethernet em diante a compactação não valha a pena. --- delphi-br@yahoogrupos.com.br escreveu: Assunto: RES: compactador de executável Tempo de carga mais rápido Se você rodar o executável apenas, o tempo de carga necessário, é o tempo para você carregar o .exe Agora com um compactador, o tempo de carga seria o tempo de carga para carregar o compactado + o tempo para descompactar ele + o tempo de execução do .exe descompactado. Mas como eu já disse, já tive muitos problemas desagradáveis nas listas, ao expor meu ponto de vista a respeito disto. Hoje eu não discuto compactadores de exe com mais ninguem. Cada um faz o que bem entender de seus projetos. João Paulo L.G. [EMAIL PROTECTED] ___ Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Livro de OOP
www.livrosdeprogramacao.com.br Livro: Programação Orientada a Objetos Usando Delphi Autor: Isaias Camilo Boratto Eu tenho e aprovo. A edição do livro inclusive foi revisada e atualizada! []s -Mensagem original- De: Paulo [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 10 de março de 2005 17:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Livro de OOP Alguém conhece um bom livro de OOP usando Object Pascal? Agradeço qualquer sugestão. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 09/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Fw: consulta aos dados
Mais uma vez implorando pela boa ajuda de alguém ---Mensagem original--- De: Catiúscia A. Barrilli da Cruz Data: 03/08/05 00:11:54 Para: Delphi-Br Assunto: consulta aos dados Boa Noite ! Realmente, preciso da ajuda de vcs continuo tendo dificuldades pra não gravar dados repetidos... Estou usando: DataSet + Provider + ClientDataSet + DataSource Se eu gravar, por exemplo, um opcional de veículo: CODIGO = R8A OPCIONAL = VIDRO ELETRICO pela primeira vez, verificando se existe outro igual, ele faz certo mas se eu resolver alterar a descrição do opcional e preservar o código ele diz q o código já existe PQ e se eu estiver alterando e mudar o código para um q já existe ele passa batido pela verificação também, e grava. Preciso muito de ajuda... não sei onde errei... Cati [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro com Parametro em IBQuery no Delphi7
Ola, Veja se voce enumerou os parametros corretamente. Se existem 5 parametros, entao vai de 0 a 4. Fernando Cleber wrote: Boa tarde... Estou com um problema num programa q estou fazendo... Criei 5 parametros numa IBQuery para firebird e qdo vou preenche-los dá uma mensagem de erro. O erro é o seguinte: 'List index out of bounds (0)'. Se alguém puder me ajudar ficarei muito grato. Cleber. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.298 / Virus Database: 266.6.2 - Release Date: 04/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Delphi 2
Ola, O Delphi 3 e o Delphi 4 ja sairam em revistas, completos e licenciados para uso total, de acordo com as mesmas. Veja nos sites da editora Europa e CD Expert. Fernando Marcelo Almeida wrote: leomarcsys wrote: Algum tempo atrás li que a versão 2 do delphi passou a ser livre! Informação errada. Nenhuma versão do delphi é livre. O que existe é : - Delphi personal - falta diversos compoenentes e vc não pode cobrar nada por nenhum software que tenha sido desenvolvido nele. - kylix open edition - tambem falta diversos componentes, vc pode cobrar por software desenvolvido nele, mas tem que distribuir os fontes sob licenciamento GPL. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.298 / Virus Database: 266.6.2 - Release Date: 04/03/2005 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] GRÁFICO DE REGISTRO
OLÁ, GOSTARIA DE SABER O SEGUINTE, ESTOU FAZENDO UM SISTEMA PARA GERENCIAR ESCALAS, OU SEJA, TENHO 8 FUNCIONÁRIOS E GOSTARIA DE GERAR UM GRÁFICO PARA SABER QUANTAS VEZES CADA UM APARECE NA ESCALA... OBRIGADO, JÁ TENTEI USAR O DBGRID E NADA [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Banco de dados Access
so quando coloco a senha no banco de dados da um erro ao abrir o projeto, pois ele não tem acessoquando configurei para dar acesso ele pede todas as vezes que o cliente entra no programa. - Original Message - From: Clayton Bonelli To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 10, 2005 8:55 AM Subject: Re: [delphi-br] Banco de dados Access Abra o seu banco de dados (arquivo com a extensao MDB) pelo MS-ACCESS e coloque uma senha no banco. Desta forma o usuario nao poderah abrir o seu banco. - Original Message - From: Hudson BHTE [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, March 09, 2005 1:32 PM Subject: [delphi-br] Banco de dados Access Galera Como eu faço para reter o usuario não ter acesso ao banco de dados access. por exemplo: tenho um sistema com ADO no banco de dados access... Neste sistema, o usuario tem q digitar a sua senhamas se ele entrar no banco access ele terá acesso a todas informação? alguem já teve essa duvida? -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.7.1 - Release Date: 9/3/05 -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 -- Internal Virus Database is out-of-date. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] *** AJUDAR UM INICIANTE ***
1.
Antes do TableBancos.Post, insira IF empty(DBEDITNOME.TEXT) THEN
DBEDITNOME.SETFOCUS;
* FUNCAO EMPTY
DEFINA
{ Verifica se a string esta vazia }
function Empty( Dados: string ): boolean;
** LISTAGEM DA FUNCAO
function Empty( Dados: string ): boolean;
begin
if ( Length( Trim( Dados ) ) = 0 ) or
( Trim( Dados ) = ' / /' ) then
Empty := True
else
Empty := false;
end;
*FIM DA FUNCAO
2.
EU UTILIZO A FUNCAO ABAIXO:
e_filtro:=InputBox('Filtragem por função','Informe o código da
função','');
espero que te ajude.
sds
Auriston
- Original Message -
From: Cristiano Rodrigo Gomes
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, March 10, 2005 2:15 PM
Subject: [delphi-br] *** AJUDAR UM INICIANTE ***
Pessoal, sou iniciante e estou prestes a concluir minha primeira rotina de
cadastro.
Tenhos duas dúvidas.
1 - No botão gravar, além dos comandos
TableBancos.Post;
BitBtnGravar.Enabled:=False
.
gostaria que nesse mesmo botão onde estão estes comandos, antes de gravar
ele verificasse se o DBEditNome está vazio ou não, para que ele não consiga
gravar o cadastro em branco.
2 - Coloquei do lado do DBEditCodigo, um botãozinho para que qdo o usuário
clique sobre ele, abra uma janela para que seja efetuada uma consulta caso
ele queira ir diretamente para um determinado código, li em alguma apostila
sobre InputQuery, como utilizo.
Espero ajudas
Obs: = Estou usando o Paradox.
Mais uma coisa, alguém de vcs possuem mais ícones para serem usados em
aplicações.
Cristiano.
[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:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] ninguen sabe Duvida (OGLPanel)
- Original Message - From: Hudson BHTE To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 08, 2005 7:18 PM Subject: [delphi-br] Duvida (OGLPanel) Alguem pode me informar ou me passar endereços aonde posso baixar apostila q fale sobre OGLPanel ou livros que posso comprar. tenho desejo de aprender fazer jogos em 3D no delphi. Grato -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.6.2 - Release Date: 4/3/2005 [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] aplicações COM+
Seguinte, No portal do assinante ClubeDelphi.Net na minha coluna tem 4 materias falando somente sobre isso, e nas edições 56 e 58 da Revista clubeDelphi, possui duas materias mostrando o COM+ quase q em sua totalidade. Mas em resumo, o q vc precisa fazer e criar um servidor COM+, e criar na typelibray os metodos referentes as operação da calculadora e depois criar um cliente invocando esses metodos... Estou a sua disposição para no q for necessário. Pode me contactar em PVT se desejar. []´s Bruno Lichot Gostaria de saber como se faz pra fazer aplicaçoes simples utilizando a tecnologia COM+(ex.: fazer uma calculadora, registrar e depois usar uma aplicação q faça referencia a esta COM+), nao achei nenhum site com informacao sobre isso, so com o dbexpress. Estou utilizando o delphi 7 e o S.O Windows XP. Obrigado a todos. -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro ADO + Delphi, loucura, socorro, hehehe
HI, blz galera tou aqui quebrando a cabeça de um sistema que tenho com Access e Delphi utilizando ADO tá dando esse erro O provedor atual não oferece suporte para a interface necessária à funcionalidade Índice a tabela tem 2 campos e eu coloquei os 2 como chave primaria o erro acontece quando uso o Seek if tabela.seek(ArrayVarOf([v1, v2], SoFirstEQ) then dá erro nisso o interessante é que essa mensagem de erro só acontece quando eu tou no Delphi, quando executo o sistema pelo explorer, essa msg não aparece, mas também ele não localiza, e a chave atende, era para dizer que achou uso XP prof, o delphi 5 tá com o ADO atualizado eu nunca que tinha visto esse erro no 98 tive que usar o locate enquanto eu num resolvo essa parada, hehehe é preciso eu atualizar o SP2, atualizar o MDAC ? o que fazer ? hehehe enquanto eu tava digitando eu tava no windows update e já vi coisa relacionado a ADO Atualização de segurança para o Microsoft Data Access Components (KB832483) vou mandar esse email e qialquer cosia digo se funcionou e desde já agradeço Intel + Paulo Alexsandro - dprogrammer O retorno do programador http://dprogrammer.cjb.net - Delphi NSBasic (PalmOS) Orkut - Comunidade Sou Programador http://www.orkut.com/Community.aspx?cmm=553377 Yahoo! Mail - Com 250MB de espaço. Abra sua conta!http://mail.yahoo.com.br/ -- 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
