Re: [delphi-br] OFF-Topic - Componente para Matricial

[Marcio Pires]

Print Fast com certeza, mais em conta e que o RdPrint e com as mesmas
funções. Recomendo

site do desenvolvedor www.ncs.com.br

2008/5/20 Luiz Carlos <[EMAIL PROTECTED]>:

>   Boa noite a todos,
> Gostaria de  saber a opinião de colegas, sobre melhor componente para
> impressão matricial?
> Sei que não existe o melhor e sim.. aquele que melhor nos adaptamos!!
> Mas sempre é bom saber a opinião de quem ja passou ou esta passando por
> essa experiencia!!!
> P.S. finalidade da impressão ( Notas Fiscais ).
> Luiz Carlos M Junior
> Araraquara / SP
>
> 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] OFF-Topic - Componente para Matricial

[Eduardo Silva dos Santos]

Existem um monte que funciona. agora que funciona e resolve 1000% é o
RdPrint.

2008/5/20 Luiz Carlos <[EMAIL PROTECTED]>:

>   Boa noite a todos,
> Gostaria de  saber a opinião de colegas, sobre melhor componente para
> impressão matricial?
> Sei que não existe o melhor e sim.. aquele que melhor nos adaptamos!!
> Mas sempre é bom saber a opinião de quem ja passou ou esta passando por
> essa experiencia!!!
> P.S. finalidade da impressão ( Notas Fiscais ).
> Luiz Carlos M Junior
> Araraquara / SP
>
> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> http://br.mail.yahoo.com/
>  
>



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


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

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Daniel Bastos]

É bem simples verificar se cai no mesmo caso que eu descrevi. Já que vc usa
ibexpert, verifique na aba DDL o sql de geração. Se os campos estiverem com
aspas, posta ae.

2008/5/20 Antonio ney.Silva <[EMAIL PROTECTED]>:

>   Utilizo DBX a muito tempo, e não tem nada a nunca tive problemas com
> maíuscula ou minúscula!
>
> Muito engraçado isso. As mesmas querys que dão erro pelo aplicativo, não
> dão
> erro pelo banco!
>
>
> _
>
> De: delphi-br@yahoogrupos.com.br  [mailto:
> delphi-br@yahoogrupos.com.br ] Em
> nome de Fellipe Henrique
> Enviada em: terça-feira, 20 de maio de 2008 15:12
> Para: delphi-br@yahoogrupos.com.br 
> Assunto: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!
>
> Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
> de dados Firebrid 2.1.
>
> Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> UpperCase...
> senão dá erro, fala que o field não existe, que tabela não existe e etc...
> gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
> ser
> maiúculo?
>
> []s
>
> --
> _
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED]  com
>
> Sou a favor da lei LEI 607/2007
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Abs
Daniel A. Bastos


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

Re: RES: [delphi-br] Gravar e visualizar imagem do banco de dados

[Carlos]

Me desculpe a insistência, mas é que nunca precisei efetuar um 
cadastro com foto, e que precisa-se ser exibido em um sistema em rede,
mas como assim colocar a imagem em um caminho de rede comum?
Sem querer ser abusado, o colega poderia ser um pouco mais específico?
Quanto a sugestão do colega "Alessandro DUARTE de Moraes" compreendo 
que alguns assuntos são maçantes, mas antes de mais nada, explico-lhe 
que procurei na lista por assuntos relacionados, mas nada que pudesse 
me ajudar, procurei no google também.
Agradeço de antecipadamente por qualquer ajuda!
Carlos

--- Em delphi-br@yahoogrupos.com.br, "Davi Eduardo Borges Wall" 
<[EMAIL PROTECTED]> escreveu
>
> Basta colocar a imagem em um caminho de rede comum para todas as 
maquinas
> 
>  
> 
> De: delphi-br@yahoogrupos.com.br [mailto:delphi-
[EMAIL PROTECTED] Em nome de Alessandro DUARTE de Moraes
> Enviada em: segunda-feira, 19 de maio de 2008 18:01
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Gravar e visualizar imagem do banco de 
dados
> 
>  
> 
> Este assunto foi discutido na semana passada. Sugiro que você dê 
uma olhada pois foram abordados vários casos.
> 
> Alessandro DUARTE de Moraes
> A.C. Santa Casa do Rio Grande.
> http://www.santacasarg.com.br
> 
> - Original Message - 
> From: Carlos 
> To: delphi-br@yahoogrupos.com.br   
> Sent: Monday, May 19, 2008 4:57 PM
> Subject: [delphi-br] Gravar e visualizar imagem do banco de dados
> 
> Boa tarde a todos!!
> Solicito ajuda aos colegas com mais este problema:
> Tem um sistema que captura uma foto com o caminho do banco de dados 
e 
> apresenta para o usuário. Até ai tudo bem, mas o problema é que 
este 
> sistema é usado na rede, e caso o usuário tente visualizar a imagem 
> em uma máquina diferente de onde estão as imagens, ocorre um erro 
> porque ele não encontra o caminho.
> Alguém poderia me dar uma ajuda neste sentido, com um tutorial, ou 
> link...por favor...
> Uso DBExpress, MySql 5.0, Delphi 7.
> 
> //Este é o código para exibir a imagem
> dmCadastro.cdsFotos.Close;
> dmCadastro.cdsFotos.Params[0].Value :=
> dmCadastro.cdsEfetivorf.Value;
> dmCadastro.cdsFotos.Open;
> if not (dmCadastro.cdsFotos.IsEmpty) then
> imgFoto.Picture.LoadFromFile(dmCadastro.cdsFotosfoto.Value)
> else
> imgFoto.Picture := nil;
> 
> //Este é o código que salva a imagem
> if dlgOpenPicFoto.Execute then
> begin
> dmCadastro.cdsFotos.Insert;
> dmCadastro.cdsFotosrf.Value :=
> dmCadastro.cdsEfetivorf.Value;
> imgFoto.Picture.LoadFromFile(dlgOpenPicFoto.FileName);
> dmCadastro.cdsFotos.FieldByName('Foto').AsString :=
> dlgOpenPicFoto.FileName;
> dmCadastro.cdsFotos.Post;
> end;
> 
> Agradeço antecipadamente a atenção dispensada.
> att
> Carlos
> 
> -- 
> E-mail Seguro Vetorial.net 
> 
> Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, 
> encaminhe para [EMAIL PROTECTED]   
> 
> Chave de Identificação: 54568,4831dc66542791418011894 
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
>  
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

RES: [delphi-br] Abrir acces com senha pelo ado

[Juliano Silva - Yahoo]

 
Coloca uma cópia do arquivo ACCESS em seu micro, e siga os passos deste
link... http://www.delphibr.com.br/artigos/AccessADO.php acredito que irá
funcionar...
 
Juliano

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de auriston.delphi
Enviada em: terça-feira, 20 de maio de 2008 14:58
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Abrir acces com senha pelo ado



Quando peço para abrir o mdb, me retorna a seguinte mensagem:

"Não é possível iniciar o aplicativo. O arquivo de informações do 
grupo de trabalho está faltando ou foi aberto em modo exclusivo por 
outro usuario."

Por que ocorre isso, tem como alterar isso pelo access ?, se sim como ?
sds
Auriston



 

No virus found in this incoming message.
Checked by AVG.
Version: 8.0.100 / Virus Database: 269.23.21/1456 - Release Date: 20/05/2008
06:45




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

Re: [delphi-br] OFF-Topic - Componente para Matricial

[Fellipe Henrique]

RDPrint, sem dúvida!

[]s

2008/5/20 Luiz Carlos <[EMAIL PROTECTED]>:

>   Boa noite a todos,
> Gostaria de  saber a opinião de colegas, sobre melhor componente para
> impressão matricial?
> Sei que não existe o melhor e sim.. aquele que melhor nos adaptamos!!
> Mas sempre é bom saber a opinião de quem ja passou ou esta passando por
> essa experiencia!!!
> P.S. finalidade da impressão ( Notas Fiscais ).
> Luiz Carlos M Junior
> Araraquara / SP
>
> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> http://br.mail.yahoo.com/
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

RES: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Antonio ney.Silva]

Utilizo DBX a muito tempo, e não tem nada a nunca tive problemas com
maíuscula ou minúscula!
 
Muito engraçado isso. As mesmas querys que dão erro pelo aplicativo, não dão
erro pelo banco!

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fellipe Henrique
Enviada em: terça-feira, 20 de maio de 2008 15:12
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!



Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
de dados Firebrid 2.1.

Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em UpperCase...
senão dá erro, fala que o field não existe, que tabela não existe e etc...
gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a ser
maiúculo?

[]s

-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]  com

Sou a favor da lei LEI 607/2007

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



 


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

[delphi-br] ENC: Bug de lookup

[Antonio ney.Silva]

Descobri o bug, é que no meu cliente a chave desta tabela está como
smallint, e na minha base está como int!
 
Tenham atenção quanto a isto!

  _  

De: Antonio ney.Silva [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 20 de maio de 2008 16:09
Para: delphi-br@yahoogrupos.com.br
Assunto: Bug de lookup


E ae galera? Blz?
 
Seguinte, utilizo  DBX, tenho um CDS carregado com os fields e tenho um
lookup associado à ele.
 
Aqui na base ele funciona perfeitamente.
 
Só que no momento que eu acesso o banco de dados do meu cliente, ocorre este
erro: "Constant out of range"
 
Detalhe, isso ocorre tanto em tempo de desenvolvimento como em tempo de
execução.
 
P.S.: Utilizo SQL Server 2000.
 
Agradeço a atenção prestada,
 
 
Antonio ney.Silva


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

[delphi-br] Bug de lookup

[Antonio ney.Silva]

E ae galera? Blz?
 
Seguinte, utilizo  DBX, tenho um CDS carregado com os fields e tenho um
lookup associado à ele.
 
Aqui na base ele funciona perfeitamente.
 
Só que no momento que eu acesso o banco de dados do meu cliente, ocorre este
erro: "Constant out of range"
 
Detalhe, isso ocorre tanto em tempo de desenvolvimento como em tempo de
execução.
 
P.S.: Utilizo SQL Server 2000.
 
Agradeço a atenção prestada,
 
 
Antonio ney.Silva


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

RES: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Antonio ney.Silva]

Aconselho vc a trocar de driver, e testa se não é exatamente isso!

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fellipe Henrique
Enviada em: terça-feira, 20 de maio de 2008 15:37
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!



Meu amigo, este erro dá desde a versão 1.0 do Firebird, o qual era
compativel.

[]s

2008/5/20 Ricardo César Cardoso mailto:ricardo_engsoft%40yahoo.com.br> yahoo.com.br>:

> Hehehe.. mas quem disse q o Driver p/ Interbase é 100% compatível com o
> FB2.x , ainda por cima?
>
> Sds,
> Ricardo.
>
> Fellipe Henrique <[EMAIL PROTECTED]  com
> escreveu: Olá
> amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
>
> de dados Firebrid 2.1.
>
> Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> UpperCase...
> senão dá erro, fala que o field não existe, que tabela não existe e etc...
> gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
> ser
> maiúculo?
>
> []s
>
> --
> _
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED]  com 
>
> Sou a favor da lei LEI 607/2007
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
> -
> 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]
>
> 
>

-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]  com

Sou a favor da lei LEI 607/2007

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



 


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

[delphi-br] OFF-Topic - Componente para Matricial

[Luiz Carlos]

Boa noite a todos,
Gostaria de  saber a opinião de colegas, sobre melhor componente para impressão 
matricial?
Sei que não existe o melhor e sim.. aquele que melhor nos adaptamos!!
Mas sempre é bom saber a opinião de quem ja passou ou esta passando por essa 
experiencia!!!
P.S. finalidade da impressão ( Notas Fiscais ).
Luiz Carlos M Junior
Araraquara / SP


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

Re: [delphi-br] Alguém poderia me explica r o porque disto dá erro?!

[Joao Morais]

Daniel Bastos wrote:
> Exporta a sua base para um script, retira as aspas dos nomes dos campos e
> recria a base.
> quando vc coloca aspas no campo na hora da criação, os campos ficam sendo
> case-sensive.
> provavelmente vc não criou a base por script e sim utilizando alguma
> ferramenta tipo ibexpert ou EMS SQL Management.

Acho que o problema dele é no componente. Com aspas e em maiúsculo ou 
sem aspas no ib/fb é a mesma coisa:

SQL> create table "TEST1" ("CAMPO1" varchar(20));
SQL> create table test2 (campo2 varchar(20));
SQL> show tables;
TEST1  TEST2
SQL> show table "test1";
There is no table test1 in this database
SQL> show table test1;
CAMPO1  VARCHAR(20) Nullable
SQL> drop table test1;
SQL> drop table test2;
SQL>

mesma coisa pra dml: as queries dele tem que estar em caixa alta porque 
estão sendo quotadas. Tira os quotes (no fb é aspas) e tudo volta a 
funcionar.

--
Joao Morais

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Fellipe Henrique]

É Daniel, eu utilizo o ibexpert, e tudo maiusculo. Será por isso? Estranho
hein..

[]s

2008/5/20 Daniel Bastos <[EMAIL PROTECTED]>:

>   Exporta a sua base para um script, retira as aspas dos nomes dos campos
> e
> recria a base.
> quando vc coloca aspas no campo na hora da criação, os campos ficam sendo
> case-sensive.
> provavelmente vc não criou a base por script e sim utilizando alguma
> ferramenta tipo ibexpert ou EMS SQL Management.
>
> Nas duas ferramentas tem como mudar o padrão.
>
> Neste caso não é problema com o tipo de conexão exatamente, mas se eu fosse
> vc ia pensando em trocar a forma de acesso o mais rápido possível, pois
> caso
> contrário, terá problemas seríssimos com futuras versões do firebird.
>
> 2008/5/20 Fellipe Henrique <[EMAIL PROTECTED] >:
>
>
> > Entendi Joao, mas não consegui achar o local onde seria isso, os
> > parametros
> > estao assim:
> > DriverName=Interbase
> > Database=F:\Develop\Dados\dados.fdb
> > RoleName=RoleName
> > User_Name=sysdba
> > Password=masterkey
> > ServerCharSet=WIN1252
> > SQLDialect=3
> > BlobSize=-1
> > CommitRetain=False
> > WaitOnLocks=True
> > ErrorResourceFile=
> > LocaleCode=
> > Interbase TransIsolation=ReadCommited
> > Trim Char=False
> >
> > []s
> > 2008/5/20 Joao Morais <[EMAIL PROTECTED]  40joaomorais.com.br>>:
> >
> >
> > > Fellipe Henrique wrote:
> > > > Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com
> > > banco
> > > > de dados Firebrid 2.1.
> > > >
> > > > Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> > > UpperCase...
> > > > senão dá erro, fala que o field não existe, que tabela não existe e
> > > etc...
> > > > gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer,
> obrigar
> > a
> > > ser
> > > > maiúculo?
> > >
> > > O fb passa a ser case sensitive quando você quota as literais, ou seja:
> > >
> > > select campo from tabela
> > >
> > > transforma as literais para CAMPO e TABELA, enquanto
> > >
> > > select "campo" from "tabela"
> > >
> > > não transforma. Verifique se o seu conector está configurado para
> quotar
> > > as literais.
> > >
> > >
> > >
> >
> > --
> > _
> > T.·.F.·.A.·.
> > Fellipe Henrique
> > [EMAIL PROTECTED]  
> >
> > Sou a favor da lei LEI 607/2007
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> --
> Abs
> Daniel A. Bastos
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Daniel Bastos]

Exporta a sua base para um script, retira as aspas dos nomes dos campos e
recria a base.
quando vc coloca aspas no campo na hora da criação, os campos ficam sendo
case-sensive.
provavelmente vc não criou a base por script e sim utilizando alguma
ferramenta tipo ibexpert ou EMS SQL Management.

Nas duas ferramentas tem como mudar o padrão.

Neste caso não é problema com o tipo de conexão exatamente, mas se eu fosse
vc ia pensando em trocar a forma de acesso o mais rápido possível, pois caso
contrário, terá problemas seríssimos com futuras versões do firebird.

2008/5/20 Fellipe Henrique <[EMAIL PROTECTED]>:

>   Entendi Joao, mas não consegui achar o local onde seria isso, os
> parametros
> estao assim:
> DriverName=Interbase
> Database=F:\Develop\Dados\dados.fdb
> RoleName=RoleName
> User_Name=sysdba
> Password=masterkey
> ServerCharSet=WIN1252
> SQLDialect=3
> BlobSize=-1
> CommitRetain=False
> WaitOnLocks=True
> ErrorResourceFile=
> LocaleCode=
> Interbase TransIsolation=ReadCommited
> Trim Char=False
>
> []s
> 2008/5/20 Joao Morais <[EMAIL PROTECTED] >:
>
>
> > Fellipe Henrique wrote:
> > > Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com
> > banco
> > > de dados Firebrid 2.1.
> > >
> > > Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> > UpperCase...
> > > senão dá erro, fala que o field não existe, que tabela não existe e
> > etc...
> > > gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar
> a
> > ser
> > > maiúculo?
> >
> > O fb passa a ser case sensitive quando você quota as literais, ou seja:
> >
> > select campo from tabela
> >
> > transforma as literais para CAMPO e TABELA, enquanto
> >
> > select "campo" from "tabela"
> >
> > não transforma. Verifique se o seu conector está configurado para quotar
> > as literais.
> >
> >
> >
>
> --
> _
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED] 
>
> Sou a favor da lei LEI 607/2007
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Abs
Daniel A. Bastos


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

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Fellipe Henrique]

Entendi Joao, mas não consegui achar o local onde seria isso, os parametros
estao assim:
DriverName=Interbase
Database=F:\Develop\Dados\dados.fdb
RoleName=RoleName
User_Name=sysdba
Password=masterkey
ServerCharSet=WIN1252
SQLDialect=3
BlobSize=-1
CommitRetain=False
WaitOnLocks=True
ErrorResourceFile=
LocaleCode=
Interbase TransIsolation=ReadCommited
Trim Char=False


[]s
2008/5/20 Joao Morais <[EMAIL PROTECTED]>:

>   Fellipe Henrique wrote:
> > Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com
> banco
> > de dados Firebrid 2.1.
> >
> > Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> UpperCase...
> > senão dá erro, fala que o field não existe, que tabela não existe e
> etc...
> > gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
> ser
> > maiúculo?
>
> O fb passa a ser case sensitive quando você quota as literais, ou seja:
>
> select campo from tabela
>
> transforma as literais para CAMPO e TABELA, enquanto
>
> select "campo" from "tabela"
>
> não transforma. Verifique se o seu conector está configurado para quotar
> as literais.
>
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

Re: [delphi-br] Alguém poderia me explica r o porque disto dá erro?!

[Joao Morais]

Fellipe Henrique wrote:
> Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
> de dados Firebrid 2.1.
> 
> Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em UpperCase...
> senão dá erro, fala que o field não existe, que tabela não existe e etc...
> gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a ser
> maiúculo?

O fb passa a ser case sensitive quando você quota as literais, ou seja:

select campo from tabela

transforma as literais para CAMPO e TABELA, enquanto

select "campo" from "tabela"

não transforma. Verifique se o seu conector está configurado para quotar 
as literais.

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Fellipe Henrique]

Concordo, já que independente de qualquer SGBD, todos partiram do AnsiSQL...
que prioriza o minúsculo... realmente é estranho, será que existe alguma
atualização pro DBX do Delphi7 ?

Já atualizei pra 7.1.

[]s

2008/5/20 Davi Eduardo Borges Wall <[EMAIL PROTECTED]>:

>   De qualquer forma essa não é uma explicação para o SQL não funcionar em
> minúsculo.
>
> Eu não tenho esse tipo de problema e utilizo firbird direto.
>
> Tenta fazer um programinha para rodar um SQL e veja se isto realmente
> acontece.
>
> Ou ainda procure na internet a causa disso.
>
> De: delphi-br@yahoogrupos.com.br  [mailto:
> delphi-br@yahoogrupos.com.br ] Em nome de
> Ricardo César Cardoso
> Enviada em: terça-feira, 20 de maio de 2008 15:56
> Para: delphi-br@yahoogrupos.com.br 
> Assunto: Re: [delphi-br] Alguém poderia me explicar o porque disto dá
> erro?!
>
>
> Repito o que já afirmei... Mesmo assim quem disse/garantia que era 100%
> compatível? O lançamento do FB 1 não foi um mero copy and paste do IB 6. Já
> havia algum código de outros bancos (Yaffil, se não me engano) que foi
> aproveitado junto do código do IB 6.
>
> Atte,
> Ricardo.
>
> Fellipe Henrique <[EMAIL PROTECTED]   fellipeh%40gmail.com > > escreveu: Meu amigo, este
> erro dá desde a versão 1.0 do Firebird, o qual era
> compativel.
>
> []s
>
> 2008/5/20 Ricardo César Cardoso <[EMAIL 
> PROTECTED] ricardo_engsoft%40yahoo.com.br > >:
>
> > Hehehe.. mas quem disse q o Driver p/ Interbase é 100% compatível com o
> > FB2.x , ainda por cima?
> >
> > Sds,
> > Ricardo.
> >
> > Fellipe Henrique <[EMAIL PROTECTED]   fellipeh%40gmail.com > >
> escreveu: Olá
> > amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
> >
> > de dados Firebrid 2.1.
> >
> > Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> > UpperCase...
> > senão dá erro, fala que o field não existe, que tabela não existe e
> etc...
> > gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
> > ser
> > maiúculo?
> >
> > []s
> >
> > --
> > _
> > T.·.F.·.A.·.
> > Fellipe Henrique
> > [EMAIL PROTECTED]  
> > 
> 
> >
> > Sou a favor da lei LEI 607/2007
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> >
> >
> > -
> > 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]
> >
> >
> >
>
> --
> _
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED]  
> 
>
>
> Sou a favor da lei LEI 607/2007
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> -
> 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]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

RES: [delphi-br] Alguém poderia me explicar o porq ue disto dá erro?!

[Davi Eduardo Borges Wall]

De qualquer forma essa não é uma explicação para o SQL não funcionar em 
minúsculo.

 

Eu não tenho esse tipo de problema e utilizo firbird direto.

 

Tenta fazer um programinha para rodar um SQL e veja se isto realmente acontece.

 

Ou ainda procure na internet a causa disso.

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Ricardo 
César Cardoso
Enviada em: terça-feira, 20 de maio de 2008 15:56
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

 

Repito o que já afirmei... Mesmo assim quem disse/garantia que era 100% 
compatível? O lançamento do FB 1 não foi um mero copy and paste do IB 6. Já 
havia algum código de outros bancos (Yaffil, se não me engano) que foi 
aproveitado junto do código do IB 6. 

Atte,
Ricardo.

Fellipe Henrique <[EMAIL PROTECTED]  > escreveu: 
Meu amigo, este erro dá desde a versão 1.0 do Firebird, o qual era
compativel.

[]s

2008/5/20 Ricardo César Cardoso <[EMAIL PROTECTED] 
 >:

> Hehehe.. mas quem disse q o Driver p/ Interbase é 100% compatível com o
> FB2.x , ainda por cima?
>
> Sds,
> Ricardo.
>
> Fellipe Henrique <[EMAIL PROTECTED]   
> > escreveu: Olá
> amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
>
> de dados Firebrid 2.1.
>
> Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> UpperCase...
> senão dá erro, fala que o field não existe, que tabela não existe e etc...
> gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
> ser
> maiúculo?
>
> []s
>
> --
> _
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED]   
>
> Sou a favor da lei LEI 607/2007
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
> -
> 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]
>
> 
>

-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]  

Sou a favor da lei LEI 607/2007

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





-
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]

 



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

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Ricardo César Cardoso]

Repito o que já afirmei... Mesmo assim quem disse/garantia que era 100% 
compatível? O lançamento do FB 1 não foi um mero copy and paste do IB 6. Já 
havia algum código de outros bancos (Yaffil, se não me engano) que foi 
aproveitado junto do código do IB 6. 

Atte,
Ricardo.

Fellipe Henrique <[EMAIL PROTECTED]> escreveu: Meu 
amigo, este erro dá desde a versão 1.0 do Firebird, o qual era
 compativel.
 
 []s
 
 2008/5/20 Ricardo César Cardoso <[EMAIL PROTECTED]>:
 
 >   Hehehe.. mas quem disse q o Driver p/ Interbase é 100% compatível com o
 > FB2.x , ainda por cima?
 >
 > Sds,
 > Ricardo.
 >
 > Fellipe Henrique <[EMAIL PROTECTED] > escreveu: Olá
 > amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
 >
 > de dados Firebrid 2.1.
 >
 > Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
 > UpperCase...
 > senão dá erro, fala que o field não existe, que tabela não existe e etc...
 > gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
 > ser
 > maiúculo?
 >
 > []s
 >
 > --
 > _
 > T.·.F.·.A.·.
 > Fellipe Henrique
 > [EMAIL PROTECTED] 
 >
 > Sou a favor da lei LEI 607/2007
 >
 > [As partes desta mensagem que não continham texto foram removidas]
 >
 >
 >
 >
 >
 > -
 > 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]
 >
 >  
 >
 
 -- 
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 [EMAIL PROTECTED]
 
 Sou a favor da lei LEI 607/2007
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
   

   
-
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]

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Fellipe Henrique]

Meu amigo, este erro dá desde a versão 1.0 do Firebird, o qual era
compativel.

[]s

2008/5/20 Ricardo César Cardoso <[EMAIL PROTECTED]>:

>   Hehehe.. mas quem disse q o Driver p/ Interbase é 100% compatível com o
> FB2.x , ainda por cima?
>
> Sds,
> Ricardo.
>
> Fellipe Henrique <[EMAIL PROTECTED] > escreveu: Olá
> amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
>
> de dados Firebrid 2.1.
>
> Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em
> UpperCase...
> senão dá erro, fala que o field não existe, que tabela não existe e etc...
> gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a
> ser
> maiúculo?
>
> []s
>
> --
> _
> T.·.F.·.A.·.
> Fellipe Henrique
> [EMAIL PROTECTED] 
>
> Sou a favor da lei LEI 607/2007
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
> -
> 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]
>
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

Re: [delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Ricardo César Cardoso]

Hehehe.. mas quem disse q o Driver p/ Interbase é 100% compatível com o FB2.x , 
ainda por cima?

Sds,
Ricardo.

Fellipe Henrique <[EMAIL PROTECTED]> escreveu: Olá 
amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
 de dados Firebrid 2.1.
 
 Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em UpperCase...
 senão dá erro, fala que o field não existe, que tabela não existe e etc...
 gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a ser
 maiúculo?
 
 []s
 
 -- 
 _
 T.·.F.·.A.·.
 Fellipe Henrique
 [EMAIL PROTECTED]
 
 Sou a favor da lei LEI 607/2007
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
   

   
-
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]

[delphi-br] Alguém poderia me explicar o porque disto dá erro?!

[Fellipe Henrique]

Olá amigos, usando DBExpress no Delphi7, com driver do Interbase, com banco
de dados Firebrid 2.1.

Pois bem, todos os meus SQL, sem exclusão, devem ser escrito em UpperCase...
senão dá erro, fala que o field não existe, que tabela não existe e etc...
gente.. o padrão Ansi SQL não é minúsculo!? porque o DBX quer, obrigar a ser
maiúculo?

[]s

-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

[delphi-br] Abrir acces com senha pelo ado

[auriston.delphi]

Quando peço para abrir o mdb, me retorna a seguinte mensagem:

"Não é possível iniciar o aplicativo. O arquivo  de informações  do 
grupo de trabalho está faltando ou foi  aberto em modo exclusivo por 
outro usuario."

Por que ocorre isso, tem como alterar isso pelo access ?, se sim como ?
sds
Auriston

Re: [delphi-br] Verificar se o user está tentando fechar o App !!??

[Consultores Software]

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := (MessageDlg('Deseja fechar o aplicativo ?', mtConfirmation,
[mbYes, mbNo], 0) = mrYes);
end;
onde Form1 é o form principal da aplicação

2008/5/20 Flavio <[EMAIL PROTECTED]>:

>   Olá pessoal, bom dia,
>
> tenho um botão para interromper a operação e essa interrupção é tratada
> assim:
>
> while(Form1->flagPause == true)
> Application->ProcessMessages();
>
> Só que se o user tentar fechar o aplicativo enquanto o aplicativo estiver
> interrompido ele não consegue, ou seja, o aplicativo não fecha. Eu quero
> colocar um if dentro desse while, perguntando 'se o user está tentando
> fechar o aplicativo', 'então fecha o aplicativo'.
>
> Alguém sabe como posso resolver esse problema ?
>
> Obrigado pela atenção de todos.
> Flávio.
>
> -
> 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]
>
> 
>


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

Re: [delphi-br] Parte fracionária do número

[Valfrid-Ly Silva Couto]

Você está passando os valores como string na query?!
   
  Se sim tem algo muito errado, já que no BD a "," tem outros propósitos, mas 
também tem algo bem errado com o seu código!!
   
  Use os parâmetros e especifique o tipo de dado para float.
   
  Eu costumo usar o ThousandSeparator como "." e ou DecimalSeparator como ",", 
assim a exibição nas telas fica no padrão brasileiro e eu garanto que, 
independente do Regional Settings, o meu sistema irá tratar os números da mesma 
forma.

Joel Alexandre <[EMAIL PROTECTED]> escreveu:
  Bom dia pessoal,

Meus amigos, estou apanhando muito aqui na utilização da vírgula e 
ponto separando a parte fracionária do número para a atualizacao no 
Banco de dados.
Alguns clientes configuraram as opçoes regionais e colocaram o ponto 
como separador decimal e isso tá me deixando louco. Tentei definir as 
variaveis: ThousandSeparator := ',' e DecimalSeparator := '.', mas nesta 
configuracao, quando entro com valores do tipo 1.12 o Firebird entende 
como 123,00..


Como vcs fazem em relaçao ao Delphi + Firebird + Rx para que não 
haja este tipo de problema? Existe uma configuração especifica para cada 
um deles?


Obrigado a todos
Joel


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




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







   
-
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]

[delphi-br] Verificar se o user está tentando fechar o App !!??

[Flavio]

Olá pessoal, bom dia,

tenho um botão para interromper a operação e essa interrupção é tratada assim:

while(Form1->flagPause == true)
Application->ProcessMessages();

Só que se o user tentar fechar o aplicativo enquanto o aplicativo estiver 
interrompido ele não consegue, ou seja, o aplicativo não fecha. Eu quero 
colocar um if dentro desse while, perguntando 'se o user está tentando fechar o 
aplicativo', 'então fecha o aplicativo'.

Alguém sabe como posso resolver esse problema ?

Obrigado pela atenção de todos.
Flávio.

   
-
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]

[delphi-br] Re: Fontes disponiveis......

[rafaelpinto19]

   Tem como vc enviar os fontes para meu email tbm
[EMAIL PROTECTED] tbm sou calouro.


--- Em delphi-br@yahoogrupos.com.br, Jose Eduardo Victorino
<[EMAIL PROTECTED]> escreveu
>
> Para o pessoal novo, calouro que esta começando agora, consegui 78
tipos de fonte em delphi para trocar, me perdoe os avançados pois as
vezes nao conseguimos ter o empurrao com os que deveriam dar,, e so
pedir que mando via email
>
>   
>   
>
> 
> 
>   Você já procurou no google?
> 
> Eu fiz uma procura rápida e já encontrei alguns posts no fórum da
codegear.
> 
> De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em nome de Leandro Yahoo
> Enviada em: sexta-feira, 16 de maio de 2008 14:32
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Componentes
> 
> E com faria isso vc pode me mostrar um exemplo?
> 
> - Original Message - 
> From: Alex Antunes 
> To: delphi-br@yahoogrupos.com.br
 
> Sent: Friday, May 16, 2008 1:45 PM
> Subject: Re: [delphi-br] Componentes
> 
> O que eu sei é através do envio de mensagens.
> 
> Vc retorna o endereço de memória do componente.
> 
> Alex
> 
> - Original Message - 
> From: Leandro Santos 
> To: delphi-br@yahoogrupos.com.br
 
> Sent: Friday, May 16, 2008 12:10 PM
> Subject: [delphi-br] Componentes
> 
> Bom dia Pessoal
> 
> Eu gostaria de saber se alguem sabe como eu posso pegar o nome de 
> componentes de uma outra aplicação, mas seria o name não o caption, 
> exemplo eu tenho project1 e nele tenho 3 botões btn_1, btn_2, btn_3 e 
> faço um outro projeto que eu passe o nome do project1 e consiga listar 
> o name desses 3 botões que estão na outra aplicação.
> 
> Alguem conhece alguma Rotina que faço isso e tem algum programa de 
> exemplo que faça isso para que eu posso ter uam idéia?
> 
> Obrigado
> Leandro Santos
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> 
> 
>
> 
> 
> 
>
> -
> 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]
>

RE: [delphi-br] Parte fracionária do número

[Rubem Nascimento da Rocha]

Cria uma aplicação console no Delphi e depois copia-e-cola o teste abaixo e 
manda executar

program FracSample;

{$APPTYPE CONSOLE}

uses SysUtils;

var
  OldDecimalSep, OldThousandSep: Char;

begin
  WriteLn('Sem ajuste de separadores: ', FloatToStr(123.456));

  OldDecimalSep := DecimalSeparator;
  DecimalSeparator := '.';

  OldThousandSep := ThousandSeparator;
  ThousandSeparator := ',';

  try
WriteLn('Com ajuste de separadores: ', FloatToStr(123.456));
  finally
ThousandSeparator := OldThousandSep;
DecimalSeparator := OldDecimalSep;
  end;

  WriteLn(Eoln);
end.

Sds.



To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 20 May 2008 08:30:24 -0300
Subject: [delphi-br] Parte fracionária do número


Bom dia pessoal,

Meus amigos, estou apanhando muito aqui na utilização da vírgula e
ponto separando a parte fracionária do número para a atualizacao no
Banco de dados.
Alguns clientes configuraram as opçoes regionais e colocaram o ponto
como separador decimal e isso tá me deixando louco. Tentei definir as
variaveis: ThousandSeparator := ',' e DecimalSeparator := '.', mas nesta
configuracao, quando entro com valores do tipo 1.12 o Firebird entende
como 123,00..

Como vcs fazem em relaçao ao Delphi + Firebird + Rx para que não
haja este tipo de problema? Existe uma configuração especifica para cada
um deles?

Obrigado a todos
Joel

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









_
Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger!
http://www.amigosdomessenger.com.br/

Re: RES: [delphi-br] Sistema em Rede Nao Atualiza BD

[Gerson Machado]

Olha colega, com certeza deve haver um erro de configuração em seu banco de 
dados ou módulo de cliente que esta usando, pois tenho esta estrutura em uso 
com IBO ou com Zeos no FB 2.0 e funciona perfeitamente.
  Você usa estrutura servidor/client ?
  Gerson
   
   
  
wellingtonamsantos <[EMAIL PROTECTED]> escreveu:
  mais o problema nao e so esse ele nao atualiza dados nenhum , nao e so
na tabela de vendas, tem , entradas, cadastros, transferencias,
financveiro, etc .
nao existe um um tipo de commit q atualiza na hora ?

--- Em delphi-br@yahoogrupos.com.br, "Antonio ney.Silva" <[EMAIL PROTECTED]>
escreveu
>
> Creio que o melhor a ser feito é vc criar um Generator e uma Trigger
para
> controlar seu número de romaneio!
> 
> Agradeço a atenção prestada,
> 
> 
> Antonio ney.Silva
> 
> _ 
> 
> De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
> nome de wellingtonamsantos
> Enviada em: segunda-feira, 19 de maio de 2008 10:45
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Sistema em Rede Nao Atualiza BD
> 
> 
> 
> Ola a todos , tenho um sistema em delphi 5 + IBO + Firebird 2.0, a
> aplicação ta rodando beleza, sistema de vendas e estoque. 
> Tipo tenho 3 maquinas na rede , eu abro o sistema nas tres normalmente ,
> mais se eu entro na tela de vendas ele grava um numero de romaneio e
> começa a efetuar a venda , se eu for na tela de venda de outra maquina
> , ele teria q abrir um novo romaneio, mais ele nao abre um novo abre o
> mesmo numero da maquina q abriu antes , pq pro Banco de Dados Nao
> existe numero novo, estou fazendo o seguinte:-
> DataModuleDados.IB_Query.Close;
> DataModuleDados.IB_Query.SQL.Clear;
> DataModuleDados.IB_Query.SQL.Add('INSERT INTO SAIDA
>
(Loja,CodigoPedido,CodigoVendedor,CodigoCliente,TipoPagamento,Pecas,Desconto
> ,TotalBruto,Status,DataVenda)
> VALUES (');
> 
>
DataModuleDados.IB_Query.SQL.Add(QuotedStr(StrCaracter(ArquivoRegistroLer('D
>
ATAEASY_GA','Loja'),3,'0'))+','+QuotedStr(RxCalcEditPedido.Text)+','+QuotedS
> tr(vCodigoVendedor)+','+QuotedStr(vCodigoCliente)+','+QuotedStr('
>
')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('A
> B')+','+QuotedStr(DateToStr(Date))+');');
> DataModuleDados.IB_Query.ExecSQL;
> DataModuleDados.IB_TransactionGA.Commit;
> 
> mais nao ta funcionando , ele so atualiza se eu sair do sistema .
> alguem sabe como posso resolver o problema de atualização de registros.
> 
> 
> 
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>



   

   
-
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]

[delphi-br] Inclusão em chave composta

[fabio_giro]

Tenho a seguinte tabela:
campo1(chave)
campo2
No formshow monto a query assim:
  with DM.qryManut do
   begin
 sql.clear;
 sql.add('SELECT CAMPO1, CAMPO2 FROM TABELA');
 sql.add(' WHERE CAMPO1 = :pcampo1');
   end;
No botão de inclusão tenho a seguinte rotina:
  with DM.cdsManut do
   begin
 if not Active then
  begin
DM.qryManut.parambyname('pcampo1').asinteger := strtoint(trim
(meCodigo.text));
open;
  end;
 if consulta then
edit
 else
insert;
 fieldbyname('CAMPO1').asinteger := strtoint(trim(meCodigo.Text));
 fieldbyname('CAMPO2').asstring := trim(edtDescr.Text);

 post;
   end;
Se selecionar no campo1 = 5 e quiser alterar para 6, funciona legal, 
ou seja, altera a chave. 
Porém em outra tela tenho a seguinte tabela
campo1(chave)
campo2(chave)
campo3
campo4
campo5
No formshow monto a query
  with DM.qryManut do
   begin
 sql.clear;
 sql.add('SELECT CAMPO1, CAMPO2, CAMPO3, CAMPO4 ,CAMPO5 FROM 
TABELA');
 sql.add(' WHERE CAMPO1 = :pcampo1');
 sql.add(' WHERE CAMPO2 = :pcampo2');
   end;
No botão de inclusão tenho a seguinte rotina
  with DM.cdsManut do
   begin
 if not Active then
  begin
DM.qryManut.parambyname('pcampo1').asinteger := strtoint(trim
(meCodigo1.text));
DM.qryManut.parambyname('pcampo2').asinteger := strtoint(trim
(meCodigo2.text));
open;
  end;
 if consulta then
edit
 else
insert;
 fieldbyname('CAMPO1').asinteger := strtoint(trim
(meCodigo1.Text));
 fieldbyname('CAMPO2').asinteger := strtoint(trim
(meCodigo2.Text));
 fieldbyname('CAMPO3').asstring := trim(descr1.Text);
 fieldbyname('CAMPO4').asstring := trim(descr2.Text);
 fieldbyname('CAMPO5').asstring := trim(descr3.Text);

 post;
   end;
Se selecionar no campo1 = 5 e campo2 = 5 e quiser alterar o campo2 
para 6, não funciona. Inclui um novo registro. Ou seja, quando é 
chave composta ele não altera, inclui. Alguem sabe se tenho que 
alterar alguma propriedade no CDS, DSP ou Query? Uso D7 e edit´s e 
maskedit´s. Estou perguntando, pois talvez não seja necessário fazer 
o INSERT/UPDATE na mão.
Obrigado.

--- SOLUCAO --- RES: [delphi-br] <<< Abrir F ORMS MDI com acesso rápido... >>>

[Juliano Silva - Yahoo]

 
Obrigado, acho que este compontente irá funcionar... muito obrigado já o
testei ...

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fellipe Henrique
Enviada em: terça-feira, 20 de maio de 2008 09:07
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] <<< Abrir FORMS MDI com acesso rápido... >>>



Conheço este componente:
http://www.zecos.

com/cgi-bin/ref/go.pl?location=http://www.zecos.com/files/elegantmdi.zip

[]s

2008/5/20 Juliano Silva - Yahoo <[EMAIL PROTECTED]
 com.br>:

> Pessoal
>
> Preciso criar uma nova funcionalidade no meu sistema MDI, a medida que vou
> abrindo os FORMS, tenho que colocar uma barra de JANELAS abertas, para
quem
> usa o IBEXPERT fica mais fácil de entender, nele quando abrimos uma tabela
> ou várias a cada uma vai aparecendo em uma barra o que está aberto, dai se
> eu desejar acessar a tabela X que já está aberta ou a tela de geração de
> SCRIPT apenas clico sobre o atalho que fica aberto...
>
> Se alguem tiver um exemplo disso, ficaria imensamente agradecido...
>
> Juliano Silva
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]  com

Sou a favor da lei LEI 607/2007

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



 

No virus found in this incoming message.
Checked by AVG.
Version: 8.0.100 / Virus Database: 269.23.21/1456 - Release Date: 20/05/2008
06:45




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

Re: [delphi-br] Verificar conexao de internet

[Eduardo Silva dos Santos]

http://www.delphix.org/index.php?q=node/84


This sourcecode detects when the computer is online or offline using URL.DLL.:

function InetIsOffline(Flag: Integer): Boolean; stdcall; external 'URL.DLL';

procedure TForm1.Button1Click(Sender: TObject);
begin
 if InetIsOffline(0) then
   ShowMessage('This computer is not connected to the Internet!')
 else
   ShowMessage ('This computer is connected to the Internet');
end;



2008/5/20 Alisson <[EMAIL PROTECTED]>:

>   Preciso saber se uma determinada máquina em acesso à internet. Procurei
> sobre o assunto na internet e encontrei algumas funções que verificam isso
> através de pesquisa de registros do Windows, mas não funcionam. Alguém sabe
>
> se é possível fazer isso?
>
>
>
>
>
> ___
> Yahoo! Mail - Sempre a melhor opção para você!
> Experimente já e veja as novidades.
> http://br.yahoo.com/mailbeta/tudonovo/
>  
>



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


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

RES: [delphi-br] Verificar conexao de internet

[Davi Eduardo Borges Wall]

How can I detect an active Internet connection? 

   Grupo: borland.public.delphi.internet.winsock 

  

When you are connected to the internet, you have the internet as an extension 
to 
you LAN. What you can easily check is if your own computer has a direct 
connection 
to the internet (for example a DUN), altough you have to build a function for 
each method to connect to the internet, using the API for the particular ...
31 ago 2001 de Francois Piette - 5 mensagens - 5 autores 

 

 

Primeira pagina de pesquisa...

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alisson
Enviada em: terça-feira, 20 de maio de 2008 09:50
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Verificar conexao de internet

 

Preciso saber se uma determinada máquina em acesso à internet. Procurei 
sobre o assunto na internet e encontrei algumas funções que verificam isso 
através de pesquisa de registros do Windows, mas não funcionam. Alguém sabe 
se é possível fazer isso? 





___ 
Yahoo! Mail - Sempre a melhor opção para você! 
Experimente já e veja as novidades. 
http://br.yahoo.com/mailbeta/tudonovo/

 



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

[delphi-br] Verificar conexao de internet

[Alisson]

Preciso saber se uma determinada máquina em acesso à internet. Procurei 
sobre o assunto na internet e encontrei algumas funções que verificam isso 
através de pesquisa de registros do Windows, mas não funcionam. Alguém sabe 
se é possível fazer isso? 






___ 
Yahoo! Mail - Sempre a melhor opção para você! 
Experimente já e veja as novidades. 
http://br.yahoo.com/mailbeta/tudonovo/

[delphi-br] Parte fracionária do número

[Joel Alexandre]

Bom dia pessoal,

Meus amigos, estou apanhando muito aqui na utilização da vírgula e 
ponto separando a parte fracionária do número para a atualizacao no 
Banco de dados.
Alguns clientes configuraram as opçoes regionais e colocaram o ponto 
como separador decimal e isso tá me deixando louco. Tentei definir as 
variaveis: ThousandSeparator := ',' e DecimalSeparator := '.', mas nesta 
configuracao, quando entro com valores do tipo 1.12 o Firebird entende 
como 123,00..


Como vcs fazem em relaçao ao Delphi + Firebird + Rx para que não 
haja este tipo de problema? Existe uma configuração especifica para cada 
um deles?


Obrigado a todos
Joel


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

[delphi-br] POP - Segurança

[Henry Maltz]

Pessoal, gostaria de saber qual o nível de segurança do IdPOP3...

Para alguém pegar o login e senha através do que foi logado por ele, é a
mesma dificuldade do Outlook ou ThunderBird?

Abraços!!!


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

Re: RES: [delphi-br] Sistema em Rede Nao Atualiza BD

[wellingtonamsantos]

mais o problema nao e so esse ele nao atualiza dados nenhum , nao e so
na tabela de vendas, tem , entradas, cadastros, transferencias,
financveiro, etc .
nao existe um um tipo de commit q atualiza na hora ?


--- Em delphi-br@yahoogrupos.com.br, "Antonio ney.Silva" <[EMAIL PROTECTED]>
escreveu
>
> Creio que o melhor a ser feito é vc criar um Generator e uma Trigger
para
> controlar seu número de romaneio!
>  
> Agradeço a atenção prestada,
>  
>  
> Antonio ney.Silva
> 
>   _  
> 
> De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
> nome de wellingtonamsantos
> Enviada em: segunda-feira, 19 de maio de 2008 10:45
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Sistema em Rede Nao Atualiza BD
> 
> 
> 
> Ola a todos , tenho um sistema em delphi 5 + IBO + Firebird 2.0, a
> aplicação ta rodando beleza, sistema de vendas e estoque. 
> Tipo tenho 3 maquinas na rede , eu abro o sistema nas tres normalmente ,
> mais se eu entro na tela de vendas ele grava um numero de romaneio e
> começa a efetuar a venda , se eu for na tela de venda de outra maquina
> , ele teria q abrir um novo romaneio, mais ele nao abre um novo abre o
> mesmo numero da maquina q abriu antes , pq pro Banco de Dados Nao
> existe numero novo, estou fazendo o seguinte:-
> DataModuleDados.IB_Query.Close;
> DataModuleDados.IB_Query.SQL.Clear;
> DataModuleDados.IB_Query.SQL.Add('INSERT INTO SAIDA
>
(Loja,CodigoPedido,CodigoVendedor,CodigoCliente,TipoPagamento,Pecas,Desconto
> ,TotalBruto,Status,DataVenda)
> VALUES (');
> 
>
DataModuleDados.IB_Query.SQL.Add(QuotedStr(StrCaracter(ArquivoRegistroLer('D
>
ATAEASY_GA','Loja'),3,'0'))+','+QuotedStr(RxCalcEditPedido.Text)+','+QuotedS
> tr(vCodigoVendedor)+','+QuotedStr(vCodigoCliente)+','+QuotedStr('
>
')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('A
> B')+','+QuotedStr(DateToStr(Date))+');');
> DataModuleDados.IB_Query.ExecSQL;
> DataModuleDados.IB_TransactionGA.Commit;
> 
> mais nao ta funcionando , ele so atualiza se eu sair do sistema .
> alguem sabe como posso resolver o problema de atualização de registros.
> 
> 
> 
>  
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

Re: RES: [delphi-br] Fontes disponíveis......

[Ricardo César Cardoso]

E se alguma alma caridosa recebeu o bendito arquivo, disponibiliza num 4Shared, 
eSnips, Rapidshare ou congêneres e divulgue aqui PELO AMOR DE DEUS.

Nota: me desculpem pelo CapsLock...

Atte,
Ricardo Cardoso
Analista / Desenvolvedor.

Davi Eduardo Borges Wall <[EMAIL PROTECTED]> escreveu:  
   Pessoal POR FAVOR solicitem o arquivo EM PVT!
 
 Imaginem se todos solicitarem o arquivo 1 por 1! 
 





   
-
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]

Res: [delphi-br] <<< Abrir FORMS MDI com acess o rápido... >>>

[Jean Barreiros]

Cara Outra Opção é vc criar o Menu Janelas com seu sub-menus tipo:
Janelas
    - Clientes
    - Fornecedores
    - Caixa
Dai o subMenus iniciam por padrão como Visible := False;
depois no OnCreate de cada janela correspondente ao subMenu você colocar ele 
pra True
e no OnClose pra false novamente e o comando de cada subMenu é apenas:
  if Assigned(FormCorrespondete_a_cada_subMenu) then
   FormCorrespondete_a_cada_subMenu.BringToFront;
 
acho que resolve!Jean Barreiros
Programador/Web-Designer
Delphi, C++, PHP, JavaScript
FireBird/InterBase, MySql, SQLServer, PostGree, Oracle
msn: [EMAIL PROTECTED]
e-mail: [EMAIL PROTECTED]



- Mensagem original 
De: Fellipe Henrique <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 20 de Maio de 2008 9:07:14
Assunto: Re: [delphi-br] <<< Abrir FORMS MDI com acesso rápido... >>>


Conheço este componente:
http://www.zecos. com/cgi-bin/ ref/go.pl? location= http://www. zecos.com/ 
files/elegantmdi .zip

[]s

2008/5/20 Juliano Silva - Yahoo <[EMAIL PROTECTED] com.br>:

> Pessoal
>
> Preciso criar uma nova funcionalidade no meu sistema MDI, a medida que vou
> abrindo os FORMS, tenho que colocar uma barra de JANELAS abertas, para quem
> usa o IBEXPERT fica mais fácil de entender, nele quando abrimos uma tabela
> ou várias a cada uma vai aparecendo em uma barra o que está aberto, dai se
> eu desejar acessar a tabela X que já está aberta ou a tela de geração de
> SCRIPT apenas clico sobre o atalho que fica aberto...
>
> Se alguem tiver um exemplo disso, ficaria imensamente agradecido.. .
>
> Juliano Silva
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
 _ _ ___
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED] com

Sou a favor da lei LEI 607/2007

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

 


  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]

Res: [delphi-br] <<< Abrir FORMS MDI com acess o rápido... >>>

[Jean Barreiros]

Cara Outra Opção é vc criar o Menu Janelas com seu sub-menus tipo:

 Jean Barreiros
Programador/Web-Designer
Delphi, C++, PHP, JavaScript
FireBird/InterBase, MySql, SQLServer, PostGree, Oracle
msn: [EMAIL PROTECTED]
e-mail: [EMAIL PROTECTED]



- Mensagem original 
De: Fellipe Henrique <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 20 de Maio de 2008 9:07:14
Assunto: Re: [delphi-br] <<< Abrir FORMS MDI com acesso rápido... >>>


Conheço este componente:
http://www.zecos. com/cgi-bin/ ref/go.pl? location= http://www. zecos.com/ 
files/elegantmdi .zip

[]s

2008/5/20 Juliano Silva - Yahoo <[EMAIL PROTECTED] com.br>:

> Pessoal
>
> Preciso criar uma nova funcionalidade no meu sistema MDI, a medida que vou
> abrindo os FORMS, tenho que colocar uma barra de JANELAS abertas, para quem
> usa o IBEXPERT fica mais fácil de entender, nele quando abrimos uma tabela
> ou várias a cada uma vai aparecendo em uma barra o que está aberto, dai se
> eu desejar acessar a tabela X que já está aberta ou a tela de geração de
> SCRIPT apenas clico sobre o atalho que fica aberto...
>
> Se alguem tiver um exemplo disso, ficaria imensamente agradecido.. .
>
> Juliano Silva
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
 _ _ ___
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED] com

Sou a favor da lei LEI 607/2007

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

 


  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] <<< Abrir FORMS MDI com acesso rápido... >>>

[Fellipe Henrique]

Conheço este componente:
http://www.zecos.com/cgi-bin/ref/go.pl?location=http://www.zecos.com/files/elegantmdi.zip

[]s

2008/5/20 Juliano Silva - Yahoo <[EMAIL PROTECTED]>:

>   Pessoal
>
> Preciso criar uma nova funcionalidade no meu sistema MDI, a medida que vou
> abrindo os FORMS, tenho que colocar uma barra de JANELAS abertas, para quem
> usa o IBEXPERT fica mais fácil de entender, nele quando abrimos uma tabela
> ou várias a cada uma vai aparecendo em uma barra o que está aberto, dai se
> eu desejar acessar a tabela X que já está aberta ou a tela de geração de
> SCRIPT apenas clico sobre o atalho que fica aberto...
>
> Se alguem tiver um exemplo disso, ficaria imensamente agradecido...
>
> Juliano Silva
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
[EMAIL PROTECTED]

Sou a favor da lei LEI 607/2007


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

[delphi-br] <<< Abrir FORMS MDI com acesso rápido... >>>

[Juliano Silva - Yahoo]

Pessoal
 
Preciso criar uma nova funcionalidade no meu sistema MDI, a medida que vou
abrindo os FORMS, tenho que colocar uma barra de JANELAS abertas, para quem
usa o IBEXPERT fica mais fácil de entender, nele quando abrimos uma tabela
ou várias a cada uma vai aparecendo em uma barra  o que está aberto, dai se
eu desejar acessar a tabela X que já está aberta ou a tela de geração de
SCRIPT apenas clico sobre o atalho que fica aberto... 
 
Se alguem tiver um exemplo disso, ficaria imensamente agradecido...
 
Juliano Silva


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

RES: [delphi-br] Fontes disponíveis... ...

[Davi Eduardo Borges Wall]

Pessoal POR FAVOR solicitem o arquivo EM PVT!

 

Imaginem se todos solicitarem o arquivo 1 por 1! 

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Wandarlei 
Michelon
Enviada em: terça-feira, 20 de maio de 2008 08:45
Para: delphi-br@yahoogrupos.com.br
Assunto: ENC: [delphi-br] Fontes disponíveis..

 

Pro favor me envie também no e-mail: [EMAIL PROTECTED] 
 

De: delphi-br@yahoogrupos.com.br   
[mailto:delphi-br@yahoogrupos.com.br  ] 
Em
nome de MarcioCC®
Enviada em: terça-feira, 20 de maio de 2008 08:11
Para: delphi-br@yahoogrupos.com.br  
Assunto: Re: [delphi-br] Fontes disponiveis..

Bom dia amigo , manda pra mim no e-mail : [EMAIL PROTECTED] 
 
 ...t+

JESUS TE AMA !!

*
MarcioCC® - Analista/Programador - Delphi,PHP,ASP

*

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

 



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

ENC: [delphi-br] Fontes disponíveis......

[Wandarlei Michelon]

Pro favor me envie também no e-mail: [EMAIL PROTECTED]

 

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de MarcioCC®
Enviada em: terça-feira, 20 de maio de 2008 08:11
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Fontes disponiveis..

 

Bom dia amigo , manda pra mim no e-mail : [EMAIL PROTECTED]
  ...t+

JESUS TE AMA !!

*
MarcioCC® - Analista/Programador - Delphi,PHP,ASP

*

 



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

RES: [delphi-br] Erro ao Compilar

[Cesar - Informatica]

Valeu Davi, tinha uma chamada q estava errado, obrigado.
 
César



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Davi 
Eduardo Borges Wall
Enviada em: terça-feira, 20 de maio de 2008 08:31
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Erro ao Compilar



Abra o DPR e procure por esse path e excluía.

De: delphi-br@yahoogrupos.com.br   
[mailto:delphi-br@yahoogrupos.com.br  ] 
Em nome de Cesar - Informatica
Enviada em: terça-feira, 20 de maio de 2008 08:18
Para: delphi-br@yahoogrupos.com.br  
Assunto: [delphi-br] Erro ao Compilar

Pessoal estou com um erro acontecendo nas minhas aplicações. o erro é esse 
abaixo :

[Fatal Error] File not found: 'C:\Arquivos de programas\FastReports\FastReport 
4\LibD6\Unit1.pas'

realmente não tem essa Unit1.pas no diretório reclamado, mas a questão é que 
esse diretório se trata do ultimo caminho que está postado na Library Path, ou 
seja, basta eu tirar esse cara de lá q automaticamente ele apresenta o mesmo 
erro na ultima linha que sobrou... não sei se consegui ser claro.

Detalhe : posso mudar de aplicação, q o erro continua

Será que alguém poderia me ajudar. 

Desde já agradeço,

César Eduardo T. Silva
Ober S/A - Ind. e Com.
Programador
[EMAIL PROTECTED]   
    > 
(19) 3466-9200

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

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



 


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

RES: [delphi-br] Erro ao Compilar

[Cesar - Informatica]

Pessoal, desculpe-me, mas na verdade tinha uma chamada à Unit1, em um 
arquivo.pas que erra generico aqui na empresa, ou seja, foi alterado por um 
outro programador e estava com erro e não foi passado para os demais.
 
Peço desculpas pela pergunta...
 
Abraços,
 
César Eduardo T. Silva
Ober S/A - Ind. e Com.
Programador
[EMAIL PROTECTED]  
(19) 3466-9200
 



De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Cesar - 
Informatica
Enviada em: terça-feira, 20 de maio de 2008 08:18
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro ao Compilar



Pessoal estou com um erro acontecendo nas minhas aplicações. o erro é esse 
abaixo :

[Fatal Error] File not found: 'C:\Arquivos de programas\FastReports\FastReport 
4\LibD6\Unit1.pas'

realmente não tem essa Unit1.pas no diretório reclamado, mas a questão é que 
esse diretório se trata do ultimo caminho que está postado na Library Path, ou 
seja, basta eu tirar esse cara de lá q automaticamente ele apresenta o mesmo 
erro na ultima linha que sobrou... não sei se consegui ser claro.

Detalhe : posso mudar de aplicação, q o erro continua

Será que alguém poderia me ajudar. 

Desde já agradeço,

César Eduardo T. Silva
Ober S/A - Ind. e Com.
Programador
[EMAIL PROTECTED]    > 
(19) 3466-9200


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



 


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

RES: [delphi-br] Gravar e visualizar imagem do banco de dados

[Davi Eduardo Borges Wall]

Basta colocar a imagem em um caminho de rede comum para todas as maquinas

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de 
Alessandro DUARTE de Moraes
Enviada em: segunda-feira, 19 de maio de 2008 18:01
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Gravar e visualizar imagem do banco de dados

 

Este assunto foi discutido na semana passada. Sugiro que você dê uma olhada 
pois foram abordados vários casos.

Alessandro DUARTE de Moraes
A.C. Santa Casa do Rio Grande.
http://www.santacasarg.com.br

- Original Message - 
From: Carlos 
To: delphi-br@yahoogrupos.com.br   
Sent: Monday, May 19, 2008 4:57 PM
Subject: [delphi-br] Gravar e visualizar imagem do banco de dados

Boa tarde a todos!!
Solicito ajuda aos colegas com mais este problema:
Tem um sistema que captura uma foto com o caminho do banco de dados e 
apresenta para o usuário. Até ai tudo bem, mas o problema é que este 
sistema é usado na rede, e caso o usuário tente visualizar a imagem 
em uma máquina diferente de onde estão as imagens, ocorre um erro 
porque ele não encontra o caminho.
Alguém poderia me dar uma ajuda neste sentido, com um tutorial, ou 
link...por favor...
Uso DBExpress, MySql 5.0, Delphi 7.

//Este é o código para exibir a imagem
dmCadastro.cdsFotos.Close;
dmCadastro.cdsFotos.Params[0].Value :=
dmCadastro.cdsEfetivorf.Value;
dmCadastro.cdsFotos.Open;
if not (dmCadastro.cdsFotos.IsEmpty) then
imgFoto.Picture.LoadFromFile(dmCadastro.cdsFotosfoto.Value)
else
imgFoto.Picture := nil;

//Este é o código que salva a imagem
if dlgOpenPicFoto.Execute then
begin
dmCadastro.cdsFotos.Insert;
dmCadastro.cdsFotosrf.Value :=
dmCadastro.cdsEfetivorf.Value;
imgFoto.Picture.LoadFromFile(dlgOpenPicFoto.FileName);
dmCadastro.cdsFotos.FieldByName('Foto').AsString :=
dlgOpenPicFoto.FileName;
dmCadastro.cdsFotos.Post;
end;

Agradeço antecipadamente a atenção dispensada.
att
Carlos

-- 
E-mail Seguro Vetorial.net 

Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, 
encaminhe para [EMAIL PROTECTED]   

Chave de Identificação: 54568,4831dc66542791418011894 

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

 



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

RES: [delphi-br] Erro ao Compilar

[Davi Eduardo Borges Wall]

Abra o DPR e procure por esse path e excluía.

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Cesar - 
Informatica
Enviada em: terça-feira, 20 de maio de 2008 08:18
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro ao Compilar

 

Pessoal estou com um erro acontecendo nas minhas aplicações. o erro é esse 
abaixo :

[Fatal Error] File not found: 'C:\Arquivos de programas\FastReports\FastReport 
4\LibD6\Unit1.pas'

realmente não tem essa Unit1.pas no diretório reclamado, mas a questão é que 
esse diretório se trata do ultimo caminho que está postado na Library Path, ou 
seja, basta eu tirar esse cara de lá q automaticamente ele apresenta o mesmo 
erro na ultima linha que sobrou... não sei se consegui ser claro.

Detalhe : posso mudar de aplicação, q o erro continua

Será que alguém poderia me ajudar. 

Desde já agradeço,

César Eduardo T. Silva
Ober S/A - Ind. e Com.
Programador
[EMAIL PROTECTED]    > 
(19) 3466-9200


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

 



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

[delphi-br] Erro ao Compilar

[Cesar - Informatica]

Pessoal estou com um erro acontecendo nas minhas aplicações. o erro é esse 
abaixo :
 
[Fatal Error] File not found: 'C:\Arquivos de programas\FastReports\FastReport 
4\LibD6\Unit1.pas'
 
realmente não tem essa Unit1.pas no diretório reclamado, mas a questão é que 
esse diretório se trata do ultimo caminho que está postado na Library Path, ou 
seja, basta eu tirar esse cara de lá q automaticamente ele apresenta o mesmo 
erro na ultima linha que sobrou... não sei se consegui ser claro.
 
Detalhe : posso mudar de aplicação, q o erro continua
 
Será que alguém poderia me ajudar. 
 
Desde já agradeço,
 
César Eduardo T. Silva
Ober S/A - Ind. e Com.
Programador
[EMAIL PROTECTED]  
(19) 3466-9200
 


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

Re: [delphi-br] Fontes disponiveis......

[MarcioCC®]

Bom dia amigo , manda pra mim no e-mail : [EMAIL PROTECTED]  ...t+

JESUS TE AMA !!

*
MarcioCC® - Analista/Programador - Delphi,PHP,ASP

*

RE: [delphi-br] Borland anuncia venda da CodeGear para a Embarcadero Technologies

[Andreano Lanusse]

Jancarlos,

Vamos a outro exemplo, um HONDA CIVIC

BRASIL
Honda Civic LXS 1.8 16v - R$ 70.198 / R$ 1.66 - US$ 42.288

EUA

Honda Civic EX  -  US$ 22.460 + 8.2% (imposto na California) - US$ 24.301

Creio que o EX e LXS são equivalents, as siglas mudam em cada país.

Qual a diferença entre as duas versões?

Pode ser que os impostos são absurdos, existe variações de imposto depende do 
seguimento, mas não deixa de ser baixo.


[]'s
Andreano Lanusse
CodeGear

From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of 
Jancarlos Martins
Sent: Monday, May 12, 2008 4:00 PM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Borland anuncia venda da CodeGear para a Embarcadero 
Technologies


Alguem ja teve a curiosidade de ver o preco em dolar?

BRASIL
CodeGear RAD Studio 2007 Architect New User R$ 7.917,60 / R$ 1,66= $
4.769,63

EUA
Delphi 2007 for Win32 R2 - Download $ 1.974,00 x R$ 1,66= R$ 3.276,84

qual a diferença entra as duas versoes?

se for a mesma o dolar esta cotado a R$ 4.00, claro q tem os impostos mas
nao chega a tanto.

Vamos ver entao a versao profissional

BRASIL
Delphi 2007 for Win32 Professional New User R$ 2.157,60 / R$ 1,66=$
1.299,39

EUA
Professional New User $899,00 x R$ 1,66 = R$ 1.492,00

olhem e reflitam

PerjanBR.

2008/5/12 Bruno Lichot <[EMAIL PROTECTED]>:

> Esses valores são para New User na promoção que está sendo feita, o
> upgrade é mais caro.
>
> Liga para aquele telefone que passei e confirme, ou me passa um email em
> pvt com seu telefone que te ligo em seguida.
>
> Abs
>
> BL
>
> From: delphi-br@yahoogrupos.com.br 
> [mailto:
> delphi-br@yahoogrupos.com.br 
> ] On Behalf
> Of [EMAIL PROTECTED] 
> 
> Sent: segunda-feira, 12 de maio de 2008 13:01
> To: delphi-br@yahoogrupos.com.br 
> 
> Subject: RE: [delphi-br] Borland anuncia venda da CodeGear para a
> Embarcadero Technologies
>
> Ok. agradeço a informacao, somente tem um porem os valores passados sao
> para upgrde, no meu caso eu
> estou sainda da empresa onde trablaho e pretendo criar a minha propria, ai
> neste caso o interprise
> passa para 4.800 e o pro para 2.800.
>
> > O Delphi Pro está com o valor de 1080, e assim como a antiga verão do
> Turbo Pro, só possuía acesso
> > nativo para MySql e Interbase no DBExpress. A versão do Turbo Pro possui
> as mesmas características
> > do Delphi 2007 Win32 Pro.
> >
> > A Versão Enterprise está com o valor de 2400, esta versão é mais
> completa em questões de drivers,
> > para desenvolvimento de aplicações mais críticas, com desenvolvimento
> web completo com total
> > suporte e integração a Web 2.0 e Ajax.
> >
> > Na página do produto você encontra o Feature Matrix que descreve
> totalmente os recursos entre as
> > versões. http://www.codegear.com/br/products/delphi/win32
> >
> > Abs
> >
> > BL
> >
> > From: delphi-br@yahoogrupos.com.br 
> > 
> 
> [mailto:delphi-br@yahoogrupos.com.br 
> 
> ]
> On Behalf Of Marcio
> > William Sent: sábado, 10 de maio de 2008 09:11
> > To: delphi-br@yahoogrupos.com.br 
> > 
> 
> > Subject: Re: [delphi-br] Borland anuncia venda da CodeGear para a
> Embarcadero Technologies
> >
> >
> > oi Bruno, só que tem dois problemas;
> > 1) o preço 950,00 x 2.150,00
> > 2) o turbo, pelo que eu soube, viria com dbx para interbase, mysql,
> > sqlserver e oracle, a versao professional somente vem com interbase,
> mysql,
> > somente a interprise que custa 4.800,00 que tem todos os drives, nao que
> a
> > minha intencao seja desenvolver para sqlserver ou oracle, o problema e
> se eu
> > encontrar um cliente que queria esta plataforma pois sua base de dados
> eh
> > esta?
> >
> > - Original Message -
> > From: "Bruno Lichot" <[EMAIL 
> > PROTECTED]
>  >>
> > To: mailto:delphi-br%40yahoogrupos.com.br> 
> > 
>  > >>
> > Sent: Friday, May 09, 2008 2:11 PM
> > Subject: RE: [delphi-br] Borland anuncia venda da CodeGear para a
> > Embarcadero Technologies
> >
> > Delphi 2007 For Win32 Professional, é o equivalente ao turbo só que
> muito
> > melhor.
> >
> > Aproveite a promoção do 60% de desconto, ligue para 11-2165-8045 ou
> mande
> > email para
> > [EMAIL PROTECTED] 
> >  > [EMAIL PROTECTED] 
>  > > ear.com>>.
> >
> > Abs
>