Re: [delphi-br] Re: Delphi portatil

2009-06-18 Por tôpico JB
lol

2009/6/18 Paulo Coutinho pa...@prsolucoes.com



 Putz mandou bem embarca, exatamente, como eu disse também, comorpu é
 SEU o que você vai fazer não importa, as pessoas cismam de querer
 fazer uma tempestade em copo d´agua, fala sério.

 Cuide do seu Delphi e deixei o cara que usa uma versão portátil com a
 dele, pelo amor de Deus, sempre que existe uma discução sobre isso é a
 mesma coisa, comprou é seu po, coloca ele onde quiser, a empresa lá
 vai querer saber onde e como você usa, o importante é que você tenha
 a licença.

 Os que mais criticam devem ser os que mais tem software pirata e
 querem ainda contar vantagem em cima dos outros.

 Sai pra lá olho gordo!!!

 A paz do Senhor para todos!

 --
 Atenciosamente,
 Paulo Coutinho.
 Blog: www.prsolucoes.com/blog
 Site: www.prsolucoes.com
 Msn: pa...@prsolucoes.com paulo%40prsolucoes.com

 2009/6/14 EmbarcaDelphi 
 embarcadel...@yahoo.com.brembarcadelphi%40yahoo.com.br
 :
 
 
  Até a Bíblia diz para as pessoas tirarem a trave do próprio olho em vez
  de querer tirar o cisco dos olhos dos outros. Claro que de algum modo
  alguém usa ou já usou produtos piratas, mas a questão não é essa e sim
  de que a nossa lista (Delphi-BR) não permite o assunto sobre isso e
  regras são regras, outra coisa é que se a pessoa que usa esse tal de
  Delphi portátil tem uma licença oficial do Delphi 7. Creio que se a
  pessoa tem uma licença, a Embarcadero/Borland/CodeGear além de não saber
  pois ninguém é obrigado mostrar o próprio PenDrive Pessoal (não há lei
  no mundo que faça alguém dar seu pendrive, diferente do computador que é
  juridicamente possível e passível de investigação), o licenciado está
  quite com sua obrigação pois tem ele instalado no computador. E outra,
  pô, que mal você está fazendo a Embarcadero/CodeGear em utilizar tanto
  instalado no seu micro como usando no PenDrive, afinal, não comprou uma
  licença?
  Acho que as pessoas interessadas (CodeGear) é quem deveria se preocupar
  com isso, mas... existe tantos programadores infelizes e mal sucedido
  que vive o tempo todo preocupado com os outros programadores e esquece
  da própria vida.
 
  Agora, aos piratas, problema deles, e cuide para um dia não ser
 descoberto!
 
  Sucesso a todos e vamos cumprir com as regras daqui da Lista Delphi-BR
 
  felipe_a_milagres escreveu:
 
 
 
  Que confusão por causa de um simples delphi portable ...
 
  vc's estao crucificando o cara por ele simplesmente ter falado que
  adquiriu um delphi portable pela internet ...
 
  antes de vc's continuarem acusando-o de pirataria, quem aki NUNCA
  praticou 'o ato da pirataria' ..
 
  quem nunca baixou alguma musica, ou um filme/video, ou até mesmo
  programas .. melhor .. quem aki tem o Windows original 
 
  um dos motivos para a existência dos programas portables, seria
  justamente a praticidade de usar um programa qualquer, en qualquer
  maquina. (e sem a necessidade de instalar e modificar o windows)
 
  tenham a mente um pouco mais aberta e enxerguem os benefícios de um
  delphi portable. (ja que prejuízo nao tem nenhum)
 
  Moyses, eu solucionei o problema da falta dos (muitos) componentes
  desse delphi, criando um outro usando o programa Thinstall
 
 
  --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br,
 nillgolv nillg...@... escreveu
  
  
   Achei muito importante este delphi portátil, será de grande valor
  para vc poder trabalhar com o delphi onde estiver. Podendo transportar
  apenas o pendrive e estar sempre dando continuidade ao seu projeto.
  
   Demais mesmo.
  
  
 
  .
 
 
 
 

 --
 Atenciosamente,
 Paulo Coutinho.
 Blog: www.prsolucoes.com/blog
 Site: www.prsolucoes.com
 Msn: pa...@prsolucoes.com paulo%40prsolucoes.com
  




-- 

José Benedito
Software Developer
skype:jb.sologix


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



Re: [delphi-br] Problemas: Intraweb + Rave + pdf

2009-06-18 Por tôpico Fábio Thomaz
Servidor de relatórios? Eu nunca trabalhei assim. Eu teria que adquirir uma
outra versão do rave? Alguma versão server? Existe algum artigo explicando
como isto irá funcionar?

2009/6/17 Bruno Lichot bruno.lic...@borland.com



 este erro deve estar ocorrendo pelo tipo de instancia do rave.

 a melhor forma de resolver isso é criar um servidor de relatório com
 datasnap. alem de sua aplicação ficar mais rápida..sera melhor de dar
 manutencao, mais segura, mais facil de distribuir e evluir/reutilizar

 From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br[mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] On Behalf
 Of Fábio Thomaz
 Sent: terça-feira, 16 de junho de 2009 15:15
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: [delphi-br] Problemas: Intraweb + Rave + pdf


 Olá amigos, estou desenvolvendo um módulo de matrículas OnLine no intraweb,
 depois de tudo feito, funcionando certinho, passei para os testes finais e
 verifiquei que o arquivo pdf gerado no rave (Ficha de Matrícula, Boleto,
 etc
 ...) saem com os dados de uma outra pessoa quando este processo de
 inscrição
 é feito simultaneamente, alguém teria uma dica para que isto não
 acontece-se? A classe TIWUserSessionBase é única para cada usuário não é?
 Veja um exemplo:
 //Função que rega o arquivo pdf e retorna o link do mesmo
 function TUserSession.ImprimeFichaMatricula(Matricula, Curso, Ano:
 Integer):
 string;
 var Arquivo : string;
 vcdsIMat: TClientDataSet;
 rvProject: TRvProject;
 rvPDF: TRvRenderPDF;
 rvSystem: TRvSystem;
 begin
 rvProject := TRvProject.Create(Self);
 rvProject.Name := 'rvFichaMatricula';
 rvPDF := TRvRenderPDF.Create(Self);
 rvSystem := TRvSystem.Create(Self);
 try
 rvProject.Engine := rvSystem;

 rvProject.Close;
 cdsFichaMatricula.Close;
 cdsFichaMatricula.Params[0].Value := Matricula;
 cdsFichaMatricula.Open;

 if cdsFichaMatricula.RecordCount = 1 then
 begin
 Arquivo := 'FichaMatricula' + WebApplication.AppID + '.pdf';

 rvProject.ProjectFile := gsAppPath + 'Files\FichaMatricula.rav';
 rvProject.Open;

 vcdsIMat := TClientDataSet.Create(Self);
 vcdsIMat.Name := 'vcdsIMat';
 try

 vcdsIMat.Data := Consulta('SELECT C.CSI_NOMCUR, P.CSI_DATA,
 P.CSI_INSCRICAO '+
 'FROM TSI_PREMATRICULA P '+
 'INNER JOIN TSI_CADCUR C ON (C.CSI_CODCUR
 = P.CSI_CODCUR) '+
 'WHERE P.CSI_CODESC = '+vgCodEscola+
 'AND P.CSI_ANOLET = '+IntToStr(Ano)+
 'AND P.CSI_MATALU = '+IntToStr(Matricula)+
 'AND P.CSI_CODCUR = '+IntToStr(Curso));

 with rvProject do
 begin
 SetParam('Curso',vcdsIMat.Fields[0].AsString);
 SetParam('Inscricao',vcdsIMat.Fields[2].AsString);
 SetParam('DataMat',vcdsIMat.Fields[1].AsString);
 end;

 with rvSystem do
 begin
 SystemSetups := [];
 DefaultDest := rdFile;
 DoNativeOutput:= False;
 RenderObject:= rvPDF;
 OutputFileName:= gsAppPath + 'Files\'+ Arquivo;
 end;

 rvProject.Execute;

 finally
 rvProject.Close;
 vcdsIMat.Free;
 end;

 Result :=
 'window.open('+WebApplication.Request.URL+'/files/'+Arquivo+', ,);';
 end
 else
 begin
 Result := 'window.open(Files/FichaNaoEncontrada.html, ,);';
 end;
 finally
 rvProject.Free;
 rvPDF.Free;
 rvSystem.Free;
 end;
 end;

 //Procedimento que mostra a ficha
 procedure TF0InfPreMatricula.iwlnkFichaMatriculaClick(Sender: TObject);
 var Matricula, Curso: Integer;
 begin
 with UserSession do
 begin
 Matricula := StrToInt(Parametros[0]);
 Curso := StrToInt(Parametros[2]);
 AddToInitProc(ImprimeFichaMatricula(Matricula,Curso,vgAnoLetivo));
 end;
 end;

 Aparentemente, pelos testes que fiz, parece que as informações ficam
 armazenadas no servidor, quando outro usuário chama o mesmo procedimento
 ele
 apenas cria outro arquivo com as mesmas informações obtidas antes, estranho
 é que eu crio e destruo os componentes em tempo de execução e mesmo assim o
 problema persiste.

 Qualquer ajuda é bem vinda! Desde já agradeço.

 Fábio Thomaz.

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



[delphi-br] sFTP

2009-06-18 Por tôpico Fernando de Laurentiis
Pessoal, bom dia.

Tenho um projeto q precisarei fazer uploads e downloads de arqs através de FTP, 
só q é esse sFTP, provavelmente esse 's' se refere a 'seguro', tipo porta de 
segurança ou algo do gênero.
Uso o D5, me disseram q ele tem esse componente e q talvez só precise 
configurá-lo para modo de segurança.
Alguém conhece esse componente, como ele funciona e onde alterar para esse modo 
seguro?

Grato!!


[delphi-br] dica de como fazer ?

2009-06-18 Por tôpico alessandra porto
Preciso de ideias de como fazer para:

 Tenho N fotos em um banco
esse nuemro pode variar muito conforme o cliente
então preciso descarregar do banco
o arquivo  em disco ou em memoria
e gravar em cd.

 Gravar ,receber do banco isso tudo
é simples domino bem , preciso e de uma ideia
de como fazer de forma simples e pratica
o recebimento dessas fotos do banco.

arquivo em disco?
memoria?
como se varia tanto o numero?

 Agradeço aos amigos que colaborarem








  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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



[delphi-br] TPropertyEditor no delphi 2009

2009-06-18 Por tôpico Weber Luvisa
Olá, caros colegas preciso usar a TPropertyEditor no delphi 2009 porém não 
estou conseguindo já adicionei as units   DesignEditors,
  DesignConst,
  DesignIntf, e nada





[delphi-br] [ LISTVIEW - altura da linha ]

2009-06-18 Por tôpico marciosulfabril
Socorro amigos !!!

estou utilizando uma ListView , e preciso alterar a altura da linha
dela conforme volume de texto no subitem .

isso é possivel ??

Att. Marcio



[delphi-br] Off Topic - vaga programador em Curitiba

2009-06-18 Por tôpico Sidney Leandro da Silva
Pessoal,

Perdoem-me pelo off, mas além de nossa necessidade imediata, é uma oportunidade 
para profissionais Delphi:

Programador(a) Delphi

Experiência em : Programação Delphi, Utilização de banco de dados relacional 
(Firebird, SQL Server, MySql, etc ..).

Local : Curitiba - PR

Contratação imediata (CLT - registrado)

Entrar em contato com : Silvio – sil...@javenessi.com.br ou (41) 3277-5305

 
www.javenessi.com.br




[delphi-br] Re: Alguém sabe o que aconteceu com o driver IBExpertDBXFirebird?

2009-06-18 Por tôpico Joao Henrique Levada
Muito bem observado.

Vamos aguardar por uma palavra do próprio Thiago...



Re: [delphi-br] Off Topic - vaga programador em Curitiba

2009-06-18 Por tôpico Leonardo Quinino
Tranquilo, não sou moderador, mas acho que essas ofertas só vem é fazer
melhorar a qualidade da lista, e atrair, mais profissionais para estar
sempre acompanhando.

Eu por exemplo não posso me candidatar à vaga, por estar longe (estou em MG)
e preencho os requisitos, mas é bom sempre essas ofertas por aqui sim, se
pintar uma oferta por perto aqui, vou tentar sim.

2009/6/18 Sidney Leandro da Silva sidf...@yahoo.com.br



 Pessoal,

 Perdoem-me pelo off, mas além de nossa necessidade imediata, é uma
 oportunidade para profissionais Delphi:

 Programador(a) Delphi

 Experiência em : Programação Delphi, Utilização de banco de dados
 relacional (Firebird, SQL Server, MySql, etc ..).

 Local : Curitiba - PR

 Contratação imediata (CLT - registrado)

 Entrar em contato com : Silvio – 
 sil...@javenessi.com.brsilvio%40javenessi.com.brou (41) 3277-5305

 www.javenessi.com.br

 




-- 
Leonardo Quinino


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html




RE: [delphi-br] Problemas: Intraweb + Rave + pdf

2009-06-18 Por tôpico Bruno Lichot
crie um servidor datasnap, e cada método remoto executa e cria um relatório em 
PDF ou HTML, ou qq outro tipo suportado pelo rave.

desta forma vc não terá problema de execução do rave pelo iw.

abs

BL

From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of Fábio Thomaz
Sent: quinta-feira, 18 de junho de 2009 08:52
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Problemas: Intraweb + Rave + pdf





Servidor de relatórios? Eu nunca trabalhei assim. Eu teria que adquirir uma
outra versão do rave? Alguma versão server? Existe algum artigo explicando
como isto irá funcionar?

2009/6/17 Bruno Lichot 
bruno.lic...@borland.commailto:bruno.lichot%40borland.com



 este erro deve estar ocorrendo pelo tipo de instancia do rave.

 a melhor forma de resolver isso é criar um servidor de relatório com
 datasnap. alem de sua aplicação ficar mais rápida..sera melhor de dar
 manutencao, mais segura, mais facil de distribuir e evluir/reutilizar

 From: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
 delphi-br%40yahoogrupos.com.br[mailto:
 delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
 delphi-br%40yahoogrupos.com.br] On Behalf
 Of Fábio Thomaz
 Sent: terça-feira, 16 de junho de 2009 15:15
 To: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
 delphi-br%40yahoogrupos.com.br
 Subject: [delphi-br] Problemas: Intraweb + Rave + pdf


 Olá amigos, estou desenvolvendo um módulo de matrículas OnLine no intraweb,
 depois de tudo feito, funcionando certinho, passei para os testes finais e
 verifiquei que o arquivo pdf gerado no rave (Ficha de Matrícula, Boleto,
 etc
 ...) saem com os dados de uma outra pessoa quando este processo de
 inscrição
 é feito simultaneamente, alguém teria uma dica para que isto não
 acontece-se? A classe TIWUserSessionBase é única para cada usuário não é?
 Veja um exemplo:
 //Função que rega o arquivo pdf e retorna o link do mesmo
 function TUserSession.ImprimeFichaMatricula(Matricula, Curso, Ano:
 Integer):
 string;
 var Arquivo : string;
 vcdsIMat: TClientDataSet;
 rvProject: TRvProject;
 rvPDF: TRvRenderPDF;
 rvSystem: TRvSystem;
 begin
 rvProject := TRvProject.Create(Self);
 rvProject.Name := 'rvFichaMatricula';
 rvPDF := TRvRenderPDF.Create(Self);
 rvSystem := TRvSystem.Create(Self);
 try
 rvProject.Engine := rvSystem;

 rvProject.Close;
 cdsFichaMatricula.Close;
 cdsFichaMatricula.Params[0].Value := Matricula;
 cdsFichaMatricula.Open;

 if cdsFichaMatricula.RecordCount = 1 then
 begin
 Arquivo := 'FichaMatricula' + WebApplication.AppID + '.pdf';

 rvProject.ProjectFile := gsAppPath + 'Files\FichaMatricula.rav';
 rvProject.Open;

 vcdsIMat := TClientDataSet.Create(Self);
 vcdsIMat.Name := 'vcdsIMat';
 try

 vcdsIMat.Data := Consulta('SELECT C.CSI_NOMCUR, P.CSI_DATA,
 P.CSI_INSCRICAO '+
 'FROM TSI_PREMATRICULA P '+
 'INNER JOIN TSI_CADCUR C ON (C.CSI_CODCUR
 = P.CSI_CODCUR) '+
 'WHERE P.CSI_CODESC = '+vgCodEscola+
 'AND P.CSI_ANOLET = '+IntToStr(Ano)+
 'AND P.CSI_MATALU = '+IntToStr(Matricula)+
 'AND P.CSI_CODCUR = '+IntToStr(Curso));

 with rvProject do
 begin
 SetParam('Curso',vcdsIMat.Fields[0].AsString);
 SetParam('Inscricao',vcdsIMat.Fields[2].AsString);
 SetParam('DataMat',vcdsIMat.Fields[1].AsString);
 end;

 with rvSystem do
 begin
 SystemSetups := [];
 DefaultDest := rdFile;
 DoNativeOutput:= False;
 RenderObject:= rvPDF;
 OutputFileName:= gsAppPath + 'Files\'+ Arquivo;
 end;

 rvProject.Execute;

 finally
 rvProject.Close;
 vcdsIMat.Free;
 end;

 Result :=
 'window.open('+WebApplication.Request.URL+'/files/'+Arquivo+', ,);';
 end
 else
 begin
 Result := 'window.open(Files/FichaNaoEncontrada.html, ,);';
 end;
 finally
 rvProject.Free;
 rvPDF.Free;
 rvSystem.Free;
 end;
 end;

 //Procedimento que mostra a ficha
 procedure TF0InfPreMatricula.iwlnkFichaMatriculaClick(Sender: TObject);
 var Matricula, Curso: Integer;
 begin
 with UserSession do
 begin
 Matricula := StrToInt(Parametros[0]);
 Curso := StrToInt(Parametros[2]);
 AddToInitProc(ImprimeFichaMatricula(Matricula,Curso,vgAnoLetivo));
 end;
 end;

 Aparentemente, pelos testes que fiz, parece que as informações ficam
 armazenadas no servidor, quando outro usuário chama o mesmo procedimento
 ele
 apenas cria outro arquivo com as mesmas informações obtidas antes, estranho
 é que eu crio e destruo os componentes em tempo de execução e mesmo assim o
 problema persiste.

 Qualquer ajuda é bem vinda! Desde já agradeço.

 Fábio Thomaz.

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



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



Re: [delphi-br] Problemas: Intraweb + Rave + pdf

2009-06-18 Por tôpico Fábio Thomaz
Valeu Bruno, vou implementar e testar.

2009/6/18 Bruno Lichot bruno.lic...@borland.com



 crie um servidor datasnap, e cada método remoto executa e cria um relatório
 em PDF ou HTML, ou qq outro tipo suportado pelo rave.

 desta forma vc não terá problema de execução do rave pelo iw.

 abs

 BL


 From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br[mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] On Behalf
 Of Fábio Thomaz
 Sent: quinta-feira, 18 de junho de 2009 08:52
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] Problemas: Intraweb + Rave + pdf

 Servidor de relatórios? Eu nunca trabalhei assim. Eu teria que adquirir uma
 outra versão do rave? Alguma versão server? Existe algum artigo explicando
 como isto irá funcionar?

 2009/6/17 Bruno Lichot bruno.lic...@borland.combruno.lichot%40borland.com
 mailto:bruno.lichot%40borland.com bruno.lichot%2540borland.com

 
 
  este erro deve estar ocorrendo pelo tipo de instancia do rave.
 
  a melhor forma de resolver isso é criar um servidor de relatório com
  datasnap. alem de sua aplicação ficar mais rápida..sera melhor de dar
  manutencao, mais segura, mais facil de distribuir e evluir/reutilizar
 
  From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 mailto:delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br
 delphi-br%40yahoogrupos.com.br[mailto:
  delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto:
 delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br
 delphi-br%40yahoogrupos.com.br] On Behalf
  Of Fábio Thomaz
  Sent: terça-feira, 16 de junho de 2009 15:15
  To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 mailto:delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br
 delphi-br%40yahoogrupos.com.br

  Subject: [delphi-br] Problemas: Intraweb + Rave + pdf
 
 
  Olá amigos, estou desenvolvendo um módulo de matrículas OnLine no
 intraweb,
  depois de tudo feito, funcionando certinho, passei para os testes finais
 e
  verifiquei que o arquivo pdf gerado no rave (Ficha de Matrícula, Boleto,
  etc
  ...) saem com os dados de uma outra pessoa quando este processo de
  inscrição
  é feito simultaneamente, alguém teria uma dica para que isto não
  acontece-se? A classe TIWUserSessionBase é única para cada usuário não é?
  Veja um exemplo:
  //Função que rega o arquivo pdf e retorna o link do mesmo
  function TUserSession.ImprimeFichaMatricula(Matricula, Curso, Ano:
  Integer):
  string;
  var Arquivo : string;
  vcdsIMat: TClientDataSet;
  rvProject: TRvProject;
  rvPDF: TRvRenderPDF;
  rvSystem: TRvSystem;
  begin
  rvProject := TRvProject.Create(Self);
  rvProject.Name := 'rvFichaMatricula';
  rvPDF := TRvRenderPDF.Create(Self);
  rvSystem := TRvSystem.Create(Self);
  try
  rvProject.Engine := rvSystem;
 
  rvProject.Close;
  cdsFichaMatricula.Close;
  cdsFichaMatricula.Params[0].Value := Matricula;
  cdsFichaMatricula.Open;
 
  if cdsFichaMatricula.RecordCount = 1 then
  begin
  Arquivo := 'FichaMatricula' + WebApplication.AppID + '.pdf';
 
  rvProject.ProjectFile := gsAppPath + 'Files\FichaMatricula.rav';
  rvProject.Open;
 
  vcdsIMat := TClientDataSet.Create(Self);
  vcdsIMat.Name := 'vcdsIMat';
  try
 
  vcdsIMat.Data := Consulta('SELECT C.CSI_NOMCUR, P.CSI_DATA,
  P.CSI_INSCRICAO '+
  'FROM TSI_PREMATRICULA P '+
  'INNER JOIN TSI_CADCUR C ON (C.CSI_CODCUR
  = P.CSI_CODCUR) '+
  'WHERE P.CSI_CODESC = '+vgCodEscola+
  'AND P.CSI_ANOLET = '+IntToStr(Ano)+
  'AND P.CSI_MATALU = '+IntToStr(Matricula)+
  'AND P.CSI_CODCUR = '+IntToStr(Curso));
 
  with rvProject do
  begin
  SetParam('Curso',vcdsIMat.Fields[0].AsString);
  SetParam('Inscricao',vcdsIMat.Fields[2].AsString);
  SetParam('DataMat',vcdsIMat.Fields[1].AsString);
  end;
 
  with rvSystem do
  begin
  SystemSetups := [];
  DefaultDest := rdFile;
  DoNativeOutput:= False;
  RenderObject:= rvPDF;
  OutputFileName:= gsAppPath + 'Files\'+ Arquivo;
  end;
 
  rvProject.Execute;
 
  finally
  rvProject.Close;
  vcdsIMat.Free;
  end;
 
  Result :=
  'window.open('+WebApplication.Request.URL+'/files/'+Arquivo+',
 ,);';
  end
  else
  begin
  Result := 'window.open(Files/FichaNaoEncontrada.html, ,);';
  end;
  finally
  rvProject.Free;
  rvPDF.Free;
  rvSystem.Free;
  end;
  end;
 
  //Procedimento que mostra a ficha
  procedure TF0InfPreMatricula.iwlnkFichaMatriculaClick(Sender: TObject);
  var Matricula, Curso: Integer;
  begin
  with UserSession do
  begin
  Matricula := StrToInt(Parametros[0]);
  Curso := StrToInt(Parametros[2]);
  AddToInitProc(ImprimeFichaMatricula(Matricula,Curso,vgAnoLetivo));
  end;
  end;
 
  Aparentemente, pelos testes que fiz, parece que as informações ficam
  armazenadas no servidor, quando outro usuário chama o mesmo procedimento
  ele
  apenas cria outro arquivo com as mesmas informações obtidas antes,
 estranho
  é que eu crio e destruo os componentes em tempo de execução e mesmo assim
 o
  problema persiste.
 
  Qualquer 

[delphi-br] Logomarca em Relatório

2009-06-18 Por tôpico vandeirr
Gravei uma logomarca no formatato jpep no banco firebird, fiz um relatório com 
o REPORT BUILDER, e coloquei um compononete dbimage do report builder para 
exibir a logomarca, porém dá o erro  Bitmap image is not valid. Como eu exibo 
as imagens no relatório?

Grato,

Vandeir 



RES: [delphi-br] Ativo fixo

2009-06-18 Por tôpico YAHOO
 Procurem este é free e muito bom, “ocomon”

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Filippe Info
Enviada em: terça-feira, 16 de junho de 2009 21:35
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Ativo fixo

 






Eu estava olhando ele .. mais pelo que parece o servido tem que ser linux né
... 

eu naum consegui usar .. naum manjo nada de linux.. 

- Original Message - 
From: Berdam 
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br  
Sent: Tuesday, June 16, 2009 8:56 PM
Subject: Res: [delphi-br] Ativo fixo

tem o cacic, q é software livre, para inventário de máquinas.

--
Uberdam Cavaletti
Formado em Tecnologia da Informação - Unoesc - Xxe
Pós-graduado em desenvolvimento Java - Unoesc - Xxe

http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4251629Y0
--


De: Filippe Info filippe_i...@globo.com mailto:filippe_info%40globo.com 
Para: lista-del...@yahoogrupos.com.br
mailto:lista-delphi%40yahoogrupos.com.br ; delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br 
Enviadas: Terça-feira, 16 de Junho de 2009 20:49:41
Assunto: [delphi-br] Ativo fixo

Galera boa noite, 

Eu preciso criar um sistema para ativo fixo, para controlar meu parque de
maquina. Na verdade estou sem a menor ideia nem sei se realmente seria um
controle de ativo ixo, ou um controle de inventario ... 

Alguem tem algum sistema de exe,plo, ou algum tutorial para me dar uma luz
... 

abraços,

Filippe Maymone

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

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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



[delphi-br] Componente de FTP

2009-06-18 Por tôpico Fernando de Laurentiis
Pessoal, boa noite.

Tenho um projeto q precisarei fazer uploads e downloads de arqs através de FTP, 
só q através do sFTP.
Uso o D5, me disseram q ele tem esse componente e q talvez só precise 
configurá-lo para modo de segurança.
Alguém conhece esse componente, como ele funciona e onde alterar para esse modo 
seguro?

Grato!!




Re: [delphi-br] Re: Delphi portatil

2009-06-18 Por tôpico Ricardo César Cardoso
Eu sou sempre favorável ao seguinte: Se está escrito que não pode, e eu perco 
garantias, pra que vou adulterar o produto?

Agora me respondam? Quanto aqui perguntaram qual sobre a técnica para tornar 
seu Delphi portátil? Todo mundo ficou de boca esperando o link para baixar 
o dito cujo.

Outra coisa que fique bem clara pois acho que não ficou. Quando se compra 
Delphi (e qualquer outro software) o que se adquire é o _direito de uso_ não o 
_direito de propriedade_. 

A diferença é simples: com o direito de propriedade vc pode realmente fazer o 
que quiser, como bem disse o Paulo Coutinho. Mas com o direito de uso, vc só 
pode usar seguindo as regras estabelecidadas por cada termo de licença, que 
permite agregar novos componentes, fazer uma cópia de segurança, e etc. 

A minha atitude insistindo em que está escrito no termo de licença e tal, é 
porque em auditoria recente pela tal lei SOx (Sarbanes-Oxley) o tal do auditor 
encheu o saco do pessoal de TI por conta de alguns softwares free, mas que a 
licença não era clara se era free também para uso comercial e encucou com o tal 
do Firefox Portable que muita gente tem na empresa. O pessoal diretamente 
responsável teve que dar uma rebolada pra convencer o auditor que não havia 
problemas (não sei exatamente como fizeram... mas parece que deu certo.)

Como temos que prestar contas a matriz, ficou determinado que não se usasse 
nenhum software portátil, exceto se estiver bem claro que há suporte oficial ao 
produto. E ficou subentendido que esse direcionamento foi uma recomendação do 
tal auditor.

Agora, graças ao bom Deus, temos o livre-arbítrio e sempre há a possibilidade 
de escolha. 

Atenciosamente,
Ricardo Cardoso.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--- Em qui, 18/6/09, Paulo Coutinho pa...@prsolucoes.com escreveu:

















  
  Putz mandou bem embarca, exatamente, como eu disse também, comorpu é

SEU o que você vai fazer não importa, as pessoas cismam de querer

fazer uma tempestade em copo d´agua, fala sério.



Cuide do seu Delphi e deixei o cara que usa uma versão portátil com a

dele, pelo amor de Deus, sempre que existe uma discução sobre isso é a

mesma coisa, comprou é seu po, coloca ele onde quiser, a empresa lá

vai querer saber onde  e como você usa, o importante é que você tenha

a licença.



Os que mais criticam devem ser os que mais tem software pirata e

querem ainda contar vantagem em cima dos outros.



Sai pra lá olho gordo!!!



A paz do Senhor para todos!



-- 

Atenciosamente,

Paulo Coutinho.

Blog: www.prsolucoes. com/blog

Site: www.prsolucoes. com

Msn:  pa...@prsolucoes. com



2009/6/14 EmbarcaDelphi embarcadelphi@ yahoo.com. br:





 Até a Bíblia diz para as pessoas tirarem a trave do próprio olho em vez

 de querer tirar o cisco dos olhos dos outros. Claro que de algum modo

 alguém usa ou já usou produtos piratas, mas a questão não é essa e sim

 de que a nossa lista (Delphi-BR) não permite o assunto sobre isso e

 regras são regras, outra coisa é que se a pessoa que usa esse tal de

 Delphi portátil tem uma licença oficial do Delphi 7. Creio que se a

 pessoa tem uma licença, a Embarcadero/ Borland/CodeGear além de não saber

 pois ninguém é obrigado mostrar o próprio PenDrive Pessoal (não há lei

 no mundo que faça alguém dar seu pendrive, diferente do computador que é

 juridicamente possível e passível de investigação), o licenciado está

 quite com sua obrigação pois tem ele instalado no computador. E outra,

 pô, que mal você está fazendo a Embarcadero/ CodeGear em utilizar tanto

 instalado no seu micro como usando no PenDrive, afinal, não comprou uma

 licença?

 Acho que as pessoas interessadas (CodeGear) é quem deveria se preocupar

 com isso, mas... existe tantos programadores infelizes e mal sucedido

 que vive o tempo todo preocupado com os outros programadores e esquece

 da própria vida.



 Agora, aos piratas, problema deles, e cuide para um dia não ser descoberto!



 Sucesso a todos e vamos cumprir com as regras daqui da Lista Delphi-BR



 felipe_a_milagres escreveu:







 Que confusão por causa de um simples delphi portable ...



 vc's estao crucificando o cara por ele simplesmente ter falado que

 adquiriu um delphi portable pela internet ...



 antes de vc's continuarem acusando-o de pirataria, quem aki NUNCA

 praticou 'o ato da pirataria' ..



 quem nunca baixou alguma musica, ou um filme/video, ou até mesmo

 programas .. melhor .. quem aki tem o Windows original 



 um dos motivos para a existência dos programas portables, seria

 justamente a praticidade de usar um programa qualquer, en qualquer

 maquina. (e sem a necessidade de instalar e modificar o windows)



 tenham a mente um pouco mais aberta e enxerguem os benefícios de um

 delphi portable. 

RES: [delphi-br] Identificar arquivos necessários pa ra a aplicação rodar

2009-06-18 Por tôpico Dirceu Vasson Jr
Bicho, essa foi ninja mesmo (rsrs)!!!

 

Na lista não tem arquivo diferente de DLL ou exe, mas to desconfiado de uma
tal de ux_theme.dll (lixeira que eu faço de vez em quando é baixar uns temas
‘legais’), que acredito não ter na outra máquina.

 

Também valeu a dica da virtual machine, pois posso validar inclusive por ali
agora.

 

Valeu a todos

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: terça-feira, 16 de junho de 2009 23:24
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Identificar arquivos necessários para a aplicação
rodar
Prioridade: Alta

 






Faça um build geral da sua aplicação. Execute-a. Chame todas as
funcionalidades da sua aplicação. Depois, retorna ao IDE e digite
Ctrl+Alt+M. Vai aparecer um diálogo que mostra todos os módulos que a
aplicação necessita. É só verificar o que não é DLL/EXE do Windows e colocar
no checklist de instalação.

Sds.

De: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
[mailto:delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br
os.com.br] Em
nome de Dirceu Vasson Jr
Enviada em: terça-feira, 16 de junho de 2009 21:57
Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.br os.com.br
Assunto: [delphi-br] Identificar arquivos necessários para a aplicação rodar

Olá a todos

Tenho uma aplicação que na minha máquina roda 100%. Coloquei em outro
computador e de cara dá o erro informando que o windows não pôde abrir o
programa.

Há como identificar quais arquivos (DLL por ex.) eu tenho que copiar junto
ao programa (procurei na net e a única pergunta desta natureza estava sem
resposta)?

[]s

Dirceu Jr.

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





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