date:20071021

Res: [delphi-br] Dúvida com query

2007-10-21 Por tôpico Robson

Em firebird separe as clausulas where com parenteses tipo:
... where (STATUS = 1) OR (STATUS = 7) OR (STATUS=8)
ou
... where (STATUS = '1') OR (STATUS = '7') OR (STATUS='8')
Como o Edson informou este segundo se STATUS for alfanumerico, varchar, e etc...
 
 
Kaputz, Robson
Skype: kaputz_gri
"Keep the Dream Alive"



- Mensagem original 
De: Edison DRP <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 21 de Outubro de 2007 12:15:07
Assunto: Re: [delphi-br] Dúvida com query

Select .. where Status = '1' OR status = '7' e usar aspas se 1 e 7
não forem valores numérciso

Edison

- Original Message - 
From: "Ralp Alves Bezerra" <[EMAIL PROTECTED] .com.br>
To: "Delphi BR" <[EMAIL PROTECTED] os.com.br>
Sent: Sunday, October 21, 2007 10:09 AM
Subject: [delphi-br] Dúvida com query

> Nobres colegas,
>
> Preciso listar em uma consulta os alunos que tenham o status igual a 1,
> 7 e 8 somente. Porém a consulta não retorna os dados solicitados.
>
> Já tentei trocar a linha:
> Sql.Add('Status= "1" and Status="7" and Status="8" and');
> por :
> Sql.Add('Status= "1" or Status="7" or Status="8" and'); mas não funciona.
>
> Alguém poderia me dar uma luz.
>
> Grato
>
> estou com uma dúvida nesta consulta abaixo:
>
> If Radio1.ItemIndex= 12 then // Turma da Escola
> Begin
> With qrPesqAluno do
> Begin
> Close;
> Sql.Clear;
> Sql.Add('Select * From Alunos');
> If All.Checked= False then
> Begin
> Sql.Add('Where CodigoDaEscola= :CodEsc and');
> Sql.Add('Status= "1" and Status="7" and Status="8" and');
> < dúvida nesta linha
> Sql.Add('TipoDeEnsi noD=:TE and');
> Sql.Add('TurmaD= :TR and');
> Sql.Add('SerieD= :SE and');
> Sql.Add('TurnoD= :TU');
> Sql.Add('Order By Nome');
> ParamByName( 'CodEsc') .Value:=rxdbLook upCombo9. Text;
> ParamByName( 'TE').Value :=rxdbLookupCombo21 .Text;
> ParamByName( 'TR').Value :=rxdbLookupCombo12 .Text;
> ParamByName( 'SE').Value :=rxdbLookupCombo13 .Text;
> ParamByName( 'TU').Value :=rxdbLookupCombo14 .Text;
>
> end else begin
> Sql.Add('Where TipoDeEnsinoD= :TE and');
> Sql.Add('TurmaD= :TR and');
> Sql.Add('SerieD= :SE and');
> Sql.Add('TurnoD= :TU');
> Sql.Add('Order By Nome');
> ParamByName( 'TE').Value :=rxdbLookupCombo21 .Text;
> ParamByName( 'TR').Value :=rxdbLookupCombo12 .Text;
> ParamByName( 'SE').Value :=rxdbLookupCombo13 .Text;
> ParamByName( 'TU').Value :=rxdbLookupCombo14 .Text;
> end;
> Open
> end;
> if qrPesqAluno. IsEmpty Then ShowMessage( 'Registro não encontrado!' )
> end;
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Links do Yahoo! Grupos
>
>
>





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]

Re: [delphi-br] Como otimizar essa qry?

2007-10-21 Por tôpico Rodrigo Mota

Opa valew,

funcionou melhor...mas demora um pouco devido a qtd de registros,
irei verificar amanhã as conf. do servidor, qq coisa indico um upgrade
para melhorar mais.

Ja deu uma melhorada enorme..

att,

Rodrigo Mota.


 Sun, 21 Oct 2007 17:32:29 -0300, "Eduardo Silva dos Santos" <[EMAIL 
PROTECTED]> escreveu:

> A Sugestão do Rubem é ótima, verifique também se existe um índice para o
> campo "cadastro" da tabela "orpenf" usado no Where.
> 
> 
> Em 21/10/07, Rubem Nascimento da Rocha <[EMAIL PROTECTED]> escreveu:
> >
> >
> > Tenta isso:
> >
> >   select distinct cad.codigo, cad.nome
> > from orpenf join cadastro cad on cad.codigo = orpenf.codigo
> >where orpenf.cadastro not between date_sub(curdate(), interval 90 day)
> > and curdate()
> >
> > Sds.
> >
> >
> >
> > 
> > To: delphi-br@yahoogrupos.com.br
> > From: [EMAIL PROTECTED]
> > Date: Sun, 21 Oct 2007 18:16:44 -0300
> > Subject: [delphi-br] Como otimizar essa qry?
> >
> >
> > Boa tarde Galera,
> >
> > Sei que aqui é Delphi 
> >
> > Preciso fazer o seguinte listar os clientes que ainda não comprar em nos
> > ultimos 3 meses
> >
> > Tenho
> >
> > Clientes -> Tabela de Clientes -> 23000 mil registros aproximadamente
> >
> > Orpenf -> Ordem de pedidos -> aqui 18000 mil aproximadamente...
> >
> > A qry até fiz...o problema é que está lento pra kctcomo não tenho no
> > momento a conf. Do Servidor...
> >
> > fica ruim pra eu abusar...gostaria de otimizar, se puderem ajudar,
> > agradeço.
> >
> > SELECT cad.nome, cad.codigo
> >
> > From cadastro cad
> >
> > where cad.codigo not in (select cliente
> >
> > from orpenf
> >
> > where cadastro
> >
> > BETWEEN DATE_SUB(curdate(), INTERVAL 90 DAY)
> > and CURDATE()
> >
> > )
> >
> > O banco é MySQL
> >
> > Ta demorando pacas...se tiver um jeito mais inteligente..., se não verei
> > com
> > o cliente a possibilidade de Upgrade
> >
> > No Servidor...
> >
> > Abs,
> >
> > Rodrigo Mota.
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> >
> > _
> > Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live
> > Search Maps!
> > http://www.livemaps.com.br/index.aspx?tr=true
> >
> > --
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> 
> 
> -- 
> ...
> Eduardo Silva dos Santos
> DRD Sistemas.
> (27) 3218-4201
> MSN: [EMAIL PROTECTED]
> Site: http://www.drdsistemas.com/
> ...
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> Links do Yahoo! Grupos
> 
>  
> 
> 
>

Re: [delphi-br] Relatorio_laz

2007-10-21 Por tôpico Joao Morais

mclpaltrin wrote:
> - Trabalho com lazarus a pouco tempo, espero contar com a ajuda dos
> especialista deste grupo.

Aqui falamos apenas de Delphi. Tem um grupo muito bom de Lazarus no 
Yahoo: http://br.groups.yahoo.com/group/lazarus-brasil

--
Joao Morais

[delphi-br] Relatorio_laz

2007-10-21 Por tôpico mclpaltrin

Prezados

- Trabalho com lazarus a pouco tempo, espero contar com a ajuda dos
especialista deste grupo.

- Preciso desenvolver um relatório em lazarus usando LazReport só que
nunca fiz nada parecido , pesquisei na net mas os exemplo são muito
complicados, enfim alguém poderia me passar um exemplo por gentileza,
estou usando postgresql.
Vou deixar um table para o exemplo ficar mais fácil para entendimento
meu .

Create table produtos ( codprd Char(4) NOT NULL, -- 'Codigo Produto'
 nomprd Varchar(30) NOT NULL, -- 'Nome do Produto'
 dscprd Varchar(45) NOT NULL, -- 'Descricao do Produto'
 undprd Char(3), -- 'Unidade do Produto'
  Primary Key (codprd));

Grato, Aguardo
Marcelo

Re: [delphi-br] Como otimizar essa qry?

2007-10-21 Por tôpico Eduardo Silva dos Santos

A Sugestão do Rubem é ótima, verifique também se existe um índice para o
campo "cadastro" da tabela "orpenf" usado no Where.


Em 21/10/07, Rubem Nascimento da Rocha <[EMAIL PROTECTED]> escreveu:
>
>
> Tenta isso:
>
>   select distinct cad.codigo, cad.nome
> from orpenf join cadastro cad on cad.codigo = orpenf.codigo
>where orpenf.cadastro not between date_sub(curdate(), interval 90 day)
> and curdate()
>
> Sds.
>
>
>
> 
> To: delphi-br@yahoogrupos.com.br
> From: [EMAIL PROTECTED]
> Date: Sun, 21 Oct 2007 18:16:44 -0300
> Subject: [delphi-br] Como otimizar essa qry?
>
>
> Boa tarde Galera,
>
> Sei que aqui é Delphi 
>
> Preciso fazer o seguinte listar os clientes que ainda não comprar em nos
> ultimos 3 meses
>
> Tenho
>
> Clientes -> Tabela de Clientes -> 23000 mil registros aproximadamente
>
> Orpenf -> Ordem de pedidos -> aqui 18000 mil aproximadamente...
>
> A qry até fiz...o problema é que está lento pra kctcomo não tenho no
> momento a conf. Do Servidor...
>
> fica ruim pra eu abusar...gostaria de otimizar, se puderem ajudar,
> agradeço.
>
> SELECT cad.nome, cad.codigo
>
> From cadastro cad
>
> where cad.codigo not in (select cliente
>
> from orpenf
>
> where cadastro
>
> BETWEEN DATE_SUB(curdate(), INTERVAL 90 DAY)
> and CURDATE()
>
> )
>
> O banco é MySQL
>
> Ta demorando pacas...se tiver um jeito mais inteligente..., se não verei
> com
> o cliente a possibilidade de Upgrade
>
> No Servidor...
>
> Abs,
>
> Rodrigo Mota.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
> _
> Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live
> Search Maps!
> http://www.livemaps.com.br/index.aspx?tr=true
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Links do Yahoo! Grupos
>
>
>


-- 
...
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com/
...


[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]
 
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 otimizar essa qry?

2007-10-21 Por tôpico Rubem Nascimento da Rocha


Tenta isso:

  select distinct cad.codigo, cad.nome
from orpenf join cadastro cad on cad.codigo = orpenf.codigo
   where orpenf.cadastro not between date_sub(curdate(), interval 90 day) and 
curdate()

Sds.




To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Sun, 21 Oct 2007 18:16:44 -0300
Subject: [delphi-br] Como otimizar essa qry?


Boa tarde Galera,

Sei que aqui é Delphi …

Preciso fazer o seguinte listar os clientes que ainda não comprar em nos
ultimos 3 meses

Tenho

Clientes -> Tabela de Clientes -> 23000 mil registros aproximadamente

Orpenf -> Ordem de pedidos -> aqui 18000 mil aproximadamente...

A qry até fiz...o problema é que está lento pra kctcomo não tenho no
momento a conf. Do Servidor...

fica ruim pra eu abusar...gostaria de otimizar, se puderem ajudar, agradeço.

SELECT cad.nome, cad.codigo

>From cadastro cad

where cad.codigo not in (select cliente

from orpenf

where cadastro

BETWEEN DATE_SUB(curdate(), INTERVAL 90 DAY)
and CURDATE()

)

O banco é MySQL

Ta demorando pacas...se tiver um jeito mais inteligente..., se não verei com
o cliente a possibilidade de Upgrade

No Servidor...

Abs,

Rodrigo Mota.

[As partes desta mensagem que não continham texto foram removidas]




_
Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live 
Search Maps!
http://www.livemaps.com.br/index.aspx?tr=true

-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
[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 otimizar essa qry?

2007-10-21 Por tôpico Rodrigo Mota

Boa tarde Galera,

 

Sei que aqui é Delphi 

 

Preciso fazer o seguinte listar os clientes que ainda não comprar em nos
ultimos 3 meses

 

Tenho 

 

Clientes -> Tabela de Clientes -> 23000 mil registros aproximadamente

Orpenf -> Ordem de pedidos -> aqui 18000 mil aproximadamente...

 

 

A qry até fiz...o problema é que está lento pra kctcomo não tenho no
momento a conf. Do Servidor...

fica ruim pra eu abusar...gostaria de otimizar, se puderem ajudar, agradeço.

 

 

SELECT cad.nome, cad.codigo 

  From cadastro cad

  where cad.codigo not in (select cliente 

 from orpenf 

 where cadastro 

 BETWEEN DATE_SUB(curdate(), INTERVAL 90 DAY)
and CURDATE() 

   )

O banco é MySQL

 

Ta demorando pacas...se tiver um jeito mais inteligente..., se não verei com
o cliente a possibilidade de Upgrade

No Servidor...

 

Abs,

 

 

Rodrigo Mota.

 

 



[As partes desta mensagem que não continham texto foram removidas]

[delphi-br] Volante para jogos

2007-10-21 Por tôpico Felippe Nagato

Olá,

Preciso desenvolver um programa que capture quantos graus foi girado de um 
volante conectado ao PC pela porta USB. Vejo que drivers já acompanham o 
produto. Minha dúvida é saber como faço para adquirir esses valores que provém 
do volante. Por exemplo, qualquer componente capaz de manipular com joysticks 
consegue acessar essas informações do volante? Isso é algo padronizado, não 
importando o tipo de joystick conectado?
Usando a conexão USB, Gameport ou Porta Serial, a forma como adquiro essas 
informações sempre são as mesmas? Ou é necessário identificar isso?
Alguém possui algum exemplo, material ou uma boa explicação sobre o assunto? 
Cheguei até achar uns componentes freeware pra pegar as inputs de um joystick, 
mas não sei se isso é algo genérico. Estou muito cru no assunto e não consegui 
achar na internet algo que explicasse melhor isso.
Quem puder me ajudar em algo, agradeço.

Abraço a todos,
Felippe

[As partes desta mensagem que não continham texto foram removidas]

RES: RES: [delphi-br] Salvar Imagem no firebird+DBX Delphi 2007

2007-10-21 Por tôpico Bruno Lichot

Bom vamos l[a..

 

Uso comercialmente o InterBase 2007, tenho bancos de mais de 10 gigas
inclusive com imagem e backu e restore [e excepcional, trabalho com apli
cacoes de missão critica onde performance e primordial, não usaria imagens
no banco se não fosse melhor e mais seguro assim.

 

E outra, com relação a segurança, pode copiar o banco e mesmo com usuário
máster do interbase não se consegue abrir uma base de dados do Interbase
2007 em outra maquina a não ser q se saiba a senha.

 

No firebird e no SQL Server eu concord q vc consiga em outra maquina com o
ususario amster abrir os dados, mas com interbase 2007 não, alias desde a
versão 7 do interbase nãos e consegue copair bases de dados e abrir cm
sysdba.

 

Definir arquivamento físico e mais difícil e não garante segurança nenhuma,
mens ainda q no banco, e tenoh clientes q tem mais de 20gigas de banco
firebird com imagens e sem problemas de corrupção, esse tipo de problema vai
da ma operacao do banco ou da construção errada da aplicação.

 

Trabalho a mais de 5 anos com datasnap e dbx, com firebird, sqlserver,
interbase e Oracle e nunca tive problemas de corrupção de dados causado por
backup e restore ou qq outro tipo de operação no banco, so tive corrupção
com perda de luz em servidores sem nobrake

 

Continuo convencido de q imagem no banco e bem melhor.

 

Abs

BL

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Laureano Araujo Nunes
Enviada em: sexta-feira, 19 de outubro de 2007 19:45
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Salvar Imagem no firebird+DBX Delphi 2007

 

Colegas

Me parece bem mais seguro, que algumas "imagens que nao devam ser alteradas"
por usuarios "nao autorizados" devam ser SIM gravadas no banco de dados.

Perda de performance é um preço a ser pago por um nível maior de
confiabilidade das operações do programa.

[]'s Nunes.

Joel Alexandre <[EMAIL PROTECTED]
 > escreveu: Bruno Lichot
escreveu:
> Eu aconselho profundamente a guardar a imagem no banco e não em pastas ou
> arquivos.
>
> 
>
> Não existe justificativa tecnológica na minha opinião de não guardar no
> banco as imagens, é mais fácil de se trabalhar, mais seguro e mais rapido.
> 
Desculpe Bruno, mas sou totalmente contrário a esta idéia. Explico:

- Usando imagens no próprio banco o cliente perde tempo com backup 
desnecessário.
- A probabilidade de corrupção no banco é maior.
- Há sim uma ligeira perda de performance

A unica viabilidade que posso concordar seria a facilidade da 
leitura da imagem, pois como a imagem está no banco, bastaria usar um 
componente TDBImage da vida.
Segurança tb não acredito que seja um argumento para o uso. pois o 
próprio firebird já é inseguro por natureza. SYSDBA e masterkey qualquer 
"barnabé" abre o banco.

A melhor opção, sem sombra de dúvida ainda é definindo um campo com 
o path da imagem.

[]Os Joel

-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

Links do Yahoo! Grupos

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

 

__ Informação do NOD32 IMON 2604 (20071019) __

Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br



[As partes desta mensagem que não continham texto foram removidas]

Re: [delphi-br] Dúvida com query

2007-10-21 Por tôpico Edison DRP

Select .. where Status = '1' OR status = '7'  e usar aspas se 1 e 7
não forem valores numérciso

Edison

- Original Message - 
From: "Ralp Alves Bezerra" <[EMAIL PROTECTED]>
To: "Delphi BR" 
Sent: Sunday, October 21, 2007 10:09 AM
Subject: [delphi-br] Dúvida com query


> Nobres colegas,
>
> Preciso listar em uma consulta os alunos que tenham o status igual a 1,
> 7 e 8 somente. Porém a consulta não retorna os dados solicitados.
>
> Já tentei trocar a linha:
> Sql.Add('Status="1" and Status="7" and Status="8" and');
> por :
> Sql.Add('Status="1" or Status="7" or Status="8" and'); mas não funciona.
>
> Alguém poderia me dar uma luz.
>
> Grato
>
> estou com uma dúvida nesta consulta abaixo:
>
>   If Radio1.ItemIndex=12 then // Turma da Escola
>   Begin
> With qrPesqAluno do
> Begin
>   Close;
>   Sql.Clear;
>   Sql.Add('Select * From Alunos');
>   If All.Checked=False then
>   Begin
> Sql.Add('Where CodigoDaEscola=:CodEsc and');
> Sql.Add('Status="1" and Status="7" and Status="8" and');
> < dúvida nesta linha
> Sql.Add('TipoDeEnsinoD=:TE and');
> Sql.Add('TurmaD=:TR and');
> Sql.Add('SerieD=:SE and');
> Sql.Add('TurnoD=:TU');
> Sql.Add('Order By Nome');
> ParamByName('CodEsc').Value:=rxdbLookupCombo9.Text;
> ParamByName('TE').Value:=rxdbLookupCombo21.Text;
> ParamByName('TR').Value:=rxdbLookupCombo12.Text;
> ParamByName('SE').Value:=rxdbLookupCombo13.Text;
> ParamByName('TU').Value:=rxdbLookupCombo14.Text;
>
>   end else begin
> Sql.Add('Where TipoDeEnsinoD=:TE and');
> Sql.Add('TurmaD=:TR and');
> Sql.Add('SerieD=:SE and');
> Sql.Add('TurnoD=:TU');
> Sql.Add('Order By Nome');
> ParamByName('TE').Value:=rxdbLookupCombo21.Text;
> ParamByName('TR').Value:=rxdbLookupCombo12.Text;
> ParamByName('SE').Value:=rxdbLookupCombo13.Text;
> ParamByName('TU').Value:=rxdbLookupCombo14.Text;
>   end;
>   Open
> end;
> if qrPesqAluno.IsEmpty Then ShowMessage('Registro não encontrado!')
>   end;
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Links do Yahoo! Grupos
>
>
>

[delphi-br] homologação ???

2007-10-21 Por tôpico Alcistemas Informática

o que é um software homologado ? como fazer para homologar ?


  - Original Message - 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, October 18, 2007 10:04 AM
  Subject: RES: Res: [delphi-br] Off - Sonegação Fiscal


  Eu vi uma reportagem no Bom dia Brasil onde o repórter havia comentado que o 
colibri tinha uma configuração
  que permitia sonegar impostos. Imaginei algo do tipo "crie um arquivo dentro 
de Windows\system32 com o nome sonegarehlegal.sonegar"
  então o soft percebe a presença do arquivo e sai sonegando tudo! RS

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Joel 
Alexandre
  Enviada em: quinta-feira, 18 de outubro de 2007 07:47
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: Res: [delphi-br] Off - Sonegação Fiscal

  Caraca Robson,

  E o pilantrão foi feito pela propria Colibri?

  []Os Joel

  > Joel, de uma reportagem da Rederecord o jornalista disse q havia 2 
programas da colibri instalado no micro, ou seja o homologado e o pilantrão, 
ele alternava entre os programas para emitir ou naum o cupom. LEMBRANDO
  > 
  > Kaputz, Robson
  > Skype: kaputz_gri
  >
  > "Keep the Dream Alive"
  >
  >
  >
  > - Mensagem original 
  > De: Joel Alexandre <[EMAIL PROTECTED]>
  > Para: delphi-br@yahoogrupos.com.br
  > Enviadas: Quarta-feira, 17 de Outubro de 2007 23:16:16
  > Assunto: Re: [delphi-br] Off - Sonegação Fiscal
  >
  > Leonardo Quinino escreveu:
  > 
  >> A verdade sempre vem à tona, pois é.. então enfim a casa caiu...
  >> Eu mesmo já perdi diversos clientes para esse "colibri" .
  >>
  >> Hoje perdi os meus clientes, mas meu sono, esse não tem preço.
  >> 
  > Leonardo, nunca vi esse colibri, nem sei como é. Tb não sei o motivo 
  > técnico que levou à essa busca. Agora, de uma coisa eu sei com toda 
  > certeza, este software é homologado e passou por baterias de testes. É 
  > um software indicado pela Bematech. Tem milhares de clientes.
  > Tá muito estranho isso. Ou deve ter outra coisa além por trás disso 
  > ou pode ser um soft clonado.
  >
  > []Os Joel
  >
  >
  >
  > 

  [As partes desta mensagem que não continham texto foram removidas]

  -- 
  < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

  Links do Yahoo! Grupos



   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition. 
  Version: 7.5.488 / Virus Database: 269.14.6/1061 - Release Date: 10/10/2007 
08:43


[As partes desta mensagem que não continham texto foram removidas]

Re: [delphi-br] Ajuda

2007-10-21 Por tôpico Alcistemas Informática

ipconfig > a.txt

depois é só abrir esse arquivo e desviar para um memo

  - Original Message - 
  From: BandaLemuel 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, October 18, 2007 3:59 PM
  Subject: [delphi-br] Ajuda

  Lista

  Vcs sabem como faço para dar um comando no DOS pelo Delphi
  e pegar o retorno.. por exemplo... dar um ipconfig e colocar o retorno em um
  Memo...

  Wesley

  [As partes desta mensagem que não continham texto foram removidas]

--

  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition. 
  Version: 7.5.488 / Virus Database: 269.14.6/1061 - Release Date: 10/10/2007 
08:43

[As partes desta mensagem que não continham texto foram removidas]

[delphi-br] Dúvida com query

2007-10-21 Por tôpico Ralp Alves Bezerra

Nobres colegas,

Preciso listar em uma consulta os alunos que tenham o status igual a 1, 
7 e 8 somente. Porém a consulta não retorna os dados solicitados.

Já tentei trocar a linha:
Sql.Add('Status="1" and Status="7" and Status="8" and');
por :
Sql.Add('Status="1" or Status="7" or Status="8" and'); mas não funciona.

Alguém poderia me dar uma luz.

Grato

estou com uma dúvida nesta consulta abaixo:

  If Radio1.ItemIndex=12 then // Turma da Escola
  Begin
With qrPesqAluno do
Begin
  Close;
  Sql.Clear;
  Sql.Add('Select * From Alunos');
  If All.Checked=False then
  Begin
Sql.Add('Where CodigoDaEscola=:CodEsc and');
Sql.Add('Status="1" and Status="7" and Status="8" and');
< dúvida nesta linha
Sql.Add('TipoDeEnsinoD=:TE and');
Sql.Add('TurmaD=:TR and');
Sql.Add('SerieD=:SE and');
Sql.Add('TurnoD=:TU');
Sql.Add('Order By Nome');
ParamByName('CodEsc').Value:=rxdbLookupCombo9.Text;
ParamByName('TE').Value:=rxdbLookupCombo21.Text;
ParamByName('TR').Value:=rxdbLookupCombo12.Text;
ParamByName('SE').Value:=rxdbLookupCombo13.Text;
ParamByName('TU').Value:=rxdbLookupCombo14.Text;

  end else begin
Sql.Add('Where TipoDeEnsinoD=:TE and');
Sql.Add('TurmaD=:TR and');
Sql.Add('SerieD=:SE and');
Sql.Add('TurnoD=:TU');
Sql.Add('Order By Nome');
ParamByName('TE').Value:=rxdbLookupCombo21.Text;
ParamByName('TR').Value:=rxdbLookupCombo12.Text;
ParamByName('SE').Value:=rxdbLookupCombo13.Text;
ParamByName('TU').Value:=rxdbLookupCombo14.Text;
  end;
  Open
end;
if qrPesqAluno.IsEmpty Then ShowMessage('Registro não encontrado!')
  end;

[delphi-br] Arquivo - Files.txt

2007-10-21 Por tôpico delphi-br


COMO OBTER ACESSO À SEÇÃO DE ARQUIVOS DA LISTA.
---

Para ter acesso à todos os recursos da Lista Delphi-BR, você precisa estar
inscrito no YahooGrupos. Todas as listas hospedadas pelo YahooGrupos possuem
espaço para disponibilização de arquivos, enquetes, fotos, URL's e histórico de
mensagens, entre outros recursos.

Os passos abaixo o auxiliarão no acesso à seção de arquivos da lista:

  - Acesse o site da lista http://lista.delphi-br.org/.

  - Clique no link "Entre neste grupo".

  - Irá aparecer uma caixa de diálogo pedindo um login e uma senha do
YahooGrupos.

Quem já for filiado ao YahooGrupos por outros motivos, bastará digitar seu
login e sua senha nos respectivos locais para que o mesmo vincule sua conta
à lista.

NOTA: Este cadastro é independente da sua inscrição na mesma feita via
e-mail.

  - Após digitar seu login e senha do YahooGrupos e confirmar volte à página do
grupo e verifique se todos os links da esquerda estão habilitados
(Mensagens, Arquivos, Enviar, Bate-Papo, etc..). Caso não esteja mas você já
seja membro do grupo, é sinal que você precisará ativar a sua conta no
YahooGrupos com o mesmo. Neste caso o link que irá aparecer será
"Editar minhas opções".

  - Se você não tem conta no YahooGrupos, clique no link "Cadastre-se agora".

  - Para quem não é associado, preencha todos os dados e confirme o envio.

Lhe será enviada, pelo e-mail que você definiu, uma senha com a qual você
passa a ter acesso aos serviços do Yahoo entre eles a lista de discussão.

  - Após este cadastro, volte ao endereço do site da lista e clique no link
"Entre neste grupo". Verás que aparecerá uma tela de cadastro DO SEU PERFIL
NO GRUPO. Basta cofigurar tudo do jeito que você desejar e confirme as
alterações.

  - Feito isto, você verá que quando voltar ao site da lista novas opções
estarão disponíveis para você, entre as quais a área "Arquivos" que é a área
onde você pode baixar os arquivos que o pessoal disponibiliza na lista.

  Quaisquer dúvidas,
  favor contactar o moderador da lista: [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]
 
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] Arquivo - comandos.txt

2007-10-21 Por tôpico delphi-br


Comandos e endereços especiais do servidor eGroups - Lista delphi-br

[EMAIL PROTECTED]
para postar uma mensagem para a lista

[EMAIL PROTECTED]
manda um email para TODOS os owners e moderadores. Tanto pode ser usado pelo
assinante (ou não) para comunicação direta com os responsáveis, QUANTO pode
ser usado pelos próprios owners como se fosse uma listinha privativa dos
moderadores, para discussão de questões administrativas da lista sem a
ciência dos membros normais.

Endereços de Comandos:
(Envie uma msg em branco)

[EMAIL PROTECTED]
assina a lista

[EMAIL PROTECTED]
cancela a assinatura da lista

[EMAIL PROTECTED]
Ativa modo NO MAIL - suspende temporariamente a entrega de e-mails, sem sair
da lista

[EMAIL PROTECTED]
Ativa modo DIGEST - Assinante passa a receber as mensagens em modo Digest
(uma única mensagem é enviada, com todo texto, a cada final de dia, ou a
cada vez que houverem 25 mensagens - o que ocorrer primeiro)

[EMAIL PROTECTED]
Desativa NO MAIL ou DIGEST - Estando em modo "digest" ou "no mail", o
assinante volta ao modo NORMAL de recebimento por e-mails individuais.


Obs. Note que o e-mail remetente deve ser o mesmo e-mail de recebimento das 
mensagens.


-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
[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] Dúvida com query

Re: [delphi-br] Como otimizar essa qry?

Re: [delphi-br] Relatorio_laz

[delphi-br] Relatorio_laz

Re: [delphi-br] Como otimizar essa qry?

RE: [delphi-br] Como otimizar essa qry?

[delphi-br] Como otimizar essa qry?

[delphi-br] Volante para jogos

RES: RES: [delphi-br] Salvar Imagem no firebird+DBX Delphi 2007

Re: [delphi-br] Dúvida com query

[delphi-br] homologação ???

Re: [delphi-br] Ajuda

[delphi-br] Dúvida com query

[delphi-br] Arquivo - Files.txt

[delphi-br] Arquivo - comandos.txt

15 matches

Site Navigation

Mail list logo

Footer information