Re: [delphi-br] DBRadioGroup

2006-12-28 Por tôpico Claudiney Cogo - Listas
Com certeza Rubem, isso é o mais importante. Faço sempre questão de postar aqui 
a solução, quando alguém pergunta e eu posso ajudar, apesar de me considerar 
iniciante ainda, ou quando alguém me auxilia. Nesse caso especificamente 
enquanto procurava pelo assunto nas mensagens antigas da lista, vi que outra 
pessoa já teve o mesmo problema, mas não existia nenhum post com solução. Por 
isso a obrigação de colocar a solução que encontrei no meu caso. Se ainda não 
foi resolvido, quem sabe agora a pessoa esteja vendo e resolvendo o problema.

Valeu pela cooperação.
Claudiney.

  - Original Message - 
  From: Rubem Nascimento da Rocha 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, December 27, 2006 6:40 PM
  Subject: Re: [delphi-br] DBRadioGroup


  Sem grilo, Claudiney! Pelo menos vc fez algo que muitos que passam pela 
  listas de Delphi não fazem, só perguntam, recebem a resposta e não passam um 
  feedback pra lista se a coisa teve sucesso, explicando a técnica usada pra 
  enriquecer mais a lista. Continue assim. Sds.

  From: Claudiney Cogo - Listas [EMAIL PROTECTED]
  Reply-To: delphi-br@yahoogrupos.com.br
  To: delphi-br@yahoogrupos.com.br
  Subject: Re: [delphi-br] DBRadioGroup
  Date: Wed, 27 Dec 2006 17:54:47 -0200
  
  Salve galera...
  
  Aos 45 do segundo tempo, depois que mandei a mensagem, consegui encontrar o 
  problema.
  A falha na verdade é na definição do campo no banco de dados. Como optei 
  por guardar a string inteira (masculino ou feminino), defini uma coluna com 
  10 posições. A falha foi que criei esta coluna como CHAR, o que fazia com 
  que o banco guardasse os espaços do fim também. Com isso, nunca seria igual 
  ao valor definido no componente. Alterei no banco para VARCHAR e ficou ok.
  
  Obrigado pela atenção e desculpem a falha técnica... rs
  Claudiney.
  
   - Original Message -
   From: Claudiney Cogo - Listas
   To: delphi-br@yahoogrupos.com.br
   Sent: Wednesday, December 27, 2006 5:25 PM
   Subject: [delphi-br] DBRadioGroup
  
  
   Boa tarde a todos...
  
   Venho mais uma vez solicitar a ajuda do amigos aqui da lista.
  
   Estou há um tempo com um problema e já procurei por todos os lados a 
  respeito e não encontrei, inclusive nas mensagens antigas da lista. Já vi 
  outras pessoas questionando a respeito do mesmo assunto, porém sem 
  respostas ainda.
  
   A questão é a seguinte: na minha tabela tenho a coluna SEXO. Coloquei na 
  tela um componente DBRadioGroup para isso e criei dois itens: Masculino e 
  Feminino. Também defini os values como Masculino e Feminino (também já fiz 
  com M e F). No momento que crio ou altero um novo registro tudo funciona 
  perfeitamente. Os valores são inserido na minha tabela e quando navego por 
  ela o radiogroup mostra tudo correto. Porém quando abandono este cadastro 
  (saio eliminando o form com free e colocando a tabela com status false) e 
  volto novamente a ele (criando novamente o form com create e colocando a 
  tabela com status true) o radiogroup não me apresenta mais os valores 
  correspondentes, apesar de eles existirem corretamente na tabela. Sei que 
  deve ser alguma bobeira da minha parte, mas até agora não consegui 
  descobrir o que é. Já substituí o componente pelo DBRadioPanel da JVCL e 
  acontece a mesma coisa. Porém colocando um DBEdit para mostrar o valor do 
  campo, este me mostra certinho o que está na tabela. Alguém poderia me dar 
  um luz do que está acontecendo? Onde estou errando? Ou informar algum lugar 
  onde eu possa pesquisar mais alguma coisa, pois no google não encontrei 
  nada específico e nas mensagens do delphi-br também não existem respostas 
  sobre isso. E pelo que percebi, muita gente usa este componente sem 
  problema nenhum.
  
   Obrigado a todos antecipadamente.
   Claudiney
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
  
  
  [As partes desta mensagem que não continham texto foram removidas]
  

  __
  MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



   

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



[delphi-br] DBImage com JPG

2006-12-28 Por tôpico Gabriel Herdt
Pessoal, Bom dia!

Ta dificil achar na net com componente desse um DBImage que trabalhe 
com extensão JPG.

alguem poderia me passar um?

grato

sds gabriel



Re: [delphi-br] Salvar Imagem no MySql

2006-12-28 Por tôpico Desenvolvimento \(Anderson\)
para salvar:

sql:

s := 'C:\MANE.JPG';
INSERT INTO TABELA (CAMPOFOTO) VALUES (LOAD_FILE('+s+'))




para ler:

SELECT CAMPOFOTO FROM TABELA where codigo = '3' INTO DUMPFILE 
C:/imagem_rec.jpg




  - Original Message - 
  From: Ricardo Ravelli 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 28, 2006 9:36 AM
  Subject: [delphi-br] Salvar Imagem no MySql


  Tenho um cadastro de motorista e, no qual tenho um campo onde o usuário
  escolhe a foto do motorista para ser salvo junto com o cadastro, alguém sabe
  como faço para salvar essa imagem no banco de dados(mySql), tenho um campo
  blob na tabela.

  Obrigado.
  Ricardo Ravelli.

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



   

  __ Informação do NOD32 IMON 1941 (20061228) __

  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]



[delphi-br] Programa que gerencia a execução de outro programa

2006-12-28 Por tôpico Jesus
Ois,

Procurei nas mensagens anteriores da lista e não encontrei nada parecido...

Tenho um programa já pronto, que irei aqui chamar de X.EXE para exemplificar, e 
que não tenho o fonte. Esse programa pode ser executado diretamente do CD, sem 
ser instalado.

Preciso criar um programa que controle a execução do X.EXE, ou seja, que este 
programa não possa ser executado sem passar antes por um outro programa que irá 
administrar um sistema de senhas.

Vamos ver de outro angulo: um CD tem um programa A.EXE e um programa X.EXE.

Como fazer com que o programa X não possa ser executado independentemente? Em 
outras palavras, como fazer com 
que o programa X só possa ser executado através do programa A que controlará as 
senhas de seu acesso?

Abs:) Jesus


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



Re: [delphi-br] RICHEDIT - ALINHAMENTO JUSTIFICADO

2006-12-28 Por tôpico Valfrid-Ly Silva Couto
Cássio,

Eu já vi esse problema de quebrar números no - até no Word, afinal, pelo 
menos na língua portuguesa, quando você quer quebrar uma palavra, esse é o 
caracter usado, e com certeza o componente trata os números também como texto.

ksio2005 [EMAIL PROTECTED] escreveu: Estou precisando imprimir um texto que 
se encontra em um RichEdit com 
alinhamento justificado.
Tentei usar um componente disponivel na web, mas ele, em alguns 
momentos, quebra linha errado. Tipo ele quebra numeros com digitos 
no '-'.
Então gostaria de saber se alguem tem solução pra esse problema, já 
dei uma pesquisada e não achei onde conseguir isso.

agradeço desde já a atenção.

Cássio.



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



Valfrid-Ly Silva Couto
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]
ICQ 15114646
 __
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

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



RES: [delphi-br] Programa que gerencia a exe cução de outro programa

2006-12-28 Por tôpico Marcelo Hoepfner \(SI\)
Use a passagem de parametros do programa A para o programa X.

 

Se o programa X for executado diretamente ele não vai ter nenhum parâmetro, ai 
vc da uma mensagem dizendo que só pode ser executado pelo programa A ou então 
vc fecha o aplicativo e executa o programa A automaticamente.

 

De uma procurada a respeito de parâmetros, pelo menos aqui na empresa eu uso 
assim e ninguém consegue executar o meu programa diretamente, somente através 
de um outro que valida a versão e manda pra meu programa um parâmetro. Qualquer 
coisa PVT: [EMAIL PROTECTED]

 

 

Marcelo Hoepfner

www.meh.com.br

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Jesus
Enviada em: quinta-feira, 28 de dezembro de 2006 00:28
Para: lista delphi-br
Assunto: [delphi-br] Programa que gerencia a execução de outro programa

 

Ois,

Procurei nas mensagens anteriores da lista e não encontrei nada parecido...

Tenho um programa já pronto, que irei aqui chamar de X.EXE para exemplificar, e 
que não tenho o fonte. Esse programa pode ser executado diretamente do CD, sem 
ser instalado.

Preciso criar um programa que controle a execução do X.EXE, ou seja, que este 
programa não possa ser executado sem passar antes por um outro programa que irá 
administrar um sistema de senhas.

Vamos ver de outro angulo: um CD tem um programa A.EXE e um programa X.EXE.

Como fazer com que o programa X não possa ser executado independentemente? Em 
outras palavras, como fazer com 
que o programa X só possa ser executado através do programa A que controlará as 
senhas de seu acesso?

Abs:) Jesus

[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] DBImage com JPG

2006-12-28 Por tôpico Adriano Santos®
Cara,

Sinceramente eu sou contra gravar no banco o JPG porque fica muito grande a 
base, mas de qualquer forma. 
Bem, a solução que encontrei (já que não gosto de componentes de terceiro) é 
usar um TImage comum e fazer no braço a leitura e gravação veja:

Você pode adaptar ao seu banco nos eventos que preferir.

{Lê imagem do banco de dados.}
procedure TForm1.SpeedButton2Click(Sender: TObject);
var BS: TBlobStream;
  Imagem: TJPEGImage;
begin
  Image1.Picture := nil;
  BS := TBlobStream.Create(Table1Blob, BMREAD);
  if BS.Size  0 then // Verifica se o registro tem imagens gravadas
  begin
Imagem := TJPEGImage.Create;
Imagem.LoadFromStream(BS);
Image1.Picture.Assign(Imagem);
BS.FREE;
Imagem.Free;
  end
  else
ShowMessage('Não há imagem gravada neste registro');
end;

{Grava imagem no Banco}
procedure TForm1.SpeedButton3Click(Sender: TObject);
var BS: TBlobStream;
  Imagem: TJPEGImage;
begin
  if Table1.state = dsBrowse then
ShowMessage('A tabela deve estar em modo de edição ou inserção')
  else
  begin
if OpenDialog1.Execute then
begin
  BS := TBlobStream.Create(Table1Blob, BMWRITE);
  Imagem := TJPEGImage.Create;
  Imagem.LoadFromFile(OpenDialog1.FileName);
  Imagem.SaveToStream(BS);
  Image1.Picture.Assign(Imagem);
  BS.FREE;
  Imagem.Free;
  Table1.Post;
end;
  end;
end;

Gabriel Herdt [EMAIL PROTECTED] escreveu:  
Pessoal, Bom dia!
 
 Ta dificil achar na net com componente desse um DBImage que trabalhe 
 com extensão JPG.
 
 alguem poderia me passar um?
 
 grato
 
 sds gabriel
 
 
 
   


Adriano Santos
Colunista e Comissão Editorial Revista ClubeDelphi
  Coordenação de Software

Msn e Email: [EMAIL PROTECTED]
Skype: asrsantosskype

 __
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

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



Re: [delphi-br] Parser SQL

2006-12-28 Por tôpico Claudiney Cogo - Listas
Bom dia André...

Dessa maneira como você precisa eu não vi nenhum. Há um tempo atrás eu comecei 
a fazer um módulo de consulta para um sistema que estava iniciando. Só que 
nesse módulo eu seleciono a tabela que quero consultar em um combo (as tabelas 
eu busco por sql no banco de dados). A partir daí ele me carrega os campos da 
tabela em outro combo. Seleciono o campo e depois em outro combo o tipo de 
teste que quero pra essa coluna (=, , , , etc) e num edit o valor de 
comparação. Crio o sql a partir de várias seleções desse tipo e depois executo. 
Na verdade não cheguei a terminar isso 100%, mas também não falta muito. Daí 
também pra alterar para o que você precisa não deve ser muito trabalho. O que 
vai ter que fazer é analisar o que está escrito no edit ao invés de só 
selecionar nos combos. Lógico que a chance de erro é bem maior. Mas caso queira 
dar uma olhada nesse módulo que eu estava criando, sem problema, posso enviar, 
inclusivo para o grupo se for interessante. No meu caso trabalho com SQL 
Server. Aí é só fazer as adaptações necessárias.

Abraço.
Claudiney.

  - Original Message - 
  From: Andre Veloso de Mesquita 
  To: Delphi-BR 
  Sent: Wednesday, December 27, 2006 5:18 PM
  Subject: [delphi-br] Parser SQL


  Alguém aí conhece algum componente do tipo Parser para SQL.

  Explicando:

  Eu quero que o cliente possa ir clicando (ou preenchendo) um edit da 
  seguinte forma, por exemplo:

  ('justiça' ou 'delegacia') não 'abuso' e $mento

  onde ele monte o comando SQL:

  select * from artigo where
  (texto = 'justiça' ou texto = 'delegacia') and texto  'abuso and texto 
  like '%mento'

  Se alguém já viu isso por aí, avise-me por favor... reinventar a roda custa 
  tempo.

  [ ]'s



   

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



Re: [delphi-br] Parser SQL

2006-12-28 Por tôpico Andre Veloso de Mesquita
Isso que você fez é bem interessante. Tem até um componente no SourceForge 
que faz isso.

Dê uma olhada lá...

http://sourceforge.net/projects/estsearchdlgs

Mas ainda não é isso que procuro... estou dando uma olhada na indicação do 
colega sobre uma rotina do COLIBRI.

[ ]'s


- Original Message - 
From: Claudiney Cogo - Listas [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, December 28, 2006 9:16 AM
Subject: Re: [delphi-br] Parser SQL


Bom dia André...

Dessa maneira como você precisa eu não vi nenhum. Há um tempo atrás eu 
comecei a fazer um módulo de consulta para um sistema que estava iniciando. 
Só que nesse módulo eu seleciono a tabela que quero consultar em um combo 
(as tabelas eu busco por sql no banco de dados). A partir daí ele me carrega 
os campos da tabela em outro combo. Seleciono o campo e depois em outro 
combo o tipo de teste que quero pra essa coluna (=, , , , etc) e num 
edit o valor de comparação. Crio o sql a partir de várias seleções desse 
tipo e depois executo. Na verdade não cheguei a terminar isso 100%, mas 
também não falta muito. Daí também pra alterar para o que você precisa não 
deve ser muito trabalho. O que vai ter que fazer é analisar o que está 
escrito no edit ao invés de só selecionar nos combos. Lógico que a chance de 
erro é bem maior. Mas caso queira dar uma olhada nesse módulo que eu estava 
criando, sem problema, posso enviar, inclusivo para o grupo se for 
interessante. No meu caso trabalho com SQL Server. Aí é só fazer as 
adaptações necessárias.

Abraço.
Claudiney.

  - Original Message - 
  From: Andre Veloso de Mesquita
  To: Delphi-BR
  Sent: Wednesday, December 27, 2006 5:18 PM
  Subject: [delphi-br] Parser SQL


  Alguém aí conhece algum componente do tipo Parser para SQL.

  Explicando:

  Eu quero que o cliente possa ir clicando (ou preenchendo) um edit da
  seguinte forma, por exemplo:

  ('justiça' ou 'delegacia') não 'abuso' e $mento

  onde ele monte o comando SQL:

  select * from artigo where
  (texto = 'justiça' ou texto = 'delegacia') and texto  'abuso and texto
  like '%mento'

  Se alguém já viu isso por aí, avise-me por favor... reinventar a roda 
custa
  tempo.

  [ ]'s





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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos




[delphi-br] COLLATE PT_BR

2006-12-28 Por tôpico Vantuil
Olá Lista!!.
   
  Estou desenvolvendo uma aplicação em Delphi 7 + Firebirde 2.0 +  ERwin 4.1, 
só que estou ainda na fase de modelagem e não estou conseguindo implementar no 
Erwin tabelas que precisam ser declaradas com collate_pt_br. Gostaria de saber 
se alguém já passou por isso e poderia me ajudar. 
   
  Será que a declaração collate_pt_br não poderia ser definida na aplicação 
quando fosse utilizar certos atributos???
   
  []
  Vantuil.
   
  PS:Quanto ao character set consegui declarar na criação do banco de dados com 
a ferramenta IBExpert. 

 __
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

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



[delphi-br] Re: DBImage com JPG

2006-12-28 Por tôpico Gabriel Herdt
Adriano Santos, obrigado pela ajuda porem essa sua sugestão, que já 
era do meu conhecimento, não me atende.
Eu não acredito que o DBImage só trata imagens .BMP deve ter alguma 
forma de tratar com jpg ou um outro componemte semelhante...

Fico no aguardo de outra susgestão

grato gabriel

--- Em delphi-br@yahoogrupos.com.br, Adriano Santos® 
[EMAIL PROTECTED] escreveu

 Cara,
 
 Sinceramente eu sou contra gravar no banco o JPG porque fica muito 
grande a base, mas de qualquer forma. 
 Bem, a solução que encontrei (já que não gosto de componentes de 
terceiro) é usar um TImage comum e fazer no braço a leitura e 
gravação veja:
 
 Você pode adaptar ao seu banco nos eventos que preferir.
 
 {Lê imagem do banco de dados.}
 procedure TForm1.SpeedButton2Click(Sender: TObject);
 var BS: TBlobStream;
   Imagem: TJPEGImage;
 begin
   Image1.Picture := nil;
   BS := TBlobStream.Create(Table1Blob, BMREAD);
   if BS.Size  0 then // Verifica se o registro tem imagens 
gravadas
   begin
 Imagem := TJPEGImage.Create;
 Imagem.LoadFromStream(BS);
 Image1.Picture.Assign(Imagem);
 BS.FREE;
 Imagem.Free;
   end
   else
 ShowMessage('Não há imagem gravada neste registro');
 end;
 
 {Grava imagem no Banco}
 procedure TForm1.SpeedButton3Click(Sender: TObject);
 var BS: TBlobStream;
   Imagem: TJPEGImage;
 begin
   if Table1.state = dsBrowse then
 ShowMessage('A tabela deve estar em modo de edição ou 
inserção')
   else
   begin
 if OpenDialog1.Execute then
 begin
   BS := TBlobStream.Create(Table1Blob, BMWRITE);
   Imagem := TJPEGImage.Create;
   Imagem.LoadFromFile(OpenDialog1.FileName);
   Imagem.SaveToStream(BS);
   Image1.Picture.Assign(Imagem);
   BS.FREE;
   Imagem.Free;
   Table1.Post;
 end;
   end;
 end;
 
 Gabriel Herdt [EMAIL PROTECTED] 
escreveu:  Pessoal, Bom dia!
  
  Ta dificil achar na net com componente desse um DBImage que 
trabalhe 
  com extensão JPG.
  
  alguem poderia me passar um?
  
  grato
  
  sds gabriel
  
  
  

 
 
 Adriano Santos
 Colunista e Comissão Editorial Revista ClubeDelphi
   Coordenação de Software
 
 Msn e Email: [EMAIL PROTECTED]
 Skype: asrsantosskype
 
  __
 Fale com seus amigos  de graça com o novo Yahoo! Messenger 
 http://br.messenger.yahoo.com/ 
 
 [As partes desta mensagem que não continham texto foram removidas]





Re:[delphi-br] Re: DBImage com JPG

2006-12-28 Por tôpico nillgolv
Me passe o email q te envio o componente DBImage que aceita a extensão jpg.
Adriano Santos, obrigado pela ajuda porem essa sua sugestão, que já 
era do meu conhecimento, não me atende.
Eu não acredito que o DBImage só trata imagens .BMP deve ter alguma 
forma de tratar com jpg ou um outro componemte semelhante...

Fico no aguardo de outra susgestão

grato gabriel

--- Em delphi-br@yahoogrupos.com.br, Adriano Santos® 
[EMAIL PROTECTED] escreveu

 Cara,
 
 Sinceramente eu sou contra gravar no banco o JPG porque fica muito 
grande a base, mas de qualquer forma. 
 Bem, a solução que encontrei (já que não gosto de componentes de 
terceiro) é usar um TImage comum e fazer no braço a leitura e 
gravação veja:
 
 Você pode adaptar ao seu banco nos eventos que preferir.
 
 {Lê imagem do banco de dados.}
 procedure TForm1.SpeedButton2Click(Sender: TObject);
 var BS: TBlobStream;
 Imagem: TJPEGImage;
 begin
 Image1.Picture := nil;
 BS := TBlobStream.Create(Table1Blob, BMREAD);
 if BS.Size  0 then // Verifica se o registro tem imagens 
gravadas
 begin
 Imagem := TJPEGImage.Create;
 Imagem.LoadFromStream(BS);
 Image1.Picture.Assign(Imagem);
 BS.FREE;
 Imagem.Free;
 end
 else
 ShowMessage('Não há imagem gravada neste registro');
 end;
 
 {Grava imagem no Banco}
 procedure TForm1.SpeedButton3Click(Sender: TObject);
 var BS: TBlobStream;
 Imagem: TJPEGImage;
 begin
 if Table1.state = dsBrowse then
 ShowMessage('A tabela deve estar em modo de edição ou 
inserção')
 else
 begin
 if OpenDialog1.Execute then
 begin
 BS := TBlobStream.Create(Table1Blob, BMWRITE);
 Imagem := TJPEGImage.Create;
 Imagem.LoadFromFile(OpenDialog1.FileName);
 Imagem.SaveToStream(BS);
 Image1.Picture.Assign(Imagem);
 BS.FREE;
 Imagem.Free;
 Table1.Post;
 end;
 end;
 end;
 
 Gabriel Herdt [EMAIL PROTECTED] 
escreveu: Pessoal, Bom dia!
 
 Ta dificil achar na net com componente desse um DBImage que 
trabalhe 
 com extensão JPG.
 
 alguem poderia me passar um?
 
 grato
 
 sds gabriel
 
 
 
 
 
 
 Adriano Santos
 Colunista e Comissão Editorial Revista ClubeDelphi
 Coordenação de Software
 
 Msn e Email: [EMAIL PROTECTED]
 Skype: asrsantosskype
 
 __
 Fale com seus amigos de graça com o novo Yahoo! Messenger 
 http://br.messenger.yahoo.com/ 
 
 [As partes desta mensagem que não continham texto foram removidas]



 


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



Re: [delphi-br] DBImage com JPG

2006-12-28 Por tôpico Jefferson - Fórum
Você poderia usa o componente TJvDBImage da biblioteca Jedi, ele trabalha 
facilmente com campos que contenham imagens JPG.

Um abraço.

  - Original Message - 
  From: Gabriel Herdt 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 28, 2006 8:22 AM
  Subject: [delphi-br] DBImage com JPG


  Pessoal, Bom dia!

  Ta dificil achar na net com componente desse um DBImage que trabalhe 
  com extensão JPG.

  alguem poderia me passar um?

  grato

  sds gabriel



   

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



[delphi-br] Componentes InterBase

2006-12-28 Por tôpico tranquilog12
Olá!

Estou desenvolvendo um aplicativo utilizando Delphi 2005 com Firebird, 
utilizando a paleta de componentes InterBase.

Sempre que mando executar um DataSet.Post, DataSet.ApplyUpdates, e 
IBTransaction.Commit, ele fecha a consulta principal.

Existe alguma configuração específica no TIBDatabase para que ele 
mantenha a consulta principal aberta?

Obrigado!

Um abraço!



RE: [delphi-br] DBImage com JPG

2006-12-28 Por tôpico Claudiney Cogo - Listas
Bom dia Gabriel...

Já tive esse problema também, e pra dizer a verdade, também não encontrei 
nenhum componente pronto.
As maneira que encontrei de fazer isso foi trabalhar com o componente Image 
mesmo, acrescentando a unit Jpeg na uses. E alimentar a imagem no braço, 
trabalhando com stream pra guardar ela no banco e recuperar depois.

Outra seria você trabalhar convertendo de um formato pra outro... jpg na hora 
de gravar no banco e quando recuperar transformar para bmp. Algo do tipo:

procedure TFrmImagem.TBGravarClick(Sender: TObject);
var
  jpg : TJpegImage;
begin
  jpg := TJPEGImage.Create;
  jpg.Assign(Imagem.Picture.Bitmap);
  DM.TblImagem.FieldByName('Imagem').Assign(jpg);
  jpg.Free;
  DM.TblImagem.Post;
end;

procedure TFrmImagem.TBRecuperarClick(Sender: TObject;
  Button: TNavigateBtn);
var
  bmp : TBitmap;
  jpg : TJpegImage;
begin
  jpg := TJPEGImage.Create;
  bmp := TBitmap.Create;
  jpg.Assign(DM.TblImagem.FieldByName('Imagem'));
  bmp.Assign(jpg);
  Imagem.Picture.Assign(bmp);
  jpg.Free;
  bmp.Free;
end;

No meu caso eu recebia a imagem do scanner, o que fazia com que ela viesse 
sempre no padrão bmp. Então era necessário a conversão. Caso você vá ler 
diretamente um JPG do hd, provavelmente nem precisa disso tudo. Talvez só dessa 
linha   DM.TblImagem.FieldByName('Imagem').Assign(jpg); pra colocar a imagem no 
banco de dados. É questão de adapatar a sua realidade.
 
Talvez não sejam as melhores das formas, mas foram as que encontrei no momento 
que precisei, e resolveram o problema. Provavelmente o pessoal mais experiente 
da lista tenha outras soluções melhores.

Abraço.

Claudiney Cogo
N2 Solutions



  - Original Message - 
  From: Gabriel Herdt 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 28, 2006 9:22 AM
  Subject: [delphi-br] DBImage com JPG


  Pessoal, Bom dia!

  Ta dificil achar na net com componente desse um DBImage que trabalhe 
  com extensão JPG.

  alguem poderia me passar um?

  grato

  sds gabriel



   

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



RES: [delphi-br] Componentes InterBase

2006-12-28 Por tôpico anderson
Em vez de IBTransaction.Commit, use IBTransaction.CommitRetaining e pronto !

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de tranquilog12
Enviada em: quinta-feira, 28 de dezembro de 2006 15:15
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Componentes InterBase

 

Olá!

Estou desenvolvendo um aplicativo utilizando Delphi 2005 com Firebird, 
utilizando a paleta de componentes InterBase.

Sempre que mando executar um DataSet.Post, DataSet.ApplyUpdates, e 
IBTransaction.Commit, ele fecha a consulta principal.

Existe alguma configuração específica no TIBDatabase para que ele 
mantenha a consulta principal aberta?

Obrigado!

Um abraço!

 



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



Re: [delphi-br] COLLATE PT_BR

2006-12-28 Por tôpico Julio Cesar
passei por isso ha mto tempo, nao achei solucao entao fui para o Sybase Power 
Designer, esse sim eh o melhor...



Julio Cesar
[EMAIL PROTECTED]
+353 (87) 2184139
+353 (091) 630317
Nao ha saber mais ou saber menos, ha saberes diferentes (Paulo Freire)
  - Original Message - 
  From: Vantuil 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 28, 2006 2:08 PM
  Subject: [delphi-br] COLLATE PT_BR


  Olá Lista!!.

  Estou desenvolvendo uma aplicação em Delphi 7 + Firebirde 2.0 + ERwin 4.1, só 
que estou ainda na fase de modelagem e não estou conseguindo implementar no 
Erwin tabelas que precisam ser declaradas com collate_pt_br. Gostaria de saber 
se alguém já passou por isso e poderia me ajudar. 

  Será que a declaração collate_pt_br não poderia ser definida na aplicação 
quando fosse utilizar certos atributos???

  []
  Vantuil.

  PS:Quanto ao character set consegui declarar na criação do banco de dados com 
a ferramenta IBExpert. 

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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



   

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



Re: [delphi-br] Parser SQL

2006-12-28 Por tôpico Vantuil
De uma olhada no endereço abaixo, quem sabe vc encontre o que precise.
   
  http://www.felix-colibri.com/papers/db/sql_parser/sql_parser.html
   
  []
  Vantuil.

Andre Veloso de Mesquita [EMAIL PROTECTED] escreveu:
  Alguém aí conhece algum componente do tipo Parser para SQL.

Explicando:

Eu quero que o cliente possa ir clicando (ou preenchendo) um edit da 
seguinte forma, por exemplo:

('justiça' ou 'delegacia') não 'abuso' e $mento

onde ele monte o comando SQL:

select * from artigo where
(texto = 'justiça' ou texto = 'delegacia') and texto  'abuso and texto 
like '%mento'

Se alguém já viu isso por aí, avise-me por favor... reinventar a roda custa 
tempo.

[ ]'s



 

 __
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

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



Re: [delphi-br] Salvar Imagem no MySql

2006-12-28 Por tôpico Eduardo Silva dos Santos
So pra lembrar, use campo LongBlob para armazear imagens mariores.

Em 28/12/06, Desenvolvimento (Anderson) [EMAIL PROTECTED]
escreveu:

   para salvar:

 sql:

 s := 'C:\MANE.JPG';
 INSERT INTO TABELA (CAMPOFOTO) VALUES (LOAD_FILE('+s+'))

 para ler:

 SELECT CAMPOFOTO FROM TABELA where codigo = '3' INTO DUMPFILE
 C:/imagem_rec.jpg

 - Original Message -
 From: Ricardo Ravelli
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Thursday, December 28, 2006 9:36 AM
 Subject: [delphi-br] Salvar Imagem no MySql

 Tenho um cadastro de motorista e, no qual tenho um campo onde o usuário
 escolhe a foto do motorista para ser salvo junto com o cadastro, alguém
 sabe
 como faço para salvar essa imagem no banco de dados(mySql), tenho um campo
 blob na tabela.

 Obrigado.
 Ricardo Ravelli.

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

 __ Informação do NOD32 IMON 1941 (20061228) __

 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]

 




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



Re:[delphi-br] DBRadioGroup

2006-12-28 Por tôpico nillgolv
Acredito que é na tabela que vc tem que especificar o valor Default, para não 
ficar o erro, já tiver este problema há muito tempo, mas não lembro bem como 
foi que me ajudaram, de uma olhada se é realmente lá coloque o valor True ou 
False, M ou F.
Boa tarde a todos...

Venho mais uma vez solicitar a ajuda do amigos aqui da lista.

Estou há um tempo com um problema e já procurei por todos os lados a respeito e 
não encontrei, inclusive nas mensagens antigas da lista. Já vi outras pessoas 
questionando a respeito do mesmo assunto, porém sem respostas ainda.

A questão é a seguinte: na minha tabela tenho a coluna SEXO. Coloquei na tela 
um componente DBRadioGroup para isso e criei dois itens: Masculino e Feminino. 
Também defini os values como Masculino e Feminino (também já fiz com M e F). No 
momento que crio ou altero um novo registro tudo funciona perfeitamente. Os 
valores são inserido na minha tabela e quando navego por ela o radiogroup 
mostra tudo correto. Porém quando abandono este cadastro (saio eliminando o 
form com free e colocando a tabela com status false) e volto novamente a ele 
(criando novamente o form com create e colocando a tabela com status true) o 
radiogroup não me apresenta mais os valores correspondentes, apesar de eles 
existirem corretamente na tabela. Sei que deve ser alguma bobeira da minha 
parte, mas até agora não consegui descobrir o que é. Já substituí o componente 
pelo DBRadioPanel da JVCL e acontece a mesma coisa. Porém colocando um DBEdit 
para mostrar o valor do campo, este me mostra certinho o que está na tabela. 
Alguém poderia me dar um luz do que está acontecendo? Onde estou errando? Ou 
informar algum lugar onde eu possa pesquisar mais alguma coisa, pois no google 
não encontrei nada específico e nas mensagens do delphi-br também não existem 
respostas sobre isso. E pelo que percebi, muita gente usa este componente sem 
problema nenhum.

Obrigado a todos antecipadamente.
Claudiney

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


 


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