RES: [delphi-br] MDO
Olá caros colegas, Eu uso o MDO e não ocorre estes problemas comigo não. Antes de instalar, vou até o library path e adiciono os subdir's design e runtime. Daí abro o .BPG, build all projects, abro o DCL e install. Não tenho esses problemas ao reiniciar o delphi não. []'s Alexandre Oliveira Campioni Analista de Sistemas A-Tecnologia e Sistemas de Informacao Ltda. Sao Joaquim da Barra - Sao Paulo - Brazil [EMAIL PROTECTED] -Mensagem original- De: Petiz [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 25 de janeiro de 2005 23:41 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] MDO Eu também estou ainda com esse mesmo problema, só que no DELPHI 7... O que esta acontecendo: Baixei O MDO... Segui todos os passo para a instalação no DELPHI 7 1. Desinstalei qualquer versão anterior do MDO. 2. Apaguei todos os arquivos .BPL relacionados ao MDO existentes. 3. Abri o arquivo MDO_D7.BPG. 4. Fui até Project | Build All Projects 5. abri DCLMDO70.DPK, e cliquei em Install === Deu o seguinte erro: Can´t load package c:\instalações\borland\delphi7\Projects\Bpl\DCLMDO70.bpl. Não é possível encontrar um dos arquivos de biblioteca necessário para executar esse aplicativo. 6. Fui em Tools | Environment Options | Library e setei o BPL e DCP Output Directory para : C:\Brain\Componentes\MDO-0.8.8\Source E consegui instalar O problema é que quando eu fecho o DELPHI ele perde tudo... Quando eu entro novamente, dá o seguinte erro: Can´t load package C:\Brain\Componentes\MDO-0.8.8\Source\DCLMDO70.bpl. Não é possível encontrar um dos arquivos de biblioteca necessário para executar esse aplicativo. Do you want to attempt to load this package the next time a project is loaded? YES/ NO Se conseguires solução, me avisa Um abraço. Petiz - Original Message - From: Mario Scavoni To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 25, 2005 11:45 PM Subject: [delphi-br] MDO Companheiros, Alguém se deparou com este problema logo na instalação? Can´t load package c:\...\Delphi6\Projects\BPL\DCLMDO60.BPL Não é possível encontrar um dos arquivos de biblioteca necessário para executar este aplicativo. []'s Mario [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] Perguntinha básica (DBX)
O campo com o subselect.. Adicione ele no Field Editor e retire da opção ProviderFlags todas as opções Com isso acredito que funcione... (faça isso no CDS e no SQLQuery) Espero ter ajudado Thiago - Original Message - From: Alan [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 25, 2005 3:25 PM Subject: [delphi-br] Perguntinha básica (DBX) começei a usar o DBX agoraeu tenho uma SQLQuery , um DataSetProvider e um ClientDataSet faço uma selecção, tipo Select T.CODALGUMACOISA, T.CODOUTRACOISA, T.DESCRICAO, (Select DESCRICAO from OUTRATABELA where CODOUTRACOISA = T.CODOUTRACOISA) as CODOUTRACOISA_D from TABELA T é mais ou menos issoquando não tinha um SubSelect funcionava blz apenas com um applyupdates, alguem pode me dar uma dica como eu faço agora??? com esse subselect no meio? [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
[delphi-br] Criar query em run time
Bom dia a todos ! Alguem sabe como faço para criar uma query em tempo de execuçao. Estou a utilizar ibquery(paleta interbase). -- 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] Imprimir NF modo DOS
Olá amigo, vc poderia me fornecer esse componente pois reciso fazer uma rotina de impressão direto para a impressao mas estou com dificuldades. On Tue, 25 Jan 2005 17:17:56 -0200, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote: Pessoal, Há algum componente de impressão DOS que possibilite montar o relatorio em modo Design, tipo reportbuilder ou quickreport? Preciso disse para imprimir notas fiscais. Eu desenvolvi um componente para impressão DOS, só que ele é muito manual, e de difícil uso. Preciso de uma coisa mais avançada, para me poupar tempo. Desde já agradeço qualquer ajuda. Leandro -- 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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Impressao de etiquetas em impressora termica
No manual da impressoa vem explicando como se deve programar amigo, já fiz um sistema que trabalhava assim, porém não se encontra mais comigo e não me lembro como foi feito, só sei que vc passa comando texto direto para a porta daimpressora ela traduz e imprime. No manuel vc tem tudo que quer. On Tue, 25 Jan 2005 15:42:04 -0300, octavio.matheus [EMAIL PROTECTED] wrote: Estou fazendo uma rotina (delphi 7) para imprimir etiquetas (sem cod. de barra, somente texto) em uma impressora termica (Intermec EasyCoder) sei que ela é compativel com a linguagem EPL, alguem poderia me ajudar? Obrigado = Octávio Matheus Filho Analista de Sistemas Fone: (19) 9726-3243 www.websuportes.com.br = [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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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 CRIAR DLL???
Olá amigos estou querendo aprender a criar uma dll com funções que sempre costumo usar, alguém poderia me dizer como faço isso. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Livros fiscais custo de manutencao
Pessoal necesito fazer o programa de livros fiscais para 2 clientes Que querem fazer os livros internamente, minha dúvida he o quanto Deberia incrementar em R$ minha manutenção mensal, nunca fiz nada Neste sentido e estou meio perdido quanto a custos Santiago -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/1/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] Problema com Master-Detail
Bom dia galera. Surgiu um probleminha meio urgente aqui. Estou ulizando componentes DBX com ClientDataSets. Estou fazendo as validações dos dados tanto do mestre como do detalhe no evento BeforeUpdateRecord do DataSetProvider porém o Delphi faz o Post do Mestre antes dos detalhes e se houver algum erro de validação nos detalhes os dados do mestre já foram gravados no banco de dados e não tenho como cancelar a operação. Como vocês lidam com esta situação? Será que o jeito vai ser fazer todas as verificações no momento em que o usuário clicar no botão GRAVAR antes de chamar o ApplyUpdates?? [ ]'s Rodrigo Schiavo -- 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] COMO CRIAR DLL???
F1 dentro do Delphi, tem exemplos e explicações sobre criação de DLLs, da uma olhada lá, se ficar alguma duvida estaremos aqui para sana-las. []´s Rodrigo O. Farias - Original Message - From: Emerson Moreno To: delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 9:43 AM Subject: [delphi-br] COMO CRIAR DLL??? Olá amigos estou querendo aprender a criar uma dll com funções que sempre costumo usar, alguém poderia me dizer como faço isso. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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!. [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] Status da Tabela
Caros colegas, Utilizo Delphi 5 com MsAccess e ADO, abro um formulário com uma tabela em que preciso editar/inserir ítens. O CursorLocation da minha tabela está com clUseServer. Como faço para saber se a tabela está em edição por outro usuário ? Vou fazer uma rotina que o sistema fique aguardando a liberação da tabela, mas para isso preciso saber o status da mesma. Como fazer ? Obrigado, Luiz [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] COMO CRIAR DLL???
Ok amigo, vou tentar olhar, qualquer coisa falo com vcs novamente. Obrigado. On Wed, 26 Jan 2005 09:48:39 -0200, Rodrigo Othavio Farias [EMAIL PROTECTED] wrote: F1 dentro do Delphi, tem exemplos e explicações sobre criação de DLLs, da uma olhada lá, se ficar alguma duvida estaremos aqui para sana-las. []´s Rodrigo O. Farias - Original Message - From: Emerson Moreno To: delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 9:43 AM Subject: [delphi-br] COMO CRIAR DLL??? Olá amigos estou querendo aprender a criar uma dll com funções que sempre costumo usar, alguém poderia me dizer como faço isso. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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!. [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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Validar ano
Bom dia pessoal!!! Eu tenho um campo Edit em que o usuário digita o ano, queria saber se tem como verificar se o ano que ele digitou é válido... Obrigado Abração Erika -- 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] Validar ano
Defina ano válido. []s -Mensagem original- De: Erika [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 08:14 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Validar ano Bom dia pessoal!!! Eu tenho um campo Edit em que o usuário digita o ano, queria saber se tem como verificar se o ano que ele digitou é válido... Obrigado Abração Erika -- 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 --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004 -- 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] Dúvida sobre o clientdataset
Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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] Problema com Master-Detail
Olá Rodrigo!
Tudo bem? Espero que sim
Veja bem, a melhor forma de fazer o mestre - detalhe com DBX e CDs é da
seguinte forma:
SQLMestre
Select * from Mestre
SQLDetalhe
Select * from Detalhe
where campo_fk = :campo_pk // Este campo deve ter o MESMO nome do campo
chave na tabela Mestre
Feito isso, adicione um DataSource ao seu DM..e faça o seguinte
TDataSource
DataSet = sqlMestre
E na propriedade DataSource do sqlDetalhe aponte para o DataSource criado!
Vóilà! está criado o mestre detalhe...
Adicione um DataSetProvider e aponte a propriedade DataSet para o
SQLMestre...
Adicione um Cds e aponte a propriedade Provider para o Provider criado
anteriormente. Adicione todos os campo.. Observe dentre os campos, aparecerá
um sqlDetalhe.
Adicione outro dataset... e na propriedade DataSetFields, infome o
sqlDetalhe que aparecerá na listagem...
Agora... Detalhe... Em aplicações Multicamadas (SOAP no meu caso) só isso
não funcionou... tive de escrever o seguinte método no BeforeUpdateRecord
const
{$J+} // Ativa constantes tipadas
qg:Integer = -1;
{$J-}//Desativa constantes tipadas
begin
if UpdateKind in [ukInsert] then // Repare que executo isso só na
Inserção.. em edição, o CDS já atribui o valor de chave automaticamente
begin
if SourceDS = sqlCad_Crediario then // Se é o mestre...
begin
UpdateRecordAutoInc (Sender,SourceDS,DeltaDS,UpdateKind,Applied,
DeltaDS.FieldByName('CCRED_CODIGO').Index); // procedure de auto
incremento
qg := DeltaDS.FieldByName('CCRED_CODIGO').NewValue // armazena o valor
de chave na constante
end
else if qg -1 then
DeltaDS.FieldByName('CCRED_CODIGO').NewValue := qg; // chave nos
detalhes
end;
É isso ae.. espero ter ajudado
- Original Message -
From: Rodrigo Schiavo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 9:52 AM
Subject: [delphi-br] Problema com Master-Detail
Bom dia galera.
Surgiu um probleminha meio urgente aqui.
Estou ulizando componentes DBX com ClientDataSets.
Estou fazendo as validações dos dados tanto do mestre como do detalhe no
evento BeforeUpdateRecord do DataSetProvider porém o Delphi faz o Post
do Mestre antes dos detalhes e se houver algum erro de validação nos
detalhes os dados do mestre já foram gravados no banco de dados e não
tenho como cancelar a operação.
Como vocês lidam com esta situação?
Será que o jeito vai ser fazer todas as verificações no momento em que o
usuário clicar no botão GRAVAR antes de chamar o ApplyUpdates??
[ ]'s Rodrigo Schiavo
--
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] Validar ano
Depende do contexto da utilização.
Considerando um ano válido os anos entre 1900 e hoje (2005), você
poderia fazer uma verificação assim:
ano := StrToInt(Edit1.Text);
if (ano = 1900) and (ano = YearOf(Now)) then
ShowMessage('ano válido')
else
ShowMessage('ano inválido');
--- Em delphi-br@yahoogrupos.com.br, Rubem Rocha [EMAIL PROTECTED] escreveu
Defina ano válido.
[]s
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 08:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Validar ano
Bom dia pessoal!!!
Eu tenho um campo Edit em que o usuário digita o ano, queria saber
se tem como verificar se o ano que ele digitou é válido...
Obrigado
Abração
Erika
--
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
---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004
--
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] Validar ano
Pq vc não usa um SpinEdit, aí é só configurar o valor minimo (1900), valor máximo (2050), o incremento (1) e marcar como false a propriedade EditorEnabled, aí vc terá anos válidos. Abraço. - Original Message - From: Erika [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 9:14 AM Subject: [delphi-br] Validar ano Bom dia pessoal!!! Eu tenho um campo Edit em que o usuário digita o ano, queria saber se tem como verificar se o ano que ele digitou é válido... Obrigado Abração Erika -- 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] Status da Tabela
Prezado Luiz, Uma tabela em qualquer Banco de dados Relacional ou Desktop, não possue estados. A tabela em si, náo entra em edição, inserção, etc. Estes estados são propriedades definidas pelos objetos de acesso do DELPHI como o TQuery, TADOQuery, etc, etc. Como estes estados se referem ao estado dos objetos no projeto, não existe como saber se um outro executavel em uma outra máquina colocou uma query em edição. Porém, se vc estiver usando instruções SQL puras, vc pode usar os comandos BEGIN TRANSACTION e END TRANSACTION para garantir q ninguém usa a tabela simultâneamente. Espero ter ajudado. [ ]'s Rodrigo - Original Message - From: Depto de Informatica [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 9:59 AM Subject: [delphi-br] Status da Tabela Caros colegas, Utilizo Delphi 5 com MsAccess e ADO, abro um formulário com uma tabela em que preciso editar/inserir ítens. O CursorLocation da minha tabela está com clUseServer. Como faço para saber se a tabela está em edição por outro usuário ? Vou fazer uma rotina que o sistema fique aguardando a liberação da tabela, mas para isso preciso saber o status da mesma. Como fazer ? Obrigado, Luiz [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
[delphi-br] Formulario em DLL
Povo .. Eu tenho uma dll que tem um formulario e um metodo que quando chamado, cria o formulario e passa o objeto criado para quem o chamou. Porem, quando eu dou um freelibrary, o objeto e destruido ... existe alguma maneira de manter o objeto criado depois que eu dou um freelibrary? Eu tinha pensado que se o form tivesse um Assign como a StringList tem seria mais facil, mas nao existe tal comando ... Rafael Colucci [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 query em run time
var Query : TIBQuery; begin Query := nil; Query := TIBQuery.Create(Query); Query.Database:= Database; Query.Transaction := Database.DefaultTransaction; onde Database e um componente do tipo IBDatabase. []'s Aline - Original Message - From: acolombobermudez To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 9:33 AM Subject: [delphi-br] Criar query em run time Bom dia a todos ! Alguem sabe como faço para criar uma query em tempo de execuçao. Estou a utilizar ibquery(paleta interbase). -- 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] Dúvida sobre o clientdataset
sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: 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!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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] ClientDataSet Carregar os dados com duas instruções SQl
Existe alguma forma de carregar os dados em um
ClientDataSet com duas instruções SQL?
Explicando:
Estou usando:
Delphi 7
Firebird 1.5.2
DBExpress
SQLDataSet+DataSetProvider+ClientDataSet
Usando apenas uma instrucao SQL no ClientDataSet,
quando executa o ClientDataSet.Open demora para
retornar os dados, inviabilizando a aplicação,
porque a instrução SQL tem diversos JOIN.
Então fiz um teste fazendo em duas instruções SQL,
ficou emeditado a execução.
Um exemplo simplificado:
Na primeira instrução SQL traz apenas os nomes dos produtos.
Na segunda instrução SQL traz as quantidades de cada produto.
Na segunda instrução SQL estou fazendo um loop com os
comandos:
SQL.First;
While not ClientDataSet.Eof do
begin
ClientDataSet.Edit;
ClientDataSet.FieldByName('QUANTIDADE').AsInteger := Quantidade;
ClientDataSet.Post;
SQL.Next;
end;
Desta forma ficou imetiata para carregar os dados para o ClientDataSet,
mas existe um efeito colateral, pois assim, a quantidade vai para o Delta,
existe alguma forma de limpar o Delta, mantendo a quantidade no
ClientDataSet?
Existe alguma outra forma de carregar os dados para o ClientDataSet em
duas instruções SQL?
Alguma sugestão?
[]s
Paulo Geloramo
--
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] Como instalar o FireBird em um Windows 98
Marcelo, Tente verificar as permissões de rede do Windows. Geralmente quando todos os micros rodam 98, ou todos rodam 2K, não é necessário quase nenhuma configuração. Mas ao mesclar em uma rede 98/2K, j´´a tive alguns probleminhas com permissão. O mesmo recurso que eu conseguia utilizar no micro com win2k, eu tentava utilizar no micro ao lado, utilizando win98 e recebia uma bela mensagem de permissao negada. Talvez não seja esse o seu caso. Manda a mensagem prá lista - fica mais fácil tentar identificar o problema. Saudações, Cleber - Original Message - From: Marcelo Carvalho [EMAIL PROTECTED] To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Sent: Monday, January 24, 2005 4:02 PM Subject: [delphi-br] Como instalar o FireBird em um Windows 98 Pessoal, Semana passa enviei uma pergunta para o grupo a respeito de um problema que me aconteceu, fui instalar o FireBird em uma máquina Windows 98 e não consegui fazer conexão com o banco de dados. Foi revisado caminho, usuário entre outras coisas. Em máquinas com Windows 2000 ou XP funciona de primeira. Já tive um problema parecido com este a muito tempo atráz e a única solução foi instalar o Interbase. Não gostaria de fazer isso novamente, visto que a versão 1.52 já está com algumas funções que não existem no Interbase. Atenciosamente, Marcelo Carvalho Essa mensagem, incluindo seus anexos, tem caráter confidencial e seu contéudo é restrito ao(s) destinatário(s) da mensagem. Qualquer uso nao autorizado, replicaçao ou disseminaçao desta mensagem ou parte dela é expressamente proibido. Esse e-mail foi certificado contra virus. ISCMPA - Irmandade da Santa Casa de Misericórdia de Porto Alegre [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
[delphi-br] Impressão de etiquetas no crystal reports
Preciso fazer a impressão de etiquetas no crystal 9, alguém utiliza esse tipo de impressão no crystal ? Obrigado. Douglas - CPD SISTEMAS - Torres ( Ramal 225 * [EMAIL PROTECTED] * [EMAIL PROTECTED] [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] Identificar o tipo da Aplicação
Leandro, Sua pergunta não está muito clara. O que você quer saber? Se o que você quer é abrir algum arquivo com a aplicação correta, a melhor forma que eu conheço é utilizando a instrução winexec, que utiliza o programa registrado para aquele tipo de arquivo (word se for um arquivo .doc, excel se for .xls...). Se não é isso o que você quer, explique melhor qual a sua duvida... Saudações, Cleber - Original Message - From: Leandro Ferreira [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, January 24, 2005 11:34 AM Subject: [delphi-br] Identificar o tipo da Aplicação Olá Amigos, Gostaria de saber como faço para qdo pressiono um botão o sistema identificar se o q ele leu é um arquivo .EXE ou se é um site, para que ele possa chamar os programas correspondentes ao tipo de aplicação q desejo. Obrigado a todos pela ajuda. -- Leandro Ferreira Desenvolvedor - Tecnologia Tel/Fax: +55 48 2106-5698 ICQ# 147470848 http://www.nexxera.com NEXXERA Tecnologia e Serviços S.A. Seu Ambiente Eletrônico de Negócios -- 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] Pesquisa SQL
utilize algo como
NOME_PRODUTO like '%parametro1%' and NOME_PRODUTO like '%parametro2%'
On Wed, 26 Jan 2005 05:18:11 -, fabianojd [EMAIL PROTECTED] wrote:
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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
--
Luiz Eduardo D. de Araujo
[EMAIL PROTECTED]
-
f2e Consultoria em Redes e Software Livre
www.f2e.org
-
Rio de Janeiro - RJ - Brasil
ICQ: 77662781
Yahoo! Messenger: luiz_eduardo_araujo
-
The Box Said: Requires MS Windows or Better. So I Installed Linux
--
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] Dúvida sobre o clientdataset
Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: 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!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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 -- 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] ECXMLParser
Olá Alguém já trabalhou com este componente? Porque estou tentando pegar um atributo de um nodo, só que não estou conseguindo, o xml exemplo seria: ?xml version=1.0 encoding=UTF-8?MONTATESTE IP=200.200.1.0 PORT=5111/TESTE/MONTA O problema é que com esse componente eu só consigo pegar o conteúdo de um nodo ou um sub-item de um nodo e não um atributo como é o casso do IP acima. Alguém poderia dar uma dica, ou sugestão de como resolver isso (evitar o Copy e Pos, né?) Valeu Abraços [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] Quero Ajudar a Todos
Pessoal, quero ajudar todos os integrantes disponibilizando vairos programas de ajuda de delphi, e varias apostilas, mas tentei coloca-los no yahoo porta arquivos do meu email e naum consegui, algum tem algum espaco de ftp em algum lugar que eu posso por e que o acesso seja publico a todos desta lista, tudo da aproximadamente 10mb, naum adianta ninguem dizer manda pra mim, que eu naum irei mandar em nunhum email, colocarei em algum lugar da net, alguem sabe onde eu possa por -- 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] Dúvida sobre o clientdataset
agora sim entendi. obrigada - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:15 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: 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!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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 -- 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 outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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] Imprimir NF modo DOS
Me indicaram aqui na lista o ZReport. Olhei ele e é muito bom. Vou começar a usá-lo. Procure no google. Att, Leandro -- Open WebMail Project (http://openwebmail.org) -- Original Message --- From: Emerson Moreno [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wed, 26 Jan 2005 08:37:19 -0300 Subject: Re: [delphi-br] Imprimir NF modo DOS Olá amigo, vc poderia me fornecer esse componente pois reciso fazer uma rotina de impressão direto para a impressao mas estou com dificuldades. On Tue, 25 Jan 2005 17:17:56 -0200, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote: Pessoal, Há algum componente de impressão DOS que possibilite montar o relatorio em modo Design, tipo reportbuilder ou quickreport? Preciso disse para imprimir notas fiscais. Eu desenvolvi um componente para impressão DOS, só que ele é muito manual, e de difícil uso. Preciso de uma coisa mais avançada, para me poupar tempo. Desde já agradeço qualquer ajuda. Leandro -- 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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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 --- End of Original Message --- -- 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] QUICK REPORT
Me responderam isso essa semana ... Se vc quiser usar o Quick Report para usar o Delphi boleto basta seguir os seguintes passos para instalar o pacote Quick Report já que o mesmo não e instalado por padrão no Delphi 7: 1- Abra o Delphi 7 e clique em Componente Install Packages... . Em seguida veremos os pacotes que já estão instalados; 2- Agora basta clicar em ADD e procurar pelo arquivo DCLQRT70.BPL que está localizado no diretório BIN do Delphi ; 3- Depois disso será mostrado o componente instalado. Andre de Souza Ferreira [EMAIL PROTECTED] wrote: ? PESSOAL; BOA NOITE, SOU INICIANTE EM DELPHI E TO ESTUDANDO POR UM LIVRO E ME DEPAREI COM O CAPITULO QUICK REPORT! COMO FAÃ?O PARA INSTALAR ESSE COMPONENTE NO DELPHI 7? POSSO FAZER PELA NET? DESCULPE-ME PELA FALTA DE NOÃ?ÃfO! UM ABRAÃ?O A TODOS. [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 __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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] ClientDataSet Carregar os dados com duas instruções SQl
Paulo, reveja o seu SQL, pode ser que tenha alguma coisa errada nele...
Mas enfim, acredito que você possa usar do mesmo artifício de Nested DataSet
com o ClienteDataSet ... ou seja, fazer um Mestre detalhe nos SQLDataSet...
Espero ter ajudado
Thiago
- Original Message -
From: Paulo Geloramo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 11:05 AM
Subject: [delphi-br] ClientDataSet Carregar os dados com duas instruções SQl
Existe alguma forma de carregar os dados em um
ClientDataSet com duas instruções SQL?
Explicando:
Estou usando:
Delphi 7
Firebird 1.5.2
DBExpress
SQLDataSet+DataSetProvider+ClientDataSet
Usando apenas uma instrucao SQL no ClientDataSet,
quando executa o ClientDataSet.Open demora para
retornar os dados, inviabilizando a aplicação,
porque a instrução SQL tem diversos JOIN.
Então fiz um teste fazendo em duas instruções SQL,
ficou emeditado a execução.
Um exemplo simplificado:
Na primeira instrução SQL traz apenas os nomes dos produtos.
Na segunda instrução SQL traz as quantidades de cada produto.
Na segunda instrução SQL estou fazendo um loop com os
comandos:
SQL.First;
While not ClientDataSet.Eof do
begin
ClientDataSet.Edit;
ClientDataSet.FieldByName('QUANTIDADE').AsInteger := Quantidade;
ClientDataSet.Post;
SQL.Next;
end;
Desta forma ficou imetiata para carregar os dados para o ClientDataSet,
mas existe um efeito colateral, pois assim, a quantidade vai para o Delta,
existe alguma forma de limpar o Delta, mantendo a quantidade no
ClientDataSet?
Existe alguma outra forma de carregar os dados para o ClientDataSet em
duas instruções SQL?
Alguma sugestão?
[]s
Paulo Geloramo
--
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] Livros fiscais custo de manutencao
desculpem, mandei para o grupo errado, era para mandar para o automação comercial. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/1/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] Dúvida sobre o clientdataset
Só mais uma coisa numa tela de pesquisa, por exemplo, eu posso dar um select direto no ClientDataSet para depois dar um Update ou tenho q ter uma query para fazer a consulta, e depois dou um Update no Client ? - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:15 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: 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!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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 -- 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 outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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á
RES: [delphi-br] Validar ano
testa if length(edit1.text) 4 then
showmessage('Ano errado!');
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 09:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Validar ano
Bom dia pessoal!!!
Eu tenho um campo Edit em que o usuário digita o ano, queria saber
se tem como verificar se o ano que ele digitou é válido...
Obrigado
Abração
Erika
--
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!.
[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] Dúvida sobre o clientdataset
amigo estou encontrando apenas apostilas teóricas vc teria alguma apostila, link ou exemplo pra mim ? eu gostaria de saber se estou fazendo certo para incluir, alterar e etc queria ver se a lógica que estou fazendo tá certa... esta é minha preocupação - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:15 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: 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!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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 -- 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 outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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
Re: [delphi-br] Imprimir NF modo DOS
Gostei muito do Fortes Report... acho que vale a pena utilizá-lo. Leonardo Freitag - Original Message - From: [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:31 AM Subject: Re: [delphi-br] Imprimir NF modo DOS Me indicaram aqui na lista o ZReport. Olhei ele e é muito bom. Vou começar a usá-lo. Procure no google. Att, Leandro -- Open WebMail Project (http://openwebmail.org) -- Original Message --- From: Emerson Moreno [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wed, 26 Jan 2005 08:37:19 -0300 Subject: Re: [delphi-br] Imprimir NF modo DOS Olá amigo, vc poderia me fornecer esse componente pois reciso fazer uma rotina de impressão direto para a impressao mas estou com dificuldades. On Tue, 25 Jan 2005 17:17:56 -0200, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote: Pessoal, Há algum componente de impressão DOS que possibilite montar o relatorio em modo Design, tipo reportbuilder ou quickreport? Preciso disse para imprimir notas fiscais. Eu desenvolvi um componente para impressão DOS, só que ele é muito manual, e de difícil uso. Preciso de uma coisa mais avançada, para me poupar tempo. Desde já agradeço qualquer ajuda. Leandro -- 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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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 --- End of Original Message --- -- 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] Dúvida sobre o clientdataset
Olha Catiúscia, Infelizmente não tenho um link com algo do tipo 20 práticas aconselháveis com DBX e ClientDataSet.. mas posso te adiantar o seguinte: O SQLDataSet terá somente um sql que será responsável pela RECUPERAÇÃO dos dados no banco... Algo como: Select * from tabela É aconselhável que você faça um Select * from tabela where pk = :parametro para assim você trazer o mínimo possível de registros. Usando o ClientDataSet, não será necessário escrever NENHUM código no SQLDataSet.. apenas no ClientDataSet. Os parametros, as definições de campo e tudo o mais pode, e deve, ser feito o ClientDataSet (com exceção da propriedade ProviderFlags... Comigo, setá-la apenas no ClientDataSet não funciona... ). De resto, procede os costumes normais de se trabalhar com DataSets, só que ao invés de você, por exemplo, ligar o DataSource ao SQLDataSet, você ligao ao ClientDataSet.. sem segredos. As atualizações, inserts, deletes, transaçoes.. fica tudo por conta dele (ou melhor, do provider). Validação de dados e regras de negócio devem ser tratadas no próprio provider... claro que regras básicas, como email sem @, podem ser tratadas no evento OnValidade do ClientDataSet porém... chaves e etc, devem ser tratadas no Provider, no evento BeforeUpdateRecord. Se por ventura eu tiver errado algum nome, me perdoe.. é que o meu Delphi não está aberto :D Existe um guia rápido Midas em Delphi (acho ser este o nome mesmo) da Visual Books, custa 12 reais e explica -de maneira rápida - o funcionamento do ClientDataSet. Agora se você quer mesmo aprender como usar o DBXpress, e o ClientDataSet... ou seja, programação para bancos de dados... com teoria e tudo o mais, eu recomendo o livro Delphi/Kylix Desenvolvimento de banco de dados da Editora Berkeley escrito pelo Eric Harmon. Na Americanas.com, o livro ficava em 6 de 10 reais no Cartão de crédito. É um ótimo livro... e imagino que o próprio Güinther tenha inspirado algum de seus artigos por esse livro. No começo é extranho, afinal, é outro paradigma... mas com o tempo você vai ver que está é a melhor invenção... depois da roda, é claro Estou a disposição.. Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:22 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset amigo estou encontrando apenas apostilas teóricas vc teria alguma apostila, link ou exemplo pra mim ? eu gostaria de saber se estou fazendo certo para incluir, alterar e etc queria ver se a lógica que estou fazendo tá certa... esta é minha preocupação - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:15 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: São Paulo Rio de Janeiro Curitiba
Re: [delphi-br] Dúvida sobre o clientdataset
Para consultas eu faço da seguinte forma: Tenho uma Estrutra (SQLDataSet + DataSetProvider + ClientDataSet) feita somente para pesquisa. Para este fim, adicione o poAllowCommandText na propriedade ProviderOptions do DataSetProvider. Recupero a chave e passo como valor para o parêmetro do ClientDataSet normal. Talvez você me pergunte: Pq não fazer a consulta direto no ClientDataSet original ao invés de usar outra Estrutura? Apenas pela questão dos parâmetros. Pq se eu mudar o Select, a pesquisa - no CDS original - ficará fatalmente mais lenta... Somente por isso :D Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:02 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Só mais uma coisa numa tela de pesquisa, por exemplo, eu posso dar um select direto no ClientDataSet para depois dar um Update ou tenho q ter uma query para fazer a consulta, e depois dou um Update no Client ? - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:15 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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: 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!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date: 24/01/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 -- 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
Re: [delphi-br] Validar ano
Com essa sua validação eu poderia escrever no edit Bola e ele consideraria um
ano valido
[]´s
Rodrigo O. Farias
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 11:36 AM
Subject: RES: [delphi-br] Validar ano
testa if length(edit1.text) 4 then
showmessage('Ano errado!');
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 09:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Validar ano
Bom dia pessoal!!!
Eu tenho um campo Edit em que o usuário digita o ano, queria saber
se tem como verificar se o ano que ele digitou é válido...
Obrigado
Abração
Erika
--
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!.
[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!.
[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] ClientDataSet Carregar os dados com duas instruções SQl
Olá,
Primeiro seria preciso dar uma olhada em seus joins pra ver como estão. Em
segundo, você já testou a propriedade PACKETRECORDS do clientDataset ? Seta
a propriedade FetchOnDemand para true e coloque aí um número de registros
que você deseja que o clientdataset vá buscar em sua base toda vez que for
necessário, tipo uns 200.
[]'s
Alexandre Oliveira Campioni
Analista de Sistemas
A-Tecnologia e Sistemas de Informacao Ltda.
Sao Joaquim da Barra - Sao Paulo - Brazil
[EMAIL PROTECTED]
-Mensagem original-
De: Paulo Geloramo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 10:05
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] ClientDataSet Carregar os dados com duas instruções SQl
Existe alguma forma de carregar os dados em um ClientDataSet com duas
instruções SQL?
Explicando:
Estou usando:
Delphi 7
Firebird 1.5.2
DBExpress
SQLDataSet+DataSetProvider+ClientDataSet
Usando apenas uma instrucao SQL no ClientDataSet, quando executa o
ClientDataSet.Open demora para retornar os dados, inviabilizando a
aplicação, porque a instrução SQL tem diversos JOIN.
Então fiz um teste fazendo em duas instruções SQL, ficou emeditado a
execução.
Um exemplo simplificado:
Na primeira instrução SQL traz apenas os nomes dos produtos.
Na segunda instrução SQL traz as quantidades de cada produto.
Na segunda instrução SQL estou fazendo um loop com os
comandos:
SQL.First;
While not ClientDataSet.Eof do
begin
ClientDataSet.Edit;
ClientDataSet.FieldByName('QUANTIDADE').AsInteger := Quantidade;
ClientDataSet.Post;
SQL.Next;
end;
Desta forma ficou imetiata para carregar os dados para o ClientDataSet, mas
existe um efeito colateral, pois assim, a quantidade vai para o Delta,
existe alguma forma de limpar o Delta, mantendo a quantidade no
ClientDataSet?
Existe alguma outra forma de carregar os dados para o ClientDataSet em duas
instruções SQL?
Alguma sugestão?
[]s
Paulo Geloramo
--
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] Venda de Sistema Completo Com Fontes
De: Sistemas-Delphi [EMAIL PROTECTED] Assunto: Re: Venda de Sistema Completo Com Fontes Tambem gostaria de receber o demo e o preço [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
Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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
RES: [delphi-br] Validar ano
Realmente, foi falho
Desculpe
-Mensagem original-
De: Rodrigo Othavio Farias [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 11:30
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Validar ano
Com essa sua validação eu poderia escrever no edit Bola e ele
consideraria um ano valido
[]´s
Rodrigo O. Farias
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 11:36 AM
Subject: RES: [delphi-br] Validar ano
testa if length(edit1.text) 4 then
showmessage('Ano errado!');
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 09:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Validar ano
Bom dia pessoal!!!
Eu tenho um campo Edit em que o usuário digita o ano, queria saber
se tem como verificar se o ano que ele digitou é válido...
Obrigado
Abração
Erika
--
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!.
[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!.
[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!.
[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] Pesquisa SQL
Willian passa essa função pra mim que eu tentei fazer do jeito que colocaram
com e não to conseguindo
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
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
RES: [delphi-br] Pesquisa SQL
To fazendo
iPos := Pos(' ',edtInformacao.Text);
if iPos 0 then
begin
qrySIAE0101.Sql.Add( 'WHERE UPPER(NM_CONTATO) like ' +
Copy(UpperCase(QuotedStr('%' + edtInformacao.Text + '%')),1,iPos - 1));
qrySIAE0101.Sql.Add( ' AND UPPER(NM_CONTATO) like ' +
Copy(UpperCase(QuotedStr('%' + edtInformacao.Text + '%')),iPos + 1,
Length(edtInformacao.Text)));
end
O nome do cara é Joao Pedro dos Santos, se eu digitar Joao Santos não ta me
retornando, porque será ?
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
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] Validar ano
Primeiro force o usuário digitar somente números
no OnKeyPress
if not(Key in ['0'..'9']) then
Key := #0;
Depois verifique no OnExite se está dentro do ano que deseja
procedure TForm1.Edit1Exit(Sender: TObject);
var
Ano: Integer;
begin
Ano := StrToInt(Edit1.Text);
if ((Ano = 2000)and(Ano = 2010)) then begin // Ano entre 2000 e 2010
ShowMessage('Ano Correto !');
end else begin
ShowMessage('Ano Inválido !');
Edit1.SetFocus;
end;
end;
Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]
- Original Message -
From: Rodrigo Othavio Farias
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 12:30 PM
Subject: Re: [delphi-br] Validar ano
Com essa sua validação eu poderia escrever no edit Bola e ele consideraria
um ano valido
[]´s
Rodrigo O. Farias
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 11:36 AM
Subject: RES: [delphi-br] Validar ano
testa if length(edit1.text) 4 then
showmessage('Ano errado!');
-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 09:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Validar ano
Bom dia pessoal!!!
Eu tenho um campo Edit em que o usuário digita o ano, queria saber
se tem como verificar se o ano que ele digitou é válido...
Obrigado
Abração
Erika
--
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!.
[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!.
[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.300 / Virus Database: 265.7.2 - Release Date: 21/01/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.7.2 - Release Date: 21/01/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:
RES: [delphi-br] Quero Ajudar a Todos
Amigo, vc poderia estar criando um e-mail no yahoo mesmo e enviar todo esse material para lá Poderia estar passando o e-mail criado e a senha, assim todo mundo poderia acessar esse e-mail e baixar esse material, o que acha ? No yahoo cabem 100 MB, é espaço pra caramba -Mensagem original- De: ArbSis [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 10:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Quero Ajudar a Todos Pessoal, quero ajudar todos os integrantes disponibilizando vairos programas de ajuda de delphi, e varias apostilas, mas tentei coloca-los no yahoo porta arquivos do meu email e naum consegui, algum tem algum espaco de ftp em algum lugar que eu posso por e que o acesso seja publico a todos desta lista, tudo da aproximadamente 10mb, naum adianta ninguem dizer manda pra mim, que eu naum irei mandar em nunhum email, colocarei em algum lugar da net, alguem sabe onde eu possa por -- 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!. [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] Componentes para Delphi 2005
Pessoal, Onde encontro os componentes baixo para o Delphi 2005 a.. XpMenu b.. CsLite c.. UserControl d.. Zeus e.. Report Builder f.. entre outros Atenciosamente, Marcelo Carvalho Essa mensagem, incluindo seus anexos, tem caráter confidencial e seu contéudo é restrito ao(s) destinatário(s) da mensagem. Qualquer uso nao autorizado, replicaçao ou disseminaçao desta mensagem ou parte dela é expressamente proibido. Esse e-mail foi certificado contra virus. ISCMPA - Irmandade da Santa Casa de Misericórdia de Porto Alegre [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] Dúvida sobre o clientdataset
e. preciso de apostila... não sabia dessas coisas - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 1:01 PM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olha Catiúscia, Infelizmente não tenho um link com algo do tipo 20 práticas aconselháveis com DBX e ClientDataSet.. mas posso te adiantar o seguinte: O SQLDataSet terá somente um sql que será responsável pela RECUPERAÇÃO dos dados no banco... Algo como: Select * from tabela É aconselhável que você faça um Select * from tabela where pk = :parametro para assim você trazer o mínimo possível de registros. Usando o ClientDataSet, não será necessário escrever NENHUM código no SQLDataSet.. apenas no ClientDataSet. Os parametros, as definições de campo e tudo o mais pode, e deve, ser feito o ClientDataSet (com exceção da propriedade ProviderFlags... Comigo, setá-la apenas no ClientDataSet não funciona... ). De resto, procede os costumes normais de se trabalhar com DataSets, só que ao invés de você, por exemplo, ligar o DataSource ao SQLDataSet, você ligao ao ClientDataSet.. sem segredos. As atualizações, inserts, deletes, transaçoes.. fica tudo por conta dele (ou melhor, do provider). Validação de dados e regras de negócio devem ser tratadas no próprio provider... claro que regras básicas, como email sem @, podem ser tratadas no evento OnValidade do ClientDataSet porém... chaves e etc, devem ser tratadas no Provider, no evento BeforeUpdateRecord. Se por ventura eu tiver errado algum nome, me perdoe.. é que o meu Delphi não está aberto :D Existe um guia rápido Midas em Delphi (acho ser este o nome mesmo) da Visual Books, custa 12 reais e explica -de maneira rápida - o funcionamento do ClientDataSet. Agora se você quer mesmo aprender como usar o DBXpress, e o ClientDataSet... ou seja, programação para bancos de dados... com teoria e tudo o mais, eu recomendo o livro Delphi/Kylix Desenvolvimento de banco de dados da Editora Berkeley escrito pelo Eric Harmon. Na Americanas.com, o livro ficava em 6 de 10 reais no Cartão de crédito. É um ótimo livro... e imagino que o próprio Güinther tenha inspirado algum de seus artigos por esse livro. No começo é extranho, afinal, é outro paradigma... mas com o tempo você vai ver que está é a melhor invenção... depois da roda, é claro Estou a disposição.. Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:22 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset amigo estou encontrando apenas apostilas teóricas vc teria alguma apostila, link ou exemplo pra mim ? eu gostaria de saber se estou fazendo certo para incluir, alterar e etc queria ver se a lógica que estou fazendo tá certa... esta é minha preocupação - Original Message - From: Francisco Thiago de Almeida To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 11:15 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset Olá! DataSet + DataSetProvider + ClientDataSet + DataSource É be melhor.. pq? Pq é altamente portável... Procure algumas apostilas na internet... Você vai ver que não é muito difícil Unidirecional: O DBXpress é leve porque? pq ele é unidirecional, ou seja... o seu cursor só vai pra frente... Ele não guarda as informações em cache interno e também é read only.. vc nao consegue por exemplo fazer insert / edits... vc tem de gerar sql's pra isso. Daí a necessidade de usar um outro conjunto de componentes para fazer todo o trabalho de: Cursor multidirecional, gerar os sql de alteração, controle de transação e etc... Daí entra o ClientDataSet que tem tudo isso e muito mais... Espero ter ajudado Thiago - Original Message - From: Catiúscia Barrilli da Cruz [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 10:05 AM Subject: Re: [delphi-br] Dúvida sobre o clientdataset sobre acesso unidirecional e bidirecional... alguém poderia tamb´´em me dar uma explanada - Original Message - From: Catiúscia Barrilli da Cruz To: Delphi-Br Sent: Wednesday, January 26, 2005 9:38 AM Subject: [delphi-br] Dúvida sobre o clientdataset Bom dia a todos !!! Gostaria que alguém pudesse me explicar sobre o que mais convém em Cliente/Servidor. Usar somente DataSet + DataSetProvider + ClientDataSet + DataSource ou DataSet + DataSource Cati -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.3 - Release Date:
Re: RES: [delphi-br] Quero Ajudar a Todos
Utilize o servico do site http://www.mandeibem.com.br/ onde o arquivo pode ter até 1 gb e fica disponivel por 7 dias , e ai voce manda o endereço para baixar pelo e-mail da lista Citando Eduardo Silva ® [EMAIL PROTECTED]: Amigo, vc poderia estar criando um e-mail no yahoo mesmo e enviar todo esse material para lá Poderia estar passando o e-mail criado e a senha, assim todo mundo poderia acessar esse e-mail e baixar esse material, o que acha ? No yahoo cabem 100 MB, é espaço pra caramba -Mensagem original- De: ArbSis [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 10:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Quero Ajudar a Todos Pessoal, quero ajudar todos os integrantes disponibilizando vairos programas de ajuda de delphi, e varias apostilas, mas tentei coloca-los no yahoo porta arquivos do meu email e naum consegui, algum tem algum espaco de ftp em algum lugar que eu posso por e que o acesso seja publico a todos desta lista, tudo da aproximadamente 10mb, naum adianta ninguem dizer manda pra mim, que eu naum irei mandar em nunhum email, colocarei em algum lugar da net, alguem sabe onde eu possa por -- 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!. [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 suas ligações internacionais, disque 00 + 21 + código do país + número do telefone e aproveite as vantagens que só o 21 da Embratel oferece www.embratel.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
Re: [delphi-br] Problema com Master-Detail
Olá Francisco obrigado pela ajuda, seu e-mail foi muito útil pois
modifiquei a forma como o código estava sendo gerado para o Mestre e o
Detalhe porém meu problema na validação dos campos persiste.
Obs: eu tb estou tentando usar n-tier seguindo o exemplo do Bruno que
foi publicado na edição 56 da revista ClubeDelphi, porém estas dúvidas
estão me prendendo aqui
Veja abaixo o exemplo do meu problema e como ficou o procedimento
modificado ( a parte em negrito é onde esta a minha dor de cabeça):
procedure TForm1.dspPessoaBeforeUpdateRecord(Sender: TObject;
SourceDS: TDataSet; DeltaDS: TCustomClientDataSet;
UpdateKind: TUpdateKind; var Applied: Boolean);
const
{$J+} // Ativa constantes tipadas
CODIGO: Integer = -1;
{$J-} //Desativa constantes tipadas
begin
if (UpdateKind in [ukInsert, ukModify]) then
with DeltaDS do
begin
{
Se esta exceção ocorrer nada é gravado na base de dados e o CDS
fica em
modo de edição, por que o campo VALIDADE pertence a tabela MESTRE
}
// Verifica se VALIDADE é maior que o dia atual
if Assigned(FindField('VALIDADE')) then //Se o campo estiver
presente no Delta
if not VarIsEmpty(FindField('VALIDADE').NewValue) then //Se o
campo não estiver vazio
if (FindField('VALIDADE').NewValue=Date) then //Se o valor do
campo for menor que a data atual
raise EDatabaseError.Create('A data de validade do cadastro
deve ser '+
'posterior à '+DateToStr(Date)+'!');*
{
O problema esta aqui, se esta exceção ocorrer os dados da tabela
Mestre (PESSOA)
são gravados na base de dados, a exceção é gerada, o registro
fica em modo de
edição, porém se o usuário cancelar a operação, os dados da
tabela mestre que ja foram
gravados ficam na base de dados sem os detalhes por que SALARIO
pertence a tabela DETALHE
}
// Verifica se SALARIO é maior que 0
if Assigned(FindField('SALARIO')) then //Se o campo estiver no Delta*
*if not VarIsEmpty(FindField('SALARIO').NewValue) then //Se o
campo não estiver vazio*
* if (FindField('SALARIO').NewValue=0) then //Se o valor do
salário for menor que 1
raise EDatabaseError.Create('Salário deve ser um valor maior
do que 0!');
*end;
if (UpdateKind=ukInsert) then
with DeltaDS do
begin
Edit;
// Se é o mestre gera código
if SourceDS = sqlPessoa then
begin
sqlGeraID.Open;
CODIGO := sqlGeraID.FieldValues['CODIGO']+1;
sqlGeraID.Close;
end;
FieldByName('CODIGO').AsInteger := CODIGO;
Post;
end;
end;
Francisco Thiago de Almeida escreveu:
Olá Rodrigo!
Tudo bem? Espero que sim
Veja bem, a melhor forma de fazer o mestre - detalhe com DBX e CDs é da
seguinte forma:
SQLMestre
Select * from Mestre
SQLDetalhe
Select * from Detalhe
where campo_fk = :campo_pk // Este campo deve ter o MESMO nome do campo
chave na tabela Mestre
Feito isso, adicione um DataSource ao seu DM..e faça o seguinte
TDataSource
DataSet = sqlMestre
E na propriedade DataSource do sqlDetalhe aponte para o DataSource criado!
Vóilà! está criado o mestre detalhe...
Adicione um DataSetProvider e aponte a propriedade DataSet para o
SQLMestre...
Adicione um Cds e aponte a propriedade Provider para o Provider criado
anteriormente. Adicione todos os campo.. Observe dentre os campos,
aparecerá
um sqlDetalhe.
Adicione outro dataset... e na propriedade DataSetFields, infome o
sqlDetalhe que aparecerá na listagem...
Agora... Detalhe... Em aplicações Multicamadas (SOAP no meu caso) só isso
não funcionou... tive de escrever o seguinte método no BeforeUpdateRecord
const
{$J+} // Ativa constantes tipadas
qg:Integer = -1;
{$J-}//Desativa constantes tipadas
begin
if UpdateKind in [ukInsert] then // Repare que executo isso só na
Inserção.. em edição, o CDS já atribui o valor de chave automaticamente
begin
if SourceDS = sqlCad_Crediario then // Se é o mestre...
begin
UpdateRecordAutoInc (Sender,SourceDS,DeltaDS,UpdateKind,Applied,
DeltaDS.FieldByName('CCRED_CODIGO').Index); // procedure de auto
incremento
qg := DeltaDS.FieldByName('CCRED_CODIGO').NewValue // armazena o
valor
de chave na constante
end
else if qg -1 then
DeltaDS.FieldByName('CCRED_CODIGO').NewValue := qg; // chave nos
detalhes
end;
É isso ae.. espero ter ajudado
- Original Message -
From: Rodrigo Schiavo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 9:52 AM
Subject: [delphi-br] Problema com Master-Detail
Bom dia galera.
Surgiu um probleminha meio urgente aqui.
Estou ulizando componentes DBX com ClientDataSets.
Estou fazendo as validações dos dados tanto do mestre como do detalhe no
evento BeforeUpdateRecord do DataSetProvider porém o Delphi faz o Post
do Mestre antes dos detalhes e se houver algum erro
[delphi-br] Eventos no Firebird
Companheiros, alguém pode me dar uma dica da utilização dos recursos de Eventos no Firebird? Em quais situações utilizar, etc? DELPHI 7 + FB 1.5 + IBX Desde já, obrigado []'s Mario [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] Problema com Master-Detail
Dando uma olhada por cima.
Tente ao invés de pegar o valor retornado de NewValue.. tente capturar o
Valor de AsDateTime
E ao invés de jogar uma EDataBaseError, jogue uma que descenda de
Exception
Interessante é que tenho códigos assim e o raise funciona perfeitamente...
Não sei como você está fazendo as validações.. mas esta da data não poderia
ser feita no cliente?
- Original Message -
From: Rodrigo Schiavo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:58 PM
Subject: Re: [delphi-br] Problema com Master-Detail
Olá Francisco obrigado pela ajuda, seu e-mail foi muito útil pois
modifiquei a forma como o código estava sendo gerado para o Mestre e o
Detalhe porém meu problema na validação dos campos persiste.
Obs: eu tb estou tentando usar n-tier seguindo o exemplo do Bruno que
foi publicado na edição 56 da revista ClubeDelphi, porém estas dúvidas
estão me prendendo aqui
Veja abaixo o exemplo do meu problema e como ficou o procedimento
modificado ( a parte em negrito é onde esta a minha dor de cabeça):
procedure TForm1.dspPessoaBeforeUpdateRecord(Sender: TObject;
SourceDS: TDataSet; DeltaDS: TCustomClientDataSet;
UpdateKind: TUpdateKind; var Applied: Boolean);
const
{$J+} // Ativa constantes tipadas
CODIGO: Integer = -1;
{$J-} //Desativa constantes tipadas
begin
if (UpdateKind in [ukInsert, ukModify]) then
with DeltaDS do
begin
{
Se esta exceção ocorrer nada é gravado na base de dados e o CDS
fica em
modo de edição, por que o campo VALIDADE pertence a tabela MESTRE
}
// Verifica se VALIDADE é maior que o dia atual
if Assigned(FindField('VALIDADE')) then //Se o campo estiver
presente no Delta
if not VarIsEmpty(FindField('VALIDADE').NewValue) then //Se o
campo não estiver vazio
if (FindField('VALIDADE').NewValue=Date) then //Se o valor do
campo for menor que a data atual
raise EDatabaseError.Create('A data de validade do cadastro
deve ser '+
'posterior à '+DateToStr(Date)+'!');*
{
O problema esta aqui, se esta exceção ocorrer os dados da tabela
Mestre (PESSOA)
são gravados na base de dados, a exceção é gerada, o registro
fica em modo de
edição, porém se o usuário cancelar a operação, os dados da
tabela mestre que ja foram
gravados ficam na base de dados sem os detalhes por que SALARIO
pertence a tabela DETALHE
}
// Verifica se SALARIO é maior que 0
if Assigned(FindField('SALARIO')) then //Se o campo estiver no
Delta*
*if not VarIsEmpty(FindField('SALARIO').NewValue) then //Se o
campo não estiver vazio*
* if (FindField('SALARIO').NewValue=0) then //Se o valor do
salário for menor que 1
raise EDatabaseError.Create('Salário deve ser um valor maior
do que 0!');
*end;
if (UpdateKind=ukInsert) then
with DeltaDS do
begin
Edit;
// Se é o mestre gera código
if SourceDS = sqlPessoa then
begin
sqlGeraID.Open;
CODIGO := sqlGeraID.FieldValues['CODIGO']+1;
sqlGeraID.Close;
end;
FieldByName('CODIGO').AsInteger := CODIGO;
Post;
end;
end;
Francisco Thiago de Almeida escreveu:
Olá Rodrigo!
Tudo bem? Espero que sim
Veja bem, a melhor forma de fazer o mestre - detalhe com DBX e CDs é da
seguinte forma:
SQLMestre
Select * from Mestre
SQLDetalhe
Select * from Detalhe
where campo_fk = :campo_pk // Este campo deve ter o MESMO nome do campo
chave na tabela Mestre
Feito isso, adicione um DataSource ao seu DM..e faça o seguinte
TDataSource
DataSet = sqlMestre
E na propriedade DataSource do sqlDetalhe aponte para o DataSource
criado!
Vóilà! está criado o mestre detalhe...
Adicione um DataSetProvider e aponte a propriedade DataSet para o
SQLMestre...
Adicione um Cds e aponte a propriedade Provider para o Provider criado
anteriormente. Adicione todos os campo.. Observe dentre os campos,
aparecerá
um sqlDetalhe.
Adicione outro dataset... e na propriedade DataSetFields, infome o
sqlDetalhe que aparecerá na listagem...
Agora... Detalhe... Em aplicações Multicamadas (SOAP no meu caso) só isso
não funcionou... tive de escrever o seguinte método no BeforeUpdateRecord
const
{$J+} // Ativa constantes tipadas
qg:Integer = -1;
{$J-}//Desativa constantes tipadas
begin
if UpdateKind in [ukInsert] then // Repare que executo isso só na
Inserção.. em edição, o CDS já atribui o valor de chave automaticamente
begin
if SourceDS = sqlCad_Crediario then // Se é o mestre...
begin
UpdateRecordAutoInc (Sender,SourceDS,DeltaDS,UpdateKind,Applied,
DeltaDS.FieldByName('CCRED_CODIGO').Index); // procedure de auto
incremento
qg := DeltaDS.FieldByName('CCRED_CODIGO').NewValue // armazena o
valor
de chave na constante
end
else if qg -1 then
Re: [delphi-br] Problema com Master-Detail
Cara jah pensei em validar estas coisas simples no cliente, soh que
estou pensando em quando surgir uma situação destas com um campo mais
importante e que tenha de ser validado do lado servidor, mas acho que
consegui resolver o problema, não sei se foi da forma correta mas dah
uma olhada no que fiz.
Criei uma transação e coloquei o ApplyUpdates dentro dela se houver
exceção agora posso dar um Rollback e nada vai ser gravado.
procedure TForm1.btGravarClick(Sender: TObject);
var
TD: TTransactionDesc;
begin
Application.ProcessMessages;
TD.TransactionID := 1;
TD.IsolationLevel := xilREADCOMMITTED;
conBase.StartTransaction(TD);
try
cdsPessoa.ApplyUpdates(0);
conBase.Commit(TD);
except
conBase.Rollback(TD);
end;
end;
Tah correto isso que eu fiz?
xilREADCOMMITTED eh o tipo mais indicado para esta operação?
[ ]'s Rodrigo
Francisco Thiago de Almeida escreveu:
Dando uma olhada por cima.
Tente ao invés de pegar o valor retornado de NewValue.. tente capturar o
Valor de AsDateTime
E ao invés de jogar uma EDataBaseError, jogue uma que descenda de
Exception
Interessante é que tenho códigos assim e o raise funciona perfeitamente...
Não sei como você está fazendo as validações.. mas esta da data não
poderia
ser feita no cliente?
- Original Message -
From: Rodrigo Schiavo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:58 PM
Subject: Re: [delphi-br] Problema com Master-Detail
Olá Francisco obrigado pela ajuda, seu e-mail foi muito útil pois
modifiquei a forma como o código estava sendo gerado para o Mestre e o
Detalhe porém meu problema na validação dos campos persiste.
Obs: eu tb estou tentando usar n-tier seguindo o exemplo do Bruno que
foi publicado na edição 56 da revista ClubeDelphi, porém estas dúvidas
estão me prendendo aqui
Veja abaixo o exemplo do meu problema e como ficou o procedimento
modificado ( a parte em negrito é onde esta a minha dor de cabeça):
procedure TForm1.dspPessoaBeforeUpdateRecord(Sender: TObject;
SourceDS: TDataSet; DeltaDS: TCustomClientDataSet;
UpdateKind: TUpdateKind; var Applied: Boolean);
const
{$J+} // Ativa constantes tipadas
CODIGO: Integer = -1;
{$J-} //Desativa constantes tipadas
begin
if (UpdateKind in [ukInsert, ukModify]) then
with DeltaDS do
begin
{
Se esta exceção ocorrer nada é gravado na base de dados e o CDS
fica em
modo de edição, por que o campo VALIDADE pertence a tabela MESTRE
}
// Verifica se VALIDADE é maior que o dia atual
if Assigned(FindField('VALIDADE')) then //Se o campo estiver
presente no Delta
if not VarIsEmpty(FindField('VALIDADE').NewValue) then //Se o
campo não estiver vazio
if (FindField('VALIDADE').NewValue=Date) then //Se o valor do
campo for menor que a data atual
raise EDatabaseError.Create('A data de validade do cadastro
deve ser '+
'posterior à '+DateToStr(Date)+'!');*
{
O problema esta aqui, se esta exceção ocorrer os dados da tabela
Mestre (PESSOA)
são gravados na base de dados, a exceção é gerada, o registro
fica em modo de
edição, porém se o usuário cancelar a operação, os dados da
tabela mestre que ja foram
gravados ficam na base de dados sem os detalhes por que SALARIO
pertence a tabela DETALHE
}
// Verifica se SALARIO é maior que 0
if Assigned(FindField('SALARIO')) then //Se o campo estiver no
Delta*
*if not VarIsEmpty(FindField('SALARIO').NewValue) then //Se o
campo não estiver vazio*
* if (FindField('SALARIO').NewValue=0) then //Se o valor do
salário for menor que 1
raise EDatabaseError.Create('Salário deve ser um valor maior
do que 0!');
*end;
if (UpdateKind=ukInsert) then
with DeltaDS do
begin
Edit;
// Se é o mestre gera código
if SourceDS = sqlPessoa then
begin
sqlGeraID.Open;
CODIGO := sqlGeraID.FieldValues['CODIGO']+1;
sqlGeraID.Close;
end;
FieldByName('CODIGO').AsInteger := CODIGO;
Post;
end;
end;
Francisco Thiago de Almeida escreveu:
Olá Rodrigo!
Tudo bem? Espero que sim
Veja bem, a melhor forma de fazer o mestre - detalhe com DBX e CDs é da
seguinte forma:
SQLMestre
Select * from Mestre
SQLDetalhe
Select * from Detalhe
where campo_fk = :campo_pk // Este campo deve ter o MESMO nome do campo
chave na tabela Mestre
Feito isso, adicione um DataSource ao seu DM..e faça o seguinte
TDataSource
DataSet = sqlMestre
E na propriedade DataSource do sqlDetalhe aponte para o DataSource
criado!
Vóilà! está criado o mestre detalhe...
Adicione um DataSetProvider e aponte a propriedade DataSet para o
SQLMestre...
Adicione um Cds e aponte a propriedade Provider para o Provider criado
Re: [delphi-br] Re: Componentes para Delphi 2005
O Usercontrol também tem para Delphi 2005 e pode ser encontrado em http://usercontrol.sourceforge.net/ que é o site oficial. Gabriel. - Original Message - From: Osmar de Souza Júnior To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 2:13 PM Subject: [delphi-br] Re: Componentes para Delphi 2005 O ZeosLib parou no Delphi 7. Não parece que vai ter continuidade... Só o que eu sei que tem pro 2005 é os componentes do Raise. --- Em delphi-br@yahoogrupos.com.br, Marcelo Carvalho [EMAIL PROTECTED] escreveu Pessoal, Onde encontro os componentes baixo para o Delphi 2005 a.. XpMenu b.. CsLite c.. UserControl d.. Zeus e.. Report Builder f.. entre outros Atenciosamente, Marcelo Carvalho Essa mensagem, incluindo seus anexos, tem caráter confidencial e seu contéudo é restrito ao(s) destinatário(s) da mensagem. Qualquer uso nao autorizado, replicaçao ou disseminaçao desta mensagem ou parte dela é expressamente proibido. Esse e-mail foi certificado contra virus. ISCMPA - Irmandade da Santa Casa de Misericórdia de Porto Alegre [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 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] Pesquisa SQL
Você pode usar assim:
Crie essa function:
Function BuscaTroca(Text,Busca : String) : String;
Var N : Integer;
begin
For N := 1 to Length(Text) do
begin
if Copy(Text,N,1) = ' ' then
begin
Delete(Text,N,1);
Insert('%',Text,N);
end;
end;
Result := '%' + Text + '%';
end;
Depois declare uma variável:
Var
Troca : String;
E no seu código utilize assim:
Troca:= BuscaTroca(Edit3.Text,' '); //Para fazer a substituição dos espaços em
branco por %
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE QuotedStr(Troca));
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Willian Jerônymo
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:27 PM
Subject: RES: [delphi-br] Pesquisa SQL
Willian passa essa função pra mim que eu tentei fazer do jeito que colocaram
com e não to conseguindo
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
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:
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
Re: [delphi-br] Imprimir NF modo DOS
Oi Leonardo, Boa Tarde Vc teria um exemplo de como emitir Nota Fiscal pelo Fortes Report ??? Se puder me mande em PVT meu email [EMAIL PROTECTED] Desde já agradeço Abraço Ademir -- Gostei muito do Fortes Report... acho que vale a pena utilizá-lo. Leonardo Freitag [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] Quero Ajudar a Todos
Essa poderia estar sendo uma ótima idéia. Uma conta no Yahoo não esta mais sendo de 100 mb de espaço, agora estão sendo 250 mb de espaço sendo assim acho que vai estar cabendo muita mais coisa. Porém estar criando uma conta no GMail é melhor, pois vamos estar tendo um espaço disponível de 1 GB. 100 mega já está sendo espaço pra caramba, mais 250 está sendo mais espaço ainda. 1 GB do Gmail então não vai estar sendo apenas espaço, vai estar sendo uma perdição. O único problema que é para estar se cadastrando no Gmail tem um porém, a pessoa tem que estar sendo convidada, nesse caso, temos que estar tendo um amigo, ou alguém que está sendo usuário da lista para estar convidando a pessoa em questão. A vantagem de estar tendo conta no Gmail é que podemos estar usando um utilitário que funciona como um drive. Nesse caso não vai estar sendo nescessário estar mandando email com os arquivos para lá, bastar estar usando a opção enviar para do Explorer, e estar enviando os arquivos de forma direta. O Utilitario vai estar pedindo o usuário e a senha, voçe pode estar digitando esses dados e estar transferindo tudo para o GMail. - Original Message - From: Eduardo Silva ® [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 2:41 PM Subject: RES: [delphi-br] Quero Ajudar a Todos Amigo, vc poderia estar criando um e-mail no yahoo mesmo e enviar todo esse material para lá Poderia estar passando o e-mail criado e a senha, assim todo mundo poderia acessar esse e-mail e baixar esse material, o que acha ? No yahoo cabem 100 MB, é espaço pra caramba -Mensagem original- De: ArbSis [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 10:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Quero Ajudar a Todos Pessoal, quero ajudar todos os integrantes disponibilizando vairos programas de ajuda de delphi, e varias apostilas, mas tentei coloca-los no yahoo porta arquivos do meu email e naum consegui, algum tem algum espaco de ftp em algum lugar que eu posso por e que o acesso seja publico a todos desta lista, tudo da aproximadamente 10mb, naum adianta ninguem dizer manda pra mim, que eu naum irei mandar em nunhum email, colocarei em algum lugar da net, alguem sabe onde eu possa por -- 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!. [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] Pesquisa SQL
Muito trampo, tente utilizar assim:
Crie essa function:
Function BuscaTroca(Text,Busca : String) : String;
Var N : Integer;
begin
For N := 1 to Length(Text) do
begin
if Copy(Text,N,1) = ' ' then
begin
Delete(Text,N,1);
Insert('%',Text,N);
end;
end;
Result := '%' + Text + '%';
end;
Depois declare uma variável:
Var
Troca : String;
E no seu código utilize assim:
Troca:= BuscaTroca(Edit3.Text,' '); //Para fazer a substituição dos espaços em
branco por %
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE QuotedStr(Troca));
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
O que vc pode fazer para deixar mais legal é alterar essa linha:
Result := '%' + Text + '%';
e deixar assim: Result := Text;
e nessa linha:
Troca:= BuscaTroca(Edit3.Text,' ');
deixar assim:
Troca:= BuscaTroca(Edit3.Text,'*');
Pois assim ele tem a flexibilidade de procurar JOAO, *JOAO, *JOAO*, JOAO*,
*JOAO*SILVA* Ele utilizará * para localizar ao invés de % e
assim fica mais fácil para o usuário pegar...
Willian Jerônymo
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:31 PM
Subject: RES: [delphi-br] Pesquisa SQL
To fazendo
iPos := Pos(' ',edtInformacao.Text);
if iPos 0 then
begin
qrySIAE0101.Sql.Add( 'WHERE UPPER(NM_CONTATO) like ' +
Copy(UpperCase(QuotedStr('%' + edtInformacao.Text + '%')),1,iPos - 1));
qrySIAE0101.Sql.Add( ' AND UPPER(NM_CONTATO) like ' +
Copy(UpperCase(QuotedStr('%' + edtInformacao.Text + '%')),iPos + 1,
Length(edtInformacao.Text)));
end
O nome do cara é Joao Pedro dos Santos, se eu digitar Joao Santos não ta me
retornando, porque será ?
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
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
[delphi-br] Pack em tabela Paradox
Como fazer em Delphi 5 para dar um pack (excluir os registros fisicamente) numa tabela Paradox ? Obrigado e um abraço à todos colegas. -- 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] Mensagem de Erro !
Caros colegas, Primeiro, gostaría de agradecer pela ajuda que tenho conseguido mandando mensagens para este grupo. Estou agora com outro problema. Utilizo o Delphi 5, Access e ADO, minha aplicação nas máquinas que utilizam o Windows 98 roda sem problemas, mas nas máquinas que possuem o Windows XP aparece sempre a seguinte mensagem ao fechar as tabelas: Either BOF or EOF is true, or the current record has been deleted. Request operation requires a current record. Alguém já passou pelo mesmo problema ? Obrigado, Luiz [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] AVI
pessoal, alguém possui um .avi que simula a criação de senhas Ou mesmo, me indicar um site. AT+ [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] Rave Reports - Agrupamento
Amigos da lista!!! Estou desenvolvendo um sisteminha para minha empresa que fará o controle das OS's e fará também o acompanhamento dos Clientes da empresa. Comecei a usar o Rave Reports e tive uma grande dúvida. Em minha query fiz um select q está unindo 3 tabelas. SELECT C.CODIGO, C.NOME, C.CGC_CPF, C.ENDERECO, C.NUM, C.COMPLEMENTO, C.BAIRRO, C.MUNICIPIO, C.UF, C.CEP, C.TELEFONE, O.NOME as RESPONSAVEL, A.CODIGO as ACOMPANHAMENTO, A.DATA, A.ASSUNTO, A.DESCRICAO, A.CLIENTE FROM clientes C, operador O, acomp_cli A WHERE C.codigo = A.cliente AND A.operador = O.codigo Estou querendo fazer o seguinte: preciso agrupar os acompanhamentos dos clientes pelo nome, seria algo assim: CLIENTE 1 ACOMPANHAMENTO 1 ACOMPANHAMENTO 2 ... CLIENTE 2 ACOMPANHAMENTO 1 ACOMPANHAMENTO 2 ... Sei que deve ser algo simples mais não estou conseguindo fazer. Já tentei usar o Group Header e Detail, talvez eu tenho feito alguma ligação errada entre as DataBand's. Alguém teria um esquema ou exemplo dessa ligação para me passar. Ficaria muito grato. __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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] Pack em tabela Paradox
Table.Close; Table.excluisve := True; Table.EmptyTable; Table.excluisve := False; Table.Open; -Mensagem original- De: pulschen2004 [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 14:07 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Pack em tabela Paradox Como fazer em Delphi 5 para dar um pack (excluir os registros fisicamente) numa tabela Paradox ? Obrigado e um abraço à todos colegas. -- 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
[delphi-br] Sql em Access
Ola td blz??? To precisando de uma ajudinha de vcs...hehehe.. Tenho um cod sql CREATE TABLE `dolar` (`id` INT, `dolar` Text (20), `data` Text (50), `status` Text (9)) Só que eu preciso dizer que o campo id tem q ser auto numeração mais em access ele naum aceita o a palavra chave Auto_Increment...vcs q trabalham bastante com access qual eh a palavra chave certa... Espero angustiado por uma resposta... T+ Eduardo Buffara Junior - Programador Delphi [EMAIL PROTECTED] (41) 9149.5756 - Paranaguá - PR [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] Pack em tabela Paradox
NÂO FAÇA ISSO Isso vai apagar todo conteudo de sua tabela O Pack elimina apenas os registros deletados. EmtyTable, elimina TODOS os registros - Original Message - From: Eduardo Silva ® [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 4:30 PM Subject: RES: [delphi-br] Pack em tabela Paradox Table.Close; Table.excluisve := True; Table.EmptyTable; Table.excluisve := False; Table.Open; -Mensagem original- De: pulschen2004 [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 14:07 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Pack em tabela Paradox Como fazer em Delphi 5 para dar um pack (excluir os registros fisicamente) numa tabela Paradox ? Obrigado e um abraço à todos colegas. -- 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 -- 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: Rave Reports - Agrupamento
É relativamente simples. Seguindo o seu exemplo, você coloca 2 DataBands. Vou chamá-los de BandClientes e BandAcomp (faça como achar melhor), para exemplificar. O BandClientes fica acima do BandAcomp. No BandClientes defina a propriedade ControllerBand para BandAcomp. No BandClientes defina a propriedade GroupDataView para o seu DataSet e defina a propriedade GroupKey para o campo nome_do_cliente. Ainda em BandClientes, na propriedade BandStyle, marque a opção Group Header. No BandAcomp defina apenas a propriedade DataView para o mesmo DataSet do BandClientes. Acho que eh isso. Se esqueci de algo, me contate via email ou msn (mesmo email). []s. --- Em delphi-br@yahoogrupos.com.br, Wenceslau Miranda [EMAIL PROTECTED] escreveu Amigos da lista!!! Estou desenvolvendo um sisteminha para minha empresa que fará o controle das OS's e fará também o acompanhamento dos Clientes da empresa. Comecei a usar o Rave Reports e tive uma grande dúvida. Em minha query fiz um select q está unindo 3 tabelas. SELECT C.CODIGO, C.NOME, C.CGC_CPF, C.ENDERECO, C.NUM, C.COMPLEMENTO, C.BAIRRO, C.MUNICIPIO, C.UF, C.CEP, C.TELEFONE, O.NOME as RESPONSAVEL, A.CODIGO as ACOMPANHAMENTO, A.DATA, A.ASSUNTO, A.DESCRICAO, A.CLIENTE FROM clientes C, operador O, acomp_cli A WHERE C.codigo = A.cliente AND A.operador = O.codigo Estou querendo fazer o seguinte: preciso agrupar os acompanhamentos dos clientes pelo nome, seria algo assim: CLIENTE 1 ACOMPANHAMENTO 1 ACOMPANHAMENTO 2 ... CLIENTE 2 ACOMPANHAMENTO 1 ACOMPANHAMENTO 2 ... Sei que deve ser algo simples mais não estou conseguindo fazer. Já tentei usar o Group Header e Detail, talvez eu tenho feito alguma ligação errada entre as DataBand's. Alguém teria um esquema ou exemplo dessa ligação para me passar. Ficaria muito grato. __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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] Quero Ajudar a Todos
você pode tb hospedar no http://www.domaindlx.com ele é um servidor de páginas com suporte ASP, vc pode bolar uma pagininha legal e mandar os arquivos pra lá, ah ele tem limite de 100mb e é free, não importa o tempo q fique lá pelo menos meus arquivos nunca foram apagados de lá não. falow ah nao esquece de passa o link pro pessoal ae falow tiago Utilize o servico do site http://www.mandeibem.com.br/ onde o arquivo pode ter até 1 gb e fica disponivel por 7 dias , e ai voce manda o endereço para baixar pelo e-mail da lista Citando Eduardo Silva ® [EMAIL PROTECTED]: Amigo, vc poderia estar criando um e-mail no yahoo mesmo e enviar todo esse material para lá Poderia estar passando o e-mail criado e a senha, assim todo mundo poderia acessar esse e-mail e baixar esse material, o que acha ? No yahoo cabem 100 MB, é espaço pra caramba -Mensagem original- De: ArbSis [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 10:25 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Quero Ajudar a Todos Pessoal, quero ajudar todos os integrantes disponibilizando vairos programas de ajuda de delphi, e varias apostilas, mas tentei coloca-los no yahoo porta arquivos do meu email e naum consegui, algum tem algum espaco de ftp em algum lugar que eu posso por e que o acesso seja publico a todos desta lista, tudo da aproximadamente 10mb, naum adianta ninguem dizer manda pra mim, que eu naum irei mandar em nunhum email, colocarei em algum lugar da net, alguem sabe onde eu possa por -- 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 delphi-br- [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!. [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 delphi-br- [EMAIL PROTECTED] Links do Yahoo! Grupos __ _ Para suas ligações internacionais, disque 00 + 21 + código do país + número do telefone e aproveite as vantagens que só o 21 da Embratel oferece www.embratel.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 delphi-br- [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: [http://br.i1.yimg.com/br.yimg.com/i/br/ads4/2309_lrec_yshoppi ng2.gif] [http://br.i1.yimg.com/br.yimg.com/i/br/ads4/ [keyword ] [OK] 1709_txt_lrec_yshopping2.gif] == = 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!. __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.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] [OFF TOPIC] Leitor de impressão digital
Preciso indicar para um colégio, um leitor de impressão digital, a ser utilizado na identificação dos alunos. O referido leitor, deverá permitir a sua integração com um sistema desenvolvido em Delphi. Alguem recomenda alguma informação ? Obrigado Munhoz -- 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 query em run time
Muito obrigado pela dica aline! mas não abusando muito de sua bondade :), este database também tem como ser criado em tempo de execução ou nao? --- Em delphi-br@yahoogrupos.com.br, Aline Alves Soares [EMAIL PROTECTED] escreveu var Query : TIBQuery; begin Query := nil; Query := TIBQuery.Create(Query); Query.Database:= Database; Query.Transaction := Database.DefaultTransaction; onde Database e um componente do tipo IBDatabase. []'s Aline - Original Message - From: acolombobermudez To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 9:33 AM Subject: [delphi-br] Criar query em run time Bom dia a todos ! Alguem sabe como faço para criar uma query em tempo de execuçao. Estou a utilizar ibquery(paleta interbase). -- 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
[delphi-br] Mensagem de Erro !
Caros colegas, Primeiro, gostaría de agradecer pela ajuda que tenho conseguido mandando mensagens para este grupo. Estou agora com outro problema. Utilizo o Delphi 5, Access e ADO, minha aplicação nas máquinas que utilizam o Windows 98 roda sem problemas, mas nas máquinas que possuem o Windows XP aparece sempre a seguinte mensagem ao fechar as tabelas: Either BOF or EOF is true, or the current record has been deleted. Request operation requires a current record. Alguém já passou pelo mesmo problema ? Obrigado, Luiz [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] Como criar dll
Algguém pode me dizer como posso criar uma dll onde possa guardar as minhas funções ou me indicar alguma apostila ou até mesmo um artigo ensindo como??? Me indicaram olhar no help do delphi mas não conseguir olhar pois é todo em inglês. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Dilema na Migração para 7.0 / 2005
Preciso migrar meus aplicativos de Delphi 5.0 para uma versão superior !!! Tenho a possibilidade de migrar para Delphi 7.0 ou Delphi 2005. O que vocês aconselhariam, visto a experiência de vocês nestas novas versões ??? [ ]'s [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] [OFF TOPIC] Leitor de impressão digital
Já trabalhei com o SecuGen. Ele tem um SDK para desenvolvimento com Delphi (dentre outras linguagens), só que é pago a parte (nao vei com o leitor). Att, Leandro -- Open WebMail Project (http://openwebmail.org) -- Original Message --- From: MHZ Sistemas [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wed, 26 Jan 2005 15:43:27 -0200 Subject: [delphi-br] [OFF TOPIC] Leitor de impressão digital Preciso indicar para um colégio, um leitor de impressão digital, a ser utilizado na identificação dos alunos. O referido leitor, deverá permitir a sua integração com um sistema desenvolvido em Delphi. Alguem recomenda alguma informação ? Obrigado Munhoz -- 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 --- End of Original Message --- -- 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 Firebird-DbExpress - Cannot atach to password database
Tenho um sistema que estava em windows 2000 e agora foi colocado no windows xp. No servidor eu consigo acessar, mas nos clientes dá a mensagem de erro CANNOT ATTACH TO PASSWORD DATABASE.. Alguém pode me ajudar? -- 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] Dilema na Migração para 7.0 / 2005
Se sua empresa ou o projeto em que vc está atuando terá a necessidade futura de rodar sob a plataforma .NET, use o Delphi 2005 para ter seu projeto compilar seu projeto para Win32 e .NET; senão migre para o Delphi 7! []s -Mensagem original- De: Rogério [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 14:27 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Dilema na Migração para 7.0 / 2005 Preciso migrar meus aplicativos de Delphi 5.0 para uma versão superior !!! Tenho a possibilidade de migrar para Delphi 7.0 ou Delphi 2005. O que vocês aconselhariam, visto a experiência de vocês nestas novas versões ??? [ ]'s [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 --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004 -- 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] Imprimir NF modo DOS
Se tiver e puder me mandar, ficarei grato também. Att, Leandro -- Open WebMail Project (http://openwebmail.org) -- Original Message --- From: DelphiStar [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wed, 26 Jan 2005 14:26:03 -0200 Subject: Re: [delphi-br] Imprimir NF modo DOS Oi Leonardo, Boa Tarde Vc teria um exemplo de como emitir Nota Fiscal pelo Fortes Report ??? Se puder me mande em PVT meu email [EMAIL PROTECTED] Desde já agradeço Abraço Ademir -- Gostei muito do Fortes Report... acho que vale a pena utilizá-lo. Leonardo Freitag [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 --- End of Original Message --- -- 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] Como criar dll
Amigo, não me leve a mal, mas se vc esta utilizando um programa americano, no minimo vc tem que arranhar o inglês, no help do delphi tem todos os passos para se escrever uma dll. Além do mais vc manda esta mensagem para várias listas... faça o seguinte compre um livro básico sobre delphi, mas para isto pesquise na internet através dos sites das editoras e tem mais uma coisa, a maioria dos sites sobre delphi tem alguma coisa sobre como escrever e utilizar uma dll. Boa sorte Fausto - Original Message - From: Emerson Moreno [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 4:12 PM Subject: [delphi-br] Como criar dll Algguém pode me dizer como posso criar uma dll onde possa guardar as minhas funções ou me indicar alguma apostila ou até mesmo um artigo ensindo como??? Me indicaram olhar no help do delphi mas não conseguir olhar pois é todo em inglês. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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: 265.7.4 - Release Date: 25/01/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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] SayPrint
Boa Tarde, Gostaria de saber se alguém utiliza o componente SayPrint, que poderia me ajudar com algumas duvidas isso e bastante urgente. Josimar Guedes de Carvalho mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] / mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] Analista de Sistemas - Equipe de DW - INEP-MEC Tel: 55-(61)2104-9760 Cel:55-(61)9635-7272 [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] Pesquisa SQL
Dei uma melhorada na sua função, agora vc pode trocar por qualquer string
quando precisar.
function BuscaTroca(Text, Troca, Busca : string): string;
var
N : Integer;
begin
for N := 1 to Length(Text) do
begin
if Copy(Text,N,1) = ' ' then
begin
Delete(Text,N,1);
Insert(Troca,Text,N);
end;
end;
Result := Troca + Text + Troca;
end;
O que vc acha ?
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 14:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
Você pode usar assim:
Crie essa function:
Function BuscaTroca(Text,Busca : String) : String;
Var N : Integer;
begin
For N := 1 to Length(Text) do
begin
if Copy(Text,N,1) = ' ' then
begin
Delete(Text,N,1);
Insert('%',Text,N);
end;
end;
Result := '%' + Text + '%';
end;
Depois declare uma variável:
Var
Troca : String;
E no seu código utilize assim:
Troca:= BuscaTroca(Edit3.Text,' '); //Para fazer a substituição dos
espaços em branco por %
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE QuotedStr(Troca));
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Willian Jerônymo
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:27 PM
Subject: RES: [delphi-br] Pesquisa SQL
Willian passa essa função pra mim que eu tentei fazer do jeito que
colocaram
com e não to conseguindo
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma coisa você
pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode fazer de
uma
maneira automática
trocando os espaços em branco por % que fica melhor para o usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
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
Re: [delphi-br] Como criar dll
Fausto O cara só fez uma pergunta...ta certo q na assinatura dele ta Desenvolvedor, mas ele não é obrigado a saber tudopega leve :P - Original Message - From: Evolution [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 4:36 PM Subject: Re: [delphi-br] Como criar dll Amigo, não me leve a mal, mas se vc esta utilizando um programa americano, no minimo vc tem que arranhar o inglês, no help do delphi tem todos os passos para se escrever uma dll. Além do mais vc manda esta mensagem para várias listas... faça o seguinte compre um livro básico sobre delphi, mas para isto pesquise na internet através dos sites das editoras e tem mais uma coisa, a maioria dos sites sobre delphi tem alguma coisa sobre como escrever e utilizar uma dll. Boa sorte Fausto - Original Message - From: Emerson Moreno [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 4:12 PM Subject: [delphi-br] Como criar dll Algguém pode me dizer como posso criar uma dll onde possa guardar as minhas funções ou me indicar alguma apostila ou até mesmo um artigo ensindo como??? Me indicaram olhar no help do delphi mas não conseguir olhar pois é todo em inglês. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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: 265.7.4 - Release Date: 25/01/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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
Re: [delphi-br] Como criar dll
Criar DLL File - New - Other ~, na guia new tem DLL wisard.. barbadinha, depois tu entra em www.clubedelphi.net q tem alguns exemplos - Original Message - From: Emerson Moreno [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 4:12 PM Subject: [delphi-br] Como criar dll Algguém pode me dizer como posso criar uma dll onde possa guardar as minhas funções ou me indicar alguma apostila ou até mesmo um artigo ensindo como??? Me indicaram olhar no help do delphi mas não conseguir olhar pois é todo em inglês. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Perguntinha básica (DBX)
Olá, Dica: 1) remova todos os fields do clientdataset; 2) vá até o sqlquery e remova os fields também; 3) agora veja este novo select. (o que voce passou ficou meio confuso, este é apenas um exemplo); select t.codped, t.dataped, c.nomecli, c.endercli, c.cpf_cnpj_cli from TBL_PED t left join TBL_CLI c on c.CODCLI = t.CODCLI 4) volte ao sqlquery e adicione novamente os campos. Os providerflags dos campos NOMECLI e ENDERCLI devem estar todos = false. Os providerflags do campo DATAPED deve estar apenas com 'pfInUpdate' = true. Os providerflags do campo CODPED deve estar com 'pfInUpdate', 'pfInWhere' e 'pfInKey' como true. 5) vá no datasetprovider e altere o updatemode para upWhereKeyOnly. 6) vá ao clientdataset e adicione novamente os campos. Não é preciso modificar nada. Teste e reporte para nós. []'s Alexandre Oliveira Campioni Analista de Sistemas A-Tecnologia e Sistemas de Informacao Ltda. Sao Joaquim da Barra - Sao Paulo - Brazil [EMAIL PROTECTED] -Mensagem original- De: Alan [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 13:03 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Perguntinha básica (DBX) e ae Thiago, blz?? só agora li teu e-mail.. cara eu ja tinha feito isso, não resolveu, não manjo muito de DBX, mas esse metodo eu tinha visto em uma revista do ClubeDelphi e não funcinou :( c tiver alguma outra dica eu aceito abraço - Original Message - From: Francisco Thiago de Almeida [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 9:19 AM Subject: Re: [delphi-br] Perguntinha básica (DBX) O campo com o subselect.. Adicione ele no Field Editor e retire da opção ProviderFlags todas as opções Com isso acredito que funcione... (faça isso no CDS e no SQLQuery) Espero ter ajudado Thiago - Original Message - From: Alan [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 25, 2005 3:25 PM Subject: [delphi-br] Perguntinha básica (DBX) começei a usar o DBX agoraeu tenho uma SQLQuery , um DataSetProvider e um ClientDataSet faço uma selecção, tipo Select T.CODALGUMACOISA, T.CODOUTRACOISA, T.DESCRICAO, (Select DESCRICAO from OUTRATABELA where CODOUTRACOISA = T.CODOUTRACOISA) as CODOUTRACOISA_D from TABELA T é mais ou menos issoquando não tinha um SubSelect funcionava blz apenas com um applyupdates, alguem pode me dar uma dica como eu faço agora??? com esse subselect no meio? [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: Pesquisa SQL
Olá Willian Jerônymo,
Vivendo e Aprendendo, muito legal !!!
Um abraço,
Carlos
--- Em delphi-br@yahoogrupos.com.br, Willian Jerônymo - Yahoo
[EMAIL PROTECTED] escreveu
Você pode usar assim:
Crie essa function:
Function BuscaTroca(Text,Busca : String) : String;
Var N : Integer;
begin
For N := 1 to Length(Text) do
begin
if Copy(Text,N,1) = ' ' then
begin
Delete(Text,N,1);
Insert('%',Text,N);
end;
end;
Result := '%' + Text + '%';
end;
Depois declare uma variável:
Var
Troca : String;
E no seu código utilize assim:
Troca:= BuscaTroca(Edit3.Text,' '); //Para fazer a substituição dos
espaços em branco por %
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE QuotedStr(Troca));
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Willian Jerônymo
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:27 PM
Subject: RES: [delphi-br] Pesquisa SQL
Willian passa essa função pra mim que eu tentei fazer do jeito
que colocaram
com e não to conseguindo
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma
coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode
fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o
usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome
completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome
completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd
LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
--
--
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:
São Paulo Rio de Janeiro Curitiba Porto Alegre
Belo Horizonte Brasília
Re: [delphi-br] Mensagem de Erro !
Esse erro é de versão do MDAC diferente entre as maquinas, faça o levantamento das versões instaladas e deixe a mesma em todas as maquinas. []´s Rodrigo O. Farias - Original Message - From: Depto de Informatica To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 3:08 PM Subject: [delphi-br] Mensagem de Erro ! Caros colegas, Primeiro, gostaría de agradecer pela ajuda que tenho conseguido mandando mensagens para este grupo. Estou agora com outro problema. Utilizo o Delphi 5, Access e ADO, minha aplicação nas máquinas que utilizam o Windows 98 roda sem problemas, mas nas máquinas que possuem o Windows XP aparece sempre a seguinte mensagem ao fechar as tabelas: Either BOF or EOF is true, or the current record has been deleted. Request operation requires a current record. Alguém já passou pelo mesmo problema ? Obrigado, Luiz [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!. -- 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] Como criar dll
O requisito basico para um programador é saber ingles técnico, eu nao consigo imaginar alguém programando em qualquer linguagem sem saber ingles. Mas se mesmo assim você ainda quiser é só abrir o google digitar Delphi DLL e escolher para só trazer paginas em portugues que com certeza aparecerão dezenas de sites em portugues ensinando a montar um dll. Se eu recomendei que vc olhasse no help foi só para o seu bem, a melhor ferramenta de apoio do Delphi é o seu help, é melhor que qualquer lista de discussão, melhor que qualquer site na rede, nenhum programador vai conseguir avançar na area sem saber ler o help da ferramenta que usa. []´s Rodrigo O. Farias - Original Message - From: Emerson Moreno To: delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 4:12 PM Subject: [delphi-br] Como criar dll Algguém pode me dizer como posso criar uma dll onde possa guardar as minhas funções ou me indicar alguma apostila ou até mesmo um artigo ensindo como??? Me indicaram olhar no help do delphi mas não conseguir olhar pois é todo em inglês. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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!. -- 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] mysql pelo SQL Explorer
Seguinte, para vc trabalhar com mysql acessando via delphi...o ideal é q vc utilize a middleware DBExpress. Para acessar e manipular o banco...tem uma ferramenta muito legal chamada MySq-Front. Digita no google e baixa. Sempre as ordens. []´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 www.sqlmagazine.com.br - www.neoficio.com.br/msdn - www.javamagazine.com.br www.portalwebmobile.com.br - Original Message - From: Rondinelle Lima Bispo [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 25, 2005 5:43 PM Subject: [delphi-br] mysql pelo SQL Explorer amigos como faço pra acessar minhas tabelas do mysql pelo SQL Explorer do Delphi, tentei fazer mas naum encontrei o drive delealguem ai pode me ajudar? -- 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] Problema com Master-Detail
Olá,
Você já tentou usar o evento UpdateData ao invés de UpdateRecord ? Este
evento ocorre antes do início da atualização do pacote inteiro vindo do lado
cliente para o servidor. Aqui também pode-se levantar uma exceção ou até
mesmo modificar algum valor antes de começar a atualização.
procedure TForm1.dspPessoaUpdateData(Sender: TObject; DataSet:
TCustomClientDataSet);
begin
if DataSet.FieldByName('VALIDADE').AsDateTime=Date then
RAISE Exception.Create('A data de validade do cadastro deve ser '+
'posterior à '+DateToStr(Date)+'!');
end;
Creio que UPDATEBEFORERECORD trata registro a registro. Se o SALARIO é um
campo com um valor inválido de registro na detalhe, daí...furou o esquema.
De qualquer modo posso estar enganado também, mas teste aí e reporte.
[]'s
Alexandre Oliveira Campioni
Analista de Sistemas
A-Tecnologia e Sistemas de Informacao Ltda.
Sao Joaquim da Barra - Sao Paulo - Brazil
[EMAIL PROTECTED]
-Mensagem original-
De: Rodrigo Schiavo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 12:58
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Problema com Master-Detail
Olá Francisco obrigado pela ajuda, seu e-mail foi muito útil pois modifiquei
a forma como o código estava sendo gerado para o Mestre e o Detalhe porém
meu problema na validação dos campos persiste.
Obs: eu tb estou tentando usar n-tier seguindo o exemplo do Bruno que foi
publicado na edição 56 da revista ClubeDelphi, porém estas dúvidas estão me
prendendo aqui
Veja abaixo o exemplo do meu problema e como ficou o procedimento modificado
( a parte em negrito é onde esta a minha dor de cabeça):
procedure TForm1.dspPessoaBeforeUpdateRecord(Sender: TObject;
SourceDS: TDataSet; DeltaDS: TCustomClientDataSet;
UpdateKind: TUpdateKind; var Applied: Boolean); const
{$J+} // Ativa constantes tipadas
CODIGO: Integer = -1;
{$J-} //Desativa constantes tipadas
begin
if (UpdateKind in [ukInsert, ukModify]) then
with DeltaDS do
begin
{
Se esta exceção ocorrer nada é gravado na base de dados e o CDS fica
em
modo de edição, por que o campo VALIDADE pertence a tabela MESTRE
}
// Verifica se VALIDADE é maior que o dia atual
if Assigned(FindField('VALIDADE')) then //Se o campo estiver presente
no Delta
if not VarIsEmpty(FindField('VALIDADE').NewValue) then //Se o campo
não estiver vazio
if (FindField('VALIDADE').NewValue=Date) then //Se o valor do
campo for menor que a data atual
raise EDatabaseError.Create('A data de validade do cadastro deve
ser '+
'posterior à '+DateToStr(Date)+'!');*
{
O problema esta aqui, se esta exceção ocorrer os dados da tabela
Mestre (PESSOA)
são gravados na base de dados, a exceção é gerada, o registro fica em
modo de
edição, porém se o usuário cancelar a operação, os dados da tabela
mestre que ja foram
gravados ficam na base de dados sem os detalhes por que SALARIO
pertence a tabela DETALHE
}
// Verifica se SALARIO é maior que 0
if Assigned(FindField('SALARIO')) then //Se o campo estiver no Delta*
*if not VarIsEmpty(FindField('SALARIO').NewValue) then //Se o
campo não estiver vazio*
* if (FindField('SALARIO').NewValue=0) then //Se o valor do
salário for menor que 1
raise EDatabaseError.Create('Salário deve ser um valor maior do
que 0!');
*end;
if (UpdateKind=ukInsert) then
with DeltaDS do
begin
Edit;
// Se é o mestre gera código
if SourceDS = sqlPessoa then
begin
sqlGeraID.Open;
CODIGO := sqlGeraID.FieldValues['CODIGO']+1;
sqlGeraID.Close;
end;
FieldByName('CODIGO').AsInteger := CODIGO;
Post;
end;
end;
Francisco Thiago de Almeida escreveu:
Olá Rodrigo!
Tudo bem? Espero que sim
Veja bem, a melhor forma de fazer o mestre - detalhe com DBX e CDs é
da seguinte forma:
SQLMestre
Select * from Mestre
SQLDetalhe
Select * from Detalhe
where campo_fk = :campo_pk // Este campo deve ter o MESMO nome do
campo chave na tabela Mestre
Feito isso, adicione um DataSource ao seu DM..e faça o seguinte
TDataSource
DataSet = sqlMestre
E na propriedade DataSource do sqlDetalhe aponte para o DataSource criado!
Vóilà! está criado o mestre detalhe...
Adicione um DataSetProvider e aponte a propriedade DataSet para o
SQLMestre...
Adicione um Cds e aponte a propriedade Provider para o Provider criado
anteriormente. Adicione todos os campo.. Observe dentre os campos,
aparecerá um sqlDetalhe.
Adicione outro dataset... e na propriedade DataSetFields, infome o
sqlDetalhe que aparecerá na listagem...
Agora... Detalhe... Em aplicações Multicamadas (SOAP no meu caso) só
isso não funcionou... tive de escrever o seguinte método no
BeforeUpdateRecord
const
{$J+} // Ativa constantes tipadas
qg:Integer = -1;
{$J-}//Desativa constantes tipadas
begin
if
Res: Re: [delphi-br] [OFF TOPIC] Leitor de impressão digital
de uma olhada em http://www.griaule.com/contacesso.php [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: 01/26/05 16:32:09 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] [OFF TOPIC] Leitor de impressão digital Já trabalhei com o SecuGen. Ele tem um SDK para desenvolvimento com Delphi (dentre outras linguagens), só que é pago a parte (nao vei com o leitor). Att, Leandro -- Open WebMail Project (http://openwebmail.org) -- Original Message --- From: MHZ Sistemas [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wed, 26 Jan 2005 15:43:27 -0200 Subject: [delphi-br] [OFF TOPIC] Leitor de impressão digital Preciso indicar para um colégio, um leitor de impressão digital, a ser utilizado na identificação dos alunos. O referido leitor, deverá permitir a sua integração com um sistema desenvolvido em Delphi. Alguem recomenda alguma informação ? Obrigado Munhoz -- 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 --- End of Original Message --- -- 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: 265.7.4 - Release Date: 25/01/2005 . -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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] Perguntinha básica (DBX)
Alexandre, Cara o teu funcionou perfeitamente, mas eu já havia implementado da seguinte forma... 1. Coloca o SQL dentro do SQLQuery..(pode ser o SubSelect ou como tu me mandastr Join) 2. Adicionar os Field da SQLQuery, setar apenas providerflags da chave (CODPESSOA, por exemplo) para pflnkey = true, o resto deixa igual 3 Coloca o DataSetProvider DataSetProvider.DataSet := SQLQuery DataSetProvider.UpdateMode := upWhereKeyOnly 4. no evendo OnGetTableName do DataSetProvider TableName = NOME_DA_TABELA q vai atualizar 5 Coloca o ClientDataSet ClientDataSet.ProviderName := DataSetProvider 6. no evendo OnAfterPost e OnAfterDelete do ClientDataSet coloca o ClientDataSet.ApplyUpdates(-1); por exemplo, tenho Select T.CODALGUMACOISA, T.CODOUTRACOISA, T.DESCRICAO, (Select DESCRICAO from OUTRATABELA where CODOUTRACOISA = T.CODOUTRACOISA) as CODOUTRACOISA_D from TABELA T com eu tinha usando, em TableName := 'TABELA' e prontinho... valeu pela ajuda moçada... []'s - Original Message - From: Alexandre Oliveira [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 5:54 PM Subject: RES: [delphi-br] Perguntinha básica (DBX) Olá, Dica: 1) remova todos os fields do clientdataset; 2) vá até o sqlquery e remova os fields também; 3) agora veja este novo select. (o que voce passou ficou meio confuso, este é apenas um exemplo); select t.codped, t.dataped, c.nomecli, c.endercli, c.cpf_cnpj_cli from TBL_PED t left join TBL_CLI c on c.CODCLI = t.CODCLI 4) volte ao sqlquery e adicione novamente os campos. Os providerflags dos campos NOMECLI e ENDERCLI devem estar todos = false. Os providerflags do campo DATAPED deve estar apenas com 'pfInUpdate' = true. Os providerflags do campo CODPED deve estar com 'pfInUpdate', 'pfInWhere' e 'pfInKey' como true. 5) vá no datasetprovider e altere o updatemode para upWhereKeyOnly. 6) vá ao clientdataset e adicione novamente os campos. Não é preciso modificar nada. Teste e reporte para nós. []'s Alexandre Oliveira Campioni Analista de Sistemas A-Tecnologia e Sistemas de Informacao Ltda. Sao Joaquim da Barra - Sao Paulo - Brazil [EMAIL PROTECTED] -Mensagem original- De: Alan [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 13:03 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Perguntinha básica (DBX) e ae Thiago, blz?? só agora li teu e-mail.. cara eu ja tinha feito isso, não resolveu, não manjo muito de DBX, mas esse metodo eu tinha visto em uma revista do ClubeDelphi e não funcinou :( c tiver alguma outra dica eu aceito abraço - Original Message - From: Francisco Thiago de Almeida [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 9:19 AM Subject: Re: [delphi-br] Perguntinha básica (DBX) O campo com o subselect.. Adicione ele no Field Editor e retire da opção ProviderFlags todas as opções Com isso acredito que funcione... (faça isso no CDS e no SQLQuery) Espero ter ajudado Thiago - Original Message - From: Alan [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 25, 2005 3:25 PM Subject: [delphi-br] Perguntinha básica (DBX) começei a usar o DBX agoraeu tenho uma SQLQuery , um DataSetProvider e um ClientDataSet faço uma selecção, tipo Select T.CODALGUMACOISA, T.CODOUTRACOISA, T.DESCRICAO, (Select DESCRICAO from OUTRATABELA where CODOUTRACOISA = T.CODOUTRACOISA) as CODOUTRACOISA_D from TABELA T é mais ou menos issoquando não tinha um SubSelect funcionava blz apenas com um applyupdates, alguem pode me dar uma dica como eu faço agora??? com esse subselect no meio? [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
[delphi-br] AVI
pessoal, alguém possui um .avi que simula a criação de senhas Ou mesmo, me indicar um site. AT+ [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] Como criar dll
Fausto, obrigado por perder seu tempo em responder a minha pergunta, porém como todo mundo ainda preciso aprender mais, meu inglês não é dos melhores por isso pedi a ajuda de vcs e em relação a aparecer várias mensagens minha é por mando para alguns foruns que estou cadastrado, assim como vc tb está cadastrado. Devemos ser humildes o suficiente para saber que não sabemos tudo e aceitar isso. Pois me coloco a disposição de todos onde puder ou souber ajudar assim como preciso também da ajudas de nosso amigos programadores. PS. Obrigado Alan por me entender. Anteciosamente On Wed, 26 Jan 2005 16:48:21 -0200, Alan [EMAIL PROTECTED] wrote: Fausto O cara só fez uma pergunta...ta certo q na assinatura dele ta Desenvolvedor, mas ele não é obrigado a saber tudopega leve :P - Original Message - From: Evolution [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 4:36 PM Subject: Re: [delphi-br] Como criar dll Amigo, não me leve a mal, mas se vc esta utilizando um programa americano, no minimo vc tem que arranhar o inglês, no help do delphi tem todos os passos para se escrever uma dll. Além do mais vc manda esta mensagem para várias listas... faça o seguinte compre um livro básico sobre delphi, mas para isto pesquise na internet através dos sites das editoras e tem mais uma coisa, a maioria dos sites sobre delphi tem alguma coisa sobre como escrever e utilizar uma dll. Boa sorte Fausto - Original Message - From: Emerson Moreno [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Wednesday, January 26, 2005 4:12 PM Subject: [delphi-br] Como criar dll Algguém pode me dizer como posso criar uma dll onde possa guardar as minhas funções ou me indicar alguma apostila ou até mesmo um artigo ensindo como??? Me indicaram olhar no help do delphi mas não conseguir olhar pois é todo em inglês. Obrigado. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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: 265.7.4 - Release Date: 25/01/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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] 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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Dilema na Migração para 7.0 / 2005
Assino em baixo.. Vamos fazer uma analogia, se vc pode comprar um pentium IV, porque compraria um celeron? O Alessandro disse muito bem, vc tem que pensar para frente...hoje sua empresa pode não se interessar pelo .net, mas quem dirá amanhã? Fausto - Original Message - From: Alessandro Fernandes [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 26, 2005 5:52 PM Subject: RES: [delphi-br] Dilema na Migração para 7.0 / 2005 Não concordo! Independente de se sua empresa pretende ou não trabalhar com .NET, não existe motivo para migrar suas aplicações Delphi 5 para outra versão que não o Delphi 2005. É sem dúvida a melhor versão de Delphi já lançada! Aconselho veementemente a migração para o Delphi 2005. Talvez você tenha que fazer algum upgrade de hardware mas vale a pena. Um abraço. _ Alessandro Cunha Fernandes SoftTI - Software e Consultoria e TI. [EMAIL PROTECTED] Fone/Fax: +55 24 2458-4538 VAI IMPRIMIR? Pense antes em sua responsabilidade com a preservação do meio ambiente e com a redução de seus custos. _ De: Rubem Rocha [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 16:31 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Dilema na Migração para 7.0 / 2005 Prioridade: Alta Se sua empresa ou o projeto em que vc está atuando terá a necessidade futura de rodar sob a plataforma .NET, use o Delphi 2005 para ter seu projeto compilar seu projeto para Win32 e .NET; senão migre para o Delphi 7! []s -Mensagem original- De: Rogério [mailto:[EMAIL PROTECTED] Enviada em: quarta-feira, 26 de janeiro de 2005 14:27 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Dilema na Migração para 7.0 / 2005 Preciso migrar meus aplicativos de Delphi 5.0 para uma versão superior !!! Tenho a possibilidade de migrar para Delphi 7.0 ou Delphi 2005. O que vocês aconselhariam, visto a experiência de vocês nestas novas versões ??? [ ]'s [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 --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004 -- 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=12aboblro/M=264379.5078783.6203979.1588051/D=brc lubs/S=2137111264:HM/EXP=1106850805/A=2191897/R=0/SIG=10vqa2grn/*http://br.d iversao.yahoo.com/ http://br.rd.yahoo.com/SIG=12aboblro/M=264379.5078783.6203979.1588051/D=brc lubs/S=2137111264:HM/EXP=1106850805/A=2191897/R=1/SIG=10vqa2grn/*http://br.d iversao.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 -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.4 - Release Date: 25/01/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] Re: Pesquisa SQL
Carlos,
Ou então vc pode usar a função StringReplace do Delphi ;-)
Ex.:
Var
Troca : String;
E no seu código utilize assim:
Troca:= StringReplace(Edit3.Text,' ','%',[rfReplaceAll]);
[ ]´s
Moacir
carlos alberto do amaral escreveu:
Olá Willian Jerônymo,
Vivendo e Aprendendo, muito legal !!!
Um abraço,
Carlos
--- Em delphi-br@yahoogrupos.com.br, Willian Jerônymo - Yahoo
[EMAIL PROTECTED] escreveu
Você pode usar assim:
Crie essa function:
Function BuscaTroca(Text,Busca : String) : String;
Var N : Integer;
begin
For N := 1 to Length(Text) do
begin
if Copy(Text,N,1) = ' ' then
begin
Delete(Text,N,1);
Insert('%',Text,N);
end;
end;
Result := '%' + Text + '%';
end;
Depois declare uma variável:
Var
Troca : String;
E no seu código utilize assim:
Troca:= BuscaTroca(Edit3.Text,' '); //Para fazer a substituição dos
espaços em branco por %
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd LIKE QuotedStr(Troca));
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Willian Jerônymo
- Original Message -
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 1:27 PM
Subject: RES: [delphi-br] Pesquisa SQL
Willian passa essa função pra mim que eu tentei fazer do jeito
que colocaram
com e não to conseguindo
-Mensagem original-
De: Willian Jerônymo - Yahoo [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 26 de janeiro de 2005 13:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pesquisa SQL
O que você pode fazer é quando alguém for consultar alguma
coisa você pode
instruir a pessoal a digitar da seguinte maneira
no seu Edit: %SHAMPOO%300ML% que irá dar certo, ou você pode
fazer de uma
maneira automática
trocando os espaços em branco por % que fica melhor para o
usuário.
Se quiser te passo uma função que faz essa troca.
Willian Jerônymo
- Original Message -
From: fabianojd
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 2:18 AM
Subject: [delphi-br] Pesquisa SQL
Gostaria de fazer pesquisa SQL por partes do nome
completo. Ex.
quero achar um SHAMPOO com 300ML, mas não sei o nome
completo. Então
digitaria: SHAMPOO 300ML.
Normalmente o nome é: SHAMPOO NOME 300ML.
a funcção que uso é:
Begin
Close;
SQL.Clear;
SQL.Add('SELECT * from Produtos');
SQL.Add('Where DescProd
LIKE ''%'+Edit3.text+'%'' ');
Open;
if DBEdit1.Text='' then
ShowMessage('Nome não cadastrado');
Edit3.Setfocus;
end;
Obrigado.
--
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:
--
--
--
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
Re: RES: [delphi-br] ATUALIZAR UMA STORED PROCEDURES
Mas como eu faço isso Juarez? On Tue, 25 Jan 2005 15:14:47 -0300, Juarez [EMAIL PROTECTED] wrote: Em vez de criar um script que atualize a tua stored procedure, não seria mais fácil criar um script que exclua a stored procedure existente e depois crie uma nova stored procedure com todas as tuas alterações? Juarez De: Emerson Moreno [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 25 de janeiro de 2005 09:17 Para: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Assunto: [delphi-br] ATUALIZAR UMA STORED PROCEDURES Amigos estou com grande problema e não sei resolver. Eu tenho um procedure no banco FireBird 1.5 que fui obrigado a alterar algumas coisas inclusive as variáveis que estão na procedure, agora preciso fazer um script para atualizar essa procedure mas não sei como fazer. Por favor alguém poderia me ajudar estou com uma certa urrgência. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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!. [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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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] Sistema com banco de dados em rede.
Oi pessoal, estou desenvolvendo um sistema, simplismente para estudo, o sistema deve rodar em rede, eu desejaria fazer isso da seguinte maneira, alias nem sei se da de fazer assim, más acredito que sim. Quero fazer o sistema com um arquivo INI, onde eu posso alterar o caminho do banco de dados atraves do arquivo ini. - 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] Query e Table com DBGrid
Oi, tenho uma dúvida. Antes de levar esporro: já procurei no google e no help. hehehehehehehehehe Tenho um DBGrid associado a um TQuery com consulta filtrada. Quero fazer alterações (tipo excluir, atualizar, etc). Não consigo. A solução que encontrei foi colocar um TTable e criar uma rotina que seleciona o mesmo do TQuery no TTable. Tem como sincronizar isto, sem usar a propriedade filter do Ttable? Abraços, Márcio Frossard -- 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] Posicionar Cursor dentro de Um Edit ??
Tipo... queria colocar o cursor(setar focus) do teclado (selecionado ou não) em uma determinada posição do texto de um EDIT, exemplo...Tenho um campo com essa máscara 9-99, sendo pois, quero colocar o foco nos ultimos dois números...Não quero separar em dois EDIT's...Tem como ?? Tkzzz...!!! From: Emerson Moreno [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Posicionar Cursor dentro de Um Edit ?? Date: Tue, 25 Jan 2005 08:17:57 -0300 Vc quer posicionar o cursos em determinado ponto ou quer simplesmente jogar o foco lá dentro, bom se for só jogar o foco lá vai Edit1.setfocus. On Mon, 24 Jan 2005 15:37:01 +, PoPo EcHo [EMAIL PROTECTED] wrote: Olá! Gostaria de posicionar o cursor em uma determinada posição de um Edit ou MaskEdit...Tem jeito??? Ex:Posiconar no ultimo caracter do texto do Mask!! Grato... _ 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] 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!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- 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 _ MSN Messenger: converse online com seus amigos . 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
