[delphi-br] UNION em tempo de execução.

2010-07-26 Por tôpico Lucas Rampim
Bom dia.
Tenho duas tabelas que preciso unificar numa select em tempo de execução.
Eu queria fazer uma UNION entre as duas tabelas.
Tem como eu fazer isso em tempo de execução, jugando os comandos em uma query?

Obrigado.

 Lucas Rafael Rampin
Programador

Não tente trilhar um caminho estabelecido. Ao contrário, vá para onde não há 
caminho algum e deixe seu rastro.
(Johnnie Walker)





De: Rubem Rocha rubem.ro...@dtmanaus.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 26 de Julho de 2010 11:44:07
Assunto: RES: [delphi-br] Importação ignora 1ª linha do arquivo

  
Me mande esse arquivo pr’eu analisá-lo.

Sds.

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Ralp Alves Bezerra
Enviada em: segunda-feira, 26 de julho de 2010 08:05
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Importação ignora 1ª linha do arquivo

Pois é Rubem, desculpe por não citar seu nome. Foram tantas as pessoas que
tentaram ajudar que as vezes cometemos estes deslizes.

Já no caso da importação, aqui realmente ele não reconhece a primeira linha
do arquivo. Será que é por causa da extensão (.DCD)? Este é o padrão
utilizado pelo tribunal aqui do Ceará.

Abraço.

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Rubem Rocha
Enviada em: sexta-feira, 23 de julho de 2010 15:21
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: RES: [delphi-br] Importação ignora 1ª linha do arquivo
Prioridade: Alta

Analisei o fonte (que por sinal, fui eu que implementei inicialmente) e até
rodei ele com um arquivo de exemplo que o Ralp mandou para mim na época. Não
vi nada de anormal. Ele sempre pega todas as linhas do texto.

Sds.

-Mensagem original-
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Dirlei Dionísio
Enviada em: sexta-feira, 23 de julho de 2010 12:19
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
Assunto: Re: [delphi-br] Importação ignora 1ª linha do arquivo

Ler código dentro de email é terrível. Se vc colocar o código no Pastebin (
http://pastebin.com) vai nos ajudar a te ajudar.

--
Dirlei Dionísio
Novo artigo: // Não comente seu código
http://MaisQueBomCodigo.blogspot.com

Em 23 de julho de 2010 10:11, Ralp Alves Bezerra ral...@gmail.com
mailto:ralprd%40gmail.com 
mailto:ralprd%40gmail.com escreveu:



 Nobres colegas,

 Recentemente tive um problema com a importação de um arquivo.

 Com a ajuda dos nobres colegas e o envio de um exemplo pelo Walter,
 consegui
 sanar o problema.

 A importação foi realizada. Porém, fazendo uma analise mais detalhada,
 notei
 que primeira linha do arquivo nunca é importada. Fica sempre faltando o
 primeiro registro do arquivo.

 Estou postando abaixo o código utilizado. Se alguns dos nobres colegas
 poder
 me ajudar fico grato.

 Abraço.

 unit ufAnaliseDados;

 interface

 uses

 Classes, Forms, DB, Controls, Grids, DBGrids, DBClient, DBXpress, FMTBcd,

 DBXAutoInc, Provider, SqlExpr, RXCtrls, RXDBCtrl, Buttons, ExtCtrls,

 XiPanel, Dialogs, JvDialogs, XiProgressBar;

 type

 TfrmSIMNE = class(TForm)

 XiPanel1: TXiPanel;

 btImportar: TSpeedButton;

 dbgDados: TDBGrid;

 DBGrid1: TDBGrid;

 srcDados: TDataSource;

 JvOpenDialog1: TJvOpenDialog;

 Barra: TXiProgressBar;

 procedure btImportarClick(Sender: TObject);

 private

 fDadosTratados: TStringList;

 fCdsDadosTratados: TClientDataSet;

 procedure PrepararDados;

 procedure AnalisarArquivo;

 procedure CriarDataSet;

 procedure LiberarDados;

 public

 constructor Create(AOwner: TComponent); override;

 destructor Destroy; override;

 end;

 var

 frmSIMNE: TfrmSIMNE;

 implementation

 uses SysUtils, uDM, uImportaProcesso;

 {$R *.dfm}

 { TfrmAnaliseDados }

 procedure TfrmSIMNE.CriarDataSet;

 var

 i: integer;

 lLinhaDados: TStringList;

 begin

 { Cria o ClientDataSet }

 fCdsDadosTratados := TClientDataSet.Create(Self);

 { Define os campos que o ClientDataSet terá }

 with fCdsDadosTratados.FieldDefs do

 for i := 1 to 16 do

 Add(Format('Campo%2.2d', [i]), ftString, 40);

 { Cria o ClientDataset com os campos definidos }

 fCdsDadosTratados.CreateDataSet;

 { Preenche o ClientDataSet com os dados tratados }

 lLinhaDados := TStringList.Create;

 try

 lLinhaDados.Delimiter := ',';

 lLinhaDados.QuoteChar := '';

 while fDadosTratados.Count  0 do

 begin

 fCdsDadosTratados.Append;

 lLinhaDados.DelimitedText := fDadosTratados[0];

 for i := 0 to 15 do

 fCdsDadosTratados.Fields[i].AsString := lLinhaDados[i];

 fDadosTratados.Delete(0);

 end;

 finally

 lLinhaDados.Free;

 end;

 { Vincula o ClientDataSet ao DataSource associado ao DBGrid }

 

Res: [delphi-br] Problema PNG

2010-07-19 Por tôpico Lucas Rampim
Bom dia Rodrigo.
A propriedade transparent do TImage já está false e mesmo assim não funcionou.
Sério mesmo que o PNG não pode ter tranparência? Pq eu estou usando o formato 
PNG exatamente por isso. Eu não quero que a imagem tenha um fundo quero usar o 
meu form. Se for esse o caso... tem outra maneira para fazer isso?

Obrigado.

 Lucas Rafael Rampin
Programador

Não tente trilhar um caminho estabelecido. Ao contrário, vá para onde não há 
caminho algum e deixe seu rastro.
(Johnnie Walker)





De: Roni Rodrigo ronirodr...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 16 de Julho de 2010 21:07:32
Assunto: Re: [delphi-br] Problema PNG

  
o TImage tem uma propriedade chamada Tranparent... tenta colocar pra 
'false', mas pra funcionar com png, se eu não me engano o arquivo .png 
tb não pode ser transparente, tem que colocar alguma cor onde tem 
transparencia...
o/

Em 16/07/2010 14:24, Lucas Rampim escreveu:
 Boa Tarde.

 Estou com o seguinte problema
 No meu projeto, utilizo componentes TImage para exibir imagens no formato
 .PNG!!!
 Ao montar o form no delphi, consigo visualizar essas imagens 
 normalmente, mas
 quando estou executando o programa, as imagens ficam transparentes.
 Eu criei as imagens no Photoshop CS2 e utilizo o delphi 2006!

 PS.: Criei um projeto apenas com um TImage e carreguei a imagem... o 
 mesmo
 problema.

 Alguem me ajuda

 Lucas Rafael Rampin
 Programador

 Não tente trilhar um caminho estabelecido. Ao contrário, vá para onde 
 não há
 caminho algum e deixe seu rastro.
 (Johnnie Walker)


 


  

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



[delphi-br] Problema PNG

2010-07-16 Por tôpico Lucas Rampim
Boa Tarde.

Estou com o seguinte problema
No meu projeto, utilizo componentes TImage para exibir imagens no formato 
.PNG!!!
Ao montar o form no delphi, consigo visualizar essas imagens normalmente, mas 
quando estou executando o programa, as imagens ficam transparentes.
Eu criei as imagens no Photoshop CS2 e utilizo o delphi 2006!

PS.: Criei um projeto apenas com um TImage e carreguei a imagem... o mesmo 
problema.

Alguem me ajuda

 Lucas Rafael Rampin
Programador

Não tente trilhar um caminho estabelecido. Ao contrário, vá para onde não há 
caminho algum e deixe seu rastro.
(Johnnie Walker)





De: Mário Guedes jmariogue...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 16 de Julho de 2010 13:28:51
Assunto: Re: RES: RES: RES: [delphi-br] MethodAddress retornando NIL

  
Olá Eric, meu colega topou com este link e acho que se aproxima da sua
necessidade.

http://blog.marcocantu.com/blog/dynamic_methods_delphi_part3.html

Eu não analisei mais a fundo e não tenho a certeza se é disso que você
precisa.

Boa sorte!

*José Mário Silva Guedes*
e-mail: jmariogue...@gmail.com

[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] Variável Global

2010-06-22 Por tôpico Lucas Rampim
Bom dia.

Um arquivo .INI com criptografia ou armazenar esses dados em arquivos 
temporários não resolveria seu problema?

 





De: Nazareno Neto nazareno.nobr...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 22 de Junho de 2010 8:47:01
Assunto: Re: [delphi-br] Variável Global

Antes de fechar a tela de login, vc deve criar o form pricipal? se sim,
antes de dar fechar a tela de login vc passa os valores para o form
principal.

Em 21 de junho de 2010 21:59, Eny Urias enyur...@yahoo.com.br escreveu:



 Mas eu não trabalho dessa forma... Não crio tooodos os forms... Eu trabalho
 com MDI e os forms são criados na hora que o usuário necessita... E o form
 principal só é criado se, e somente se, o usuário efetuar o login
 corretamente... Uso hash nas senhas e tenho todo um cuidado para que não
 haja nenhuma forma de algum intruso querer fazer caca no sistema... Por
 isso a necessidade de guardar alguns dados nessa transição entre o login e o
 principal...

 --
 Eny Trova Urias

 Somos o que repetitivamente fazemos, portanto, a excelência não é um
 feito, mas um hábito- Aristóteles

 
 De: Alisson alss...@yahoo.com.br alssnco%40yahoo.com.br
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 21 de Junho de 2010 20:28:08
 Assunto: Re: [delphi-br] Variável Global


 Eny,

 Por que você não cria o form principal antes do form de login? Se o form
 onde estará a variável é o form principal, não vejo problema nenhum em
 criá-lo antes de todos os outros forms.

 - Original Message -
 From: Eny Urias
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Monday, June 21, 2010 5:40 PM
 Subject: Res: [delphi-br] Variável Global

 Mas é aí que está o problema... na hora em que preciso guardar o valor, o
 meu form principal ainda nao foi criado... Ele só é criado se o usuario
 efetuar o login!
 --
 Eny Trova Urias

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

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

  




-- 
Nazareno Neto
Desenvolvedor Delphi e Firebird

http://www.delphisistemas.com.br
nazarenon...@delphisistemas.com.br
nazareno.nobr...@gmail.com


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  

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