Res: [delphi-br] Re: Programador - valor cobrado por hora

2010-05-19 Por tôpico reginaldo silva
Já fiz muitos serviços free-lancer. O valor da minha hora hoje é de 90,00 como 
o amigo comentou, meu tempo livre é nas madrugadas e finais de semanas, então 
tem que valer a pena.

Se o cliente não quiser pagar o valor que procure outronão acho certo 
que o cliente coloque o preço no meu serviço . quando vou a padaria comprar 
pão a balconista não aceitaria eu dizer que o pão está caro e só vou pagar 
metade do valor... isso seria desvalorizar o serviço do padeiro e desconsiderar 
o material empregado como farinha, óleo, fermento, etc
Tem outro problema ao cobrar barato, pois muitos clientes acham que cobrando 
barato terão um serviço barato.( de baixa qualidade)

 Atenciosamente,


Reginaldo
Pci Power







De: Thiago thiagomontez...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 18 de Maio de 2010 22:33:45
Assunto: [delphi-br] Re: Programador - valor cobrado por hora

  
Bom meu caro,

Quando faço serviço freelancer cobro R$ 75,00 a hora, conheço alguns que cobram 
R$90,00. Mas convenhamos nosso serviço tem que ser valorizado, e também o 
cliente irá pagar uma única vez e pronto acabou. Além de que no meu caso o 
tempo disponível é finais de semana e madrugadas então tem que compensar Valor 
X hora. E para mim este valor compensa.

Atenciosamente,
Thiago Montezano
Analista de Sistemas
Época - Comércio e Distribuição

--- Em delphi-br@yahoogrupos.com.br, Alemão forumdel...@... escreveu

 Pessoal, estou pegando alguns trabalhos freela de programação em Delphi.
 Coisa bem simples, criação de alguns cadastros em um sistema ja existente.
 
 Gostaria de saber qual a média de valor por hora que vocês cobram, quem
 trabalha por hora. Alguma idéia?
 
 []s
 Alemão
 
 
 [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] [MAF] Memória e processador

2010-04-14 Por tôpico Reginaldo
Execute a sua aplicação, aperte CTRL + ALT + DEL e veja a lista de processos


Reginaldo
---Mensagem original---
 
De: Marcos Abreu Ferreira
Data: 14/04/2010 10:47:33
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] [MAF] Memória e processador
 
  
Pessoal,

alguém sabe se tenho como verificar quanto minha aplicação está ocupando de
memória e qual a porcentagem de utilização do processador por ela? E quanto
tenho disponível de memória RAM ainda?

Att,

Marcos Ferreira



 

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



Res: Re: [delphi-br] Desenvolver software 64 bits com Delphi

2009-12-01 Por tôpico Reginaldo
Concordo com nosso amigo João Carlos, pois se desenvolvemos um sistema para
um cliente, ele não irá aceitar que este tenha bugs, ou seja, temos que
corrigi-los as vezes fazendo malabarismos pois sabemos ( como
desenvolvedores) que se quisermos ter nosso Delphi corrigido, temos pagar
uma atualização.
Desconheço uma versão do Delphi que não tenha Bugs. Trabalho com Delphi
desde a versão 3 e gosto muito de Delphi, mas me sinto no direito de
reclamar dos bugs também.

Reginaldo
 
---Mensagem original---
 
De: João Carlos
Data: 01/12/2009 10:02:57
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Desenvolver software 64 bits com Delphi
 
  
No momento que se paga 10 contos por uma licença eu TENHO TODO O DIREITO 
de reclamar.

Em nenhum momento critiquei o roadmap, fiz apenas uma pergunta que, como 
sempre, não foi respondida.

Não acho correto se ter uma licença de um produto bugado, e para ter as 
correções, ter que pagar uma atualização, pois como todos sabem, o D2007 
ficou com bugs que só foram corrigidos no D2009. O mesmo aconteceu com o 
D2009.
Sairam Updates? Sim sairam. Mas depois que uma versão nova é lançada, 
esquecem da versão anterior e tem que se pagar para ter uma nova versão 
com os bugs corrigidos. pois até hoje, não foi lançado nenhum update 
para uma versão anterior a versão atual.

Se você acha isso correto, paciência, fazer o queAgora se você não 
gosta de ler o que eu escrevo é simples, delete os meus e-mails sem 
ler...SHITF+DEL exclui direto

Agora, tenha cuidado com as insinuações que você faz a respeito de eu 
ter ou não uma licença...Não se esqueça que nessa lista é proibido 
pirataria e baseado nisso, TODOS aqui tem uma licença do Delphi, não 
importando a versão.

Desculpas a todos da lista, mas é a minha opinião.

João Carlos

Asafe Locker escreveu:
 Por que vc nao abandona o Delphi? Eu acho uma excelente ideia para voce
por em prática..e aproveita e abandona a lsta, pois fará um enorme favor,
não sei separa todos, mas para o Delphi e para mim realmente será um grande
favor não ter que ler as besteiras que voce escreve.

 Eu só vejo voce falar mau, reclamar. Se é tão ruim assim, vai programar em
outra coisa, participar de outra lista.

 Delphi é minha ferramenta, assim como Java. Tem coisas a melhorar, sim
claro que tem. Mas com certeza não é a metade do que voce fala. Tu ta sempre
fazendo um comentário depreciativo atacando o Delphi, a Embarcadero e alguns
colegas aqui na lista.

 Vc reclama ate de como o Roadmap e apresentado, nem fala do conteudo, se
ta incomodado faz melhor ou posta comentario la no site do Roadmap. 
 E olha que o Roadmap esta bem explicado e com otimas noticias, mas pra vc
é tudo ruim. E na boa, tu reclama de bugs, e não tem bugs do jeito que fala
não e olha que uso Delphi somente desde a versão 5 e com aplicações de
missao critica. Vc é muito exagerado e apresenta acusações vazias. O Delphi
2010 é simplesmente fantastico, muito estável e com diferenciais
tecnológicos que me deixam a frente dos meus concorrentes e proporcionam ao
meu cliente muitos recursos novos de ponta. E estou muito animado com o
suporte ao Windows7, Gesturing, DataSnap, REST, JASON, com a Modelagem
Nativa UML e OO, sem falar na nova RTI e agora com os compiladores para
Linux e Mac. Isso me abre um mundo de oportunidades.

 Mas eu tenho uma solução, manda seu curriculo para Embarcadero e fala pra
eles que vc é o cara que vai fazer o Delphi dar certo, pois do jeito que
reclama, deve ser um profundo conhecedor das viceras do Delphi e ter todas
as soluções para salva-lo(falo como se ele precisasse ser salvo o que é uma
mentira). Além é claro de ser um usuário apaixonado e com licenças próprias
do produto que a cada versão voce compra ou atualiza(o que eu duvido, mas
posso estar errado).

 Na boa galera, sou a favor de fazer criticas, mas também sou a favor de
promover o produto que uso e sua comunidade. Sempre fui bem atendido pelo
Delphi, sempre temos apoio de grandes nomes nas listas e do pessoal da
Embarcadero. Eu to cansado de ver gente metendo o pau a troco de nada, e
tudo é a forma de falar. Se quer ajudar o produto que te faz ganhar dinheiro
 compra a licença e ajuda na melhora do mesmo, mas sempre perguntando: Qual
software não tem bug? Qual pessoa não erra? Qual empresa não erra? Qual o
melhor canal pra se falar? Qual a melhor forma pra se falar?

 Nada pessoal contra ninguem, mas não to afim de ver mais colegas metendo
pau no Delphi a troco de nada ou da forma errada e acabando por prejudicar o
meu mercado de trabalho, pois comentarios como esses nos prejudicam
diretamente enquanto usuários Delphi, pois chega um leigo aqui e le um monte
de besteiras, se ninguem fala nada o cara pode acabar acreditando em um
monte de baboseiras.

 Na boa, se não gosta do Delphi, larga mao dele, vai pra outra, mas não
fica enchendo a lista com comentarios cheio de ironia e pouco ou nenhum
fundamento, que não ajuda a resolver nenhum problema, não ajuda os outros
que usam

[delphi-br] Check out my photos on Facebook

2009-09-16 Por tôpico Reginaldo Donizete Felix
Hi delphi-br@yahoogrupos.com.br,

I set up a Facebook profile where I can post my pictures, videos and events and 
I want to add you as a friend so you can see it. First, you need to join 
Facebook! Once you join, you can also create your own profile.

Thanks,
Reginaldo

To sign up for Facebook, follow the link below:
http://www.facebook.com/p.php?i=10271425449k=Z6E3Y5U3TZ3B2FMJPBW3QRW2VWr


delphi-br@yahoogrupos.com.br was invited to join Facebook by Reginaldo Donizete 
Felix. If you do not wish to receive this type of email from Facebook in the 
future, please click on the link below to unsubscribe.
http://www.facebook.com/o.php?k=83ed89u=1080066852mid=11b9d9cG40608324G0G8
Facebook's offices are located at 1601 S. California Ave., Palo Alto, CA 94304.



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



Re: [delphi-br] Instalação de programas

2009-08-25 Por tôpico Reginaldo Donizete Felix
Utilizo o Install Maker da Wise Solutions
é otimo para gerar instalador permite voce adicionar os arquivos
necessários,
fontes e trabalhar com variaves de registro.


2009/8/25 Marcio Carneiro marcio-carne...@ig.com.br



 Olá, amigos
 Alguém teria algum material explicando como instalar programas em redes.Já
 vi vários textos, sugerindo o Innosetup, e gostaria de utilizá-lo, mas tenho
 algumas dúvidas:

 1) Como instalar o firebird conjuntamente?

 2) Quais os arquivos necessários para a instalação?

 3) Nos computadores --clientes o que devo instalar?

 Como vocês fazem?

 Um grande abraço
 Marcio


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

 




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] gravar cd/ usando api do windows

2009-07-30 Por tôpico Reginaldo
O componente TXPBurn_v2 é free  e é excelente para gravação de CD. Porém como 
vc está usando o Turbo não tem como utilizar este componente.


Reginaldo

  - Original Message - 
  From: KS Sistemas LTDA 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, July 29, 2009 1:35 PM
  Subject: [delphi-br] gravar cd/ usando api do windows


Ola caros amigos do grupo, estou precisando desenvolver uma solução de
  backup que grave cd/dvd, porem estou usando o Turbo Delphi free que não
  aceita componentes e nem posso usar a api do nero pois nem todos nossos
  clientes possuem o nero. Eu pesquisei e vi algumas APIs do windows que
  manipulam cd, porem acho que são para cd de audio e tambem não consegui
  implementar na minha aplicação... se alguem souber como fazer compartilha
  conosco...

  Obrigado pela Atenção

  Diego Garcia
  KS Sistemas LTDA

  [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] Descompactar arquivos zip

2009-07-28 Por tôpico Reginaldo Donizete Felix
Eu uso a biblioteca Zlib e funcina perfeitamente,
segue um exemplo do codigo que uso.



///exemplo de uso

procedure TForm2.Salva1Click(Sender: TObject);
var
  sTexto : TStringList;
  sArquivo : String;
  sArquivo2 :String;
begin
  sArquivo := 'C:\ENVIA.TEMPISS';
  sArquivo2 := ChangeFileExt(sArquivo, '.zp');
  sTexto := TStringList.Create;
  sTexto.LoadFromFile(sArquivo);
  ShowMessage('Tamanho antes de comprimir=' +
intToStr(Length(sTexto.Text)));

  Comprime(sTexto, sArquivo2 );
  sTexto := Descomprime(sArquivo2);
  ShowMessage(sTexto.Text);
  ShowMessage('Tamanho antes de comprimir de descomprimir=' +
intToStr(Length(sTexto.Text)));
  sTexto.SaveToFile('c:\descomprimido.txt');

end;


//FUNÇÃO PARA COMPACTAR

procedure TForm2.Comprime(sTexto: TStringList; sArquivo: String);
var
NewFile: TMemoryStream;

OutFile : TMemoryStream;
ZStream : TCompressionStream ;
begin
  NewFile := TMemoryStream.Create;
  try
sTexto.SaveToStream(NewFile);
OutFile := TMemoryStream.Create;
try
  ZStream := TCompressionStream.Create(clMax, OutFile);
  try
ZStream.CopyFrom(NewFile, 0);
  finally
ZStream.Free;
  end;
finally
  OutFile.Seek(0,0);
  OutFile.SaveToFile(sArquivo);
  OutFile.Free;
end;
  finally
NewFile.Free;
  end;

end;

//FUNÇÃO PARA DESCOMPACTAR

function TForm2.Descomprime(sArquivo: String):TStringList;

var
  Count: Integer;
  NewFile: TMemoryStream;
  InFile : TMemoryStream;
  ZStream : TDecompressionStream;
  Buffer :  array[0..BufferSize]of Byte;
  sTexto :TStringList;
begin
NewFile := TMemoryStream.Create;
InFile := TMemoryStream.Create;
  try

InFile.LoadFromFile(sArquivo);
InFile.Seek(0,0);
try

  ZStream := TDecompressionStream.Create(InFile);
  try
repeat

Count := ZStream.Read(Buffer, BufferSize);
if Count  0 then NewFile.WriteBuffer(Buffer, Count) else
Break;
until count = 0;
NewFile.SaveToFile('c:\escrito.txt');
NewFile.Seek(0,0);
sTexto := TStringList.Create;
sTexto.LoadFromStream(NewFile);
ShowMessage(sTexto.Text);
Result := sTexto;
  finally
ZStream.Free;
  end;
finally
  NewFile.Free;
end;
  finally
InFile.Free;
  end;
end;

2009/7/28 Raphae Fonseca raphaelprograma...@yahoo.com.br



 Bom dia Amigo,

 Vc utiliza o zipMaster?

 Teria como me enviar o componente e um exemplo de uso?
 Att
 Raphael

 
 De: EmbarcaDelphi embarcadel...@yahoo.com.brembarcadelphi%40yahoo.com.br
 
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviadas: Segunda-feira, 27 de Julho de 2009 18:16:10
 Assunto: Re: [delphi-br] Descompactar arquivos zip

 Se não gostar desse que ele te passou, ou se ainda continua com erros,
 tente utilizar a biblioteca mais usada no mundo Delphi (rsrs), procura
 no Google por: ZipMaster

 Blz.

 André Moraes - Gmail escreveu:
 
 
  Veja http://sourceforge. net/projects/ tpabbrevia/
  http://sourceforge. net/projects/ tpabbrevia/
 
  André F. Moraes
  - Original Message -
  From: Raphae Fonseca
  To: delphi...@yahoogrup os.com.br mailto:delphi- br%40yahoogrupos .
 com.br
  Sent: Monday, July 27, 2009 4:55 PM
  Subject: [delphi-br] Descompactar arquivos zip
 
  Boa tarde amigos da lista
 
  Estou desenvolvendo um aplicativo que salva um aquivo .zip que está
  gravado na base de dados.
  E preciso descompactá-lo. A rotina que já existe no momento, está
  mantendo o arquivo alocado na memória e como são muitos arquivos eu
  gostaria de tempos em tempos excluir os mesmos.
 
  Já tentei várias opções sem ter um resultado satizfatótio.
 
  Algum amigo conhece um componente free que eu possa utilizar e tem uma
  rotina de descompactação de arquivos zip que possa me passar?
 
  Não pode ser usando softwares como winzip, winrar, filzip, tem que ser
  feito por dentro da aplicação.
 
  Tentei usar a bibliocar zlib mas não funciona aqui.
 
  Att
  Raphael
 
  .
 
 

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

  




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] WebService Java + Servidor JBoss + Client Delphi 7

2009-07-21 Por tôpico Reginaldo Donizete Felix
Fiz o Update do Delphi SOAP, mais mesmo assim continua com o problema de
passar null.


2009/7/20 Rubem Rocha rubem.ro...@dtmanaus.com.br



 Você aplicou “Delphi SOAP Runtime and Importer Update”? Se não, faça isso!
 Procure na Internet (Google, AltaVista, etc.) link para download e
 aplique-o! Depois de aplicá-lo, gere novamente a unit usando o utilitário
 WSDLImp atualizado (e não o assistente de geração embutido no IDE do
 Delphi). Provavelmente, isso pode ajudá-lo.

 Sds.

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
 nome de Reginaldo Donizete Felix
 Enviada em: segunda-feira, 20 de julho de 2009 09:18
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: [delphi-br] WebService Java + Servidor JBoss + Client Delphi 7


 WebService Java + Servidor JBoss + Client Delphi 7

 Estou fazendo testes em WebService no JBoss e estou com um problema ao
 acessar o webservice pelo Delphi.
 Criei dois metodos no WebService, o primeiro não recebe parametro nenhum so
 devolve um valor string. O Segundo recebe um parametro String e devolve uma
 string concatenada.
 No segundo estou tendo problema na passagem de parâmetro do delphi para o
 webservice. O seviço esta recebendo null no parametro.
 Alguem sabe o que pode estar ocorrendo ?

 Segue o codigo do webservice e o codigo de acesso do delphi:
 No codigo abaixo a funçao gravar com parametro esta recebendo sempre null
 no
 parametro de envio.

 ---
 //codigo webservice

 package com.sistemabancario.servico;

 import javax.ejb.*;
 import javax.jws.*;

 @Stateless
 @WebService
 public class GerenteWS implements GerenteWSRemote {

 public String gravarSemParametro() {
 //
 System.out.println(WebService executado no servidor.);
 //
 return ParametroDeRetorno;
 }

 @Override
 public String gravarComParametro(String envio) {
 // TODO Auto-generated method stub
 return envio +  adicionei mais texto no retorno;
 }
 }

 --

 Codigo Delphi da Classe de Acesso ao WebService

 // 
 //
 // The types declared in this file were generated from data read from the
 // WSDL File described below:
 // WSDL : http://localhost:8080/SistemaBancarioEJB/GerenteWS?wsdl
 // (20/07/2009 09:59:40 - 1.33.2.5)
 // 
 //

 unit GerenteWS1;

 interface

 uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns;

 type

 //
  //
 // The following types, referred to in the WSDL document are not being
 represented
 // in this file. They are either alias...@] of other types represented or
 were referred
 // to but never[!] declared in the document. The types from the latter
 category
 // typically map to predefined/known XML or Borland types; however, they
 could also
 // indicate incorrect WSDL documents that failed to declare or import a
 schema type.
 //
  //
 // !:string - http://www.w3.org/2001/XMLSchema;

 //
  //
 // Namespace : http://servico.sistemabancario.com/
 // transport : http://schemas.xmlsoap.org/soap/http
 // style : document
 // binding : GerenteWSBinding
 // service : GerenteWSService
 // port : GerenteWSPort
 // URL : http://127.0.0.1:8080/SistemaBancarioEJB/GerenteWS
 //
  //
 GerenteWS = interface(IInvokable)
 ['{4FBA3E30-3C2B-2579-2B43-B1676B2FB70F}']
 function gravarComParametro(const arg0: WideString): WideString;
 stdcall;
 function gravarSemParametro: WideString; stdcall;
 end;
 type
 TWSGerenteWS = class(TObject)
 public
 function gravarSemParametro: WideString;
 function gravarComParametro(const arg0: WideString): WideString;
 stdcall;
 private

 end;
 function GetGerenteWS(UseWSDL: Boolean=System.False; Addr: string='';
 HTTPRIO: THTTPRIO = nil): GerenteWS;

 implementation

 function TWSGerenteWS.gravarSemParametro: WideString;
 var RIO: THTTPRIO;
 ws: GerenteWS;
 oldSeparator: Char;
 retorno: WideString;
 begin

 try
 RIO := THTTPRIO.Create(nil);
 RIO.HTTPWebNode.ConnectTimeout := 100;
 RIO.HTTPWebNode.SendTimeout := 100;
 RIO.HTTPWebNode.ReceiveTimeout := 100;
 ws := GetGerenteWS(false, '', RIO);
 retorno := ws.gravarSemParametro;
 result := retorno;
 Finally

 end;
 end;
 function TWSGerenteWS.gravarComParametro(const arg0: WideString):
 WideString;
 var RIO: THTTPRIO;
 ws: GerenteWS;
 oldSeparator: Char;
 retorno: WideString;
 begin

 try
 RIO := THTTPRIO.Create(nil);
 RIO.HTTPWebNode.ConnectTimeout := 100;
 RIO.HTTPWebNode.SendTimeout := 100;
 RIO.HTTPWebNode.ReceiveTimeout := 100;
 ws := GetGerenteWS(false, '', RIO

[delphi-br] WebService Java + Servidor JBoss + Client Delphi 7

2009-07-20 Por tôpico Reginaldo Donizete Felix
WebService Java + Servidor JBoss + Client Delphi 7

Estou fazendo testes em WebService no JBoss e estou com um problema ao
acessar o webservice pelo Delphi.
Criei dois metodos no WebService, o primeiro não recebe parametro nenhum so
devolve um valor string. O Segundo recebe um parametro String e devolve uma
string concatenada.
No segundo estou tendo problema na passagem de parâmetro do delphi para o
webservice. O seviço esta recebendo null no parametro.
Alguem sabe o que pode estar ocorrendo ?

Segue o codigo do webservice e o codigo de acesso do delphi:
No codigo abaixo a funçao gravar com parametro esta recebendo sempre null no
parametro de envio.

---
//codigo webservice

package com.sistemabancario.servico;

import javax.ejb.*;
import javax.jws.*;

@Stateless
@WebService
public class GerenteWS implements GerenteWSRemote {

public String gravarSemParametro() {
//
System.out.println(WebService executado no servidor.);
//
return ParametroDeRetorno;
}

@Override
public String gravarComParametro(String envio) {
// TODO Auto-generated method stub
return envio +  adicionei mais texto no retorno;
}
}


-

Codigo Delphi da Classe de Acesso ao WebService

// 
//
// The types declared in this file were generated from data read from the
// WSDL File described below:
// WSDL : http://localhost:8080/SistemaBancarioEJB/GerenteWS?wsdl
// (20/07/2009 09:59:40 - 1.33.2.5)
// 
//

unit GerenteWS1;

interface

uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns;

type

  //
 //
  // The following types, referred to in the WSDL document are not being
represented
  // in this file. They are either alias...@] of other types represented or
were referred
  // to but never[!] declared in the document. The types from the latter
category
  // typically map to predefined/known XML or Borland types; however, they
could also
  // indicate incorrect WSDL documents that failed to declare or import a
schema type.
  //
 //
  // !:string  - http://www.w3.org/2001/XMLSchema;



  //
 //
  // Namespace : http://servico.sistemabancario.com/
  // transport : http://schemas.xmlsoap.org/soap/http
  // style : document
  // binding   : GerenteWSBinding
  // service   : GerenteWSService
  // port  : GerenteWSPort
  // URL   : http://127.0.0.1:8080/SistemaBancarioEJB/GerenteWS
  //
 //
  GerenteWS = interface(IInvokable)
  ['{4FBA3E30-3C2B-2579-2B43-B1676B2FB70F}']
function  gravarComParametro(const arg0: WideString): WideString;
stdcall;
function  gravarSemParametro: WideString; stdcall;
  end;
  type
TWSGerenteWS = class(TObject)
public
  function gravarSemParametro: WideString;
  function  gravarComParametro(const arg0: WideString): WideString;
stdcall;
private

  end;
function GetGerenteWS(UseWSDL: Boolean=System.False; Addr: string='';
HTTPRIO: THTTPRIO = nil): GerenteWS;


implementation

function TWSGerenteWS.gravarSemParametro: WideString;
var RIO: THTTPRIO;
ws: GerenteWS;
oldSeparator: Char;
retorno: WideString;
begin

  try
RIO := THTTPRIO.Create(nil);
RIO.HTTPWebNode.ConnectTimeout := 100;
RIO.HTTPWebNode.SendTimeout:= 100;
RIO.HTTPWebNode.ReceiveTimeout := 100;
ws := GetGerenteWS(false, '', RIO);
retorno := ws.gravarSemParametro;
result := retorno;
  Finally

  end;
end;
function TWSGerenteWS.gravarComParametro(const arg0: WideString):
WideString;
var RIO: THTTPRIO;
ws: GerenteWS;
oldSeparator: Char;
retorno: WideString;
begin

  try
RIO := THTTPRIO.Create(nil);
RIO.HTTPWebNode.ConnectTimeout := 100;
RIO.HTTPWebNode.SendTimeout:= 100;
RIO.HTTPWebNode.ReceiveTimeout := 100;
ws := GetGerenteWS(false, '', RIO);
retorno := ws.gravarComParametro(arg0);
result := retorno;
  Finally

  end;
end;

function GetGerenteWS(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO):
GerenteWS;
const
  defWSDL = 'http://localhost:8080/SistemaBancarioEJB/GerenteWS?wsdl';
  defURL  = 'http://127.0.0.1:8080/SistemaBancarioEJB/GerenteWS';
  defSvc  = 'GerenteWSService';
  defPrt  = 'GerenteWSPort';
var
  RIO: THTTPRIO;
begin
  Result := nil;
  if (Addr = '') then
  begin
if UseWSDL then
  Addr := defWSDL
else
  Addr := defURL;
  end;
  if HTTPRIO = nil then
RIO := THTTPRIO.Create(nil)
  else
RIO := HTTPRIO;
  try
Result := (RIO as GerenteWS);
if UseWSDL then
begin
  

Re: [delphi-br] Dica de formatação

2009-07-20 Por tôpico Reginaldo
FormatFloat('#,###,##0.00', Valor);



  - Original Message - 
  From: Jose Newton Araujo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, July 20, 2009 9:50 AM
  Subject: [delphi-br] Dica de formatação


Senhores, bom dia

  Preciso de uma dica de como formatar valores monetários num string Grid.

  Mais ou menos isto:

  StringGrid1.Cells[2, 4] := Texto formatado(8.000.000,00) (alinhado pela
  direita)

  Ou isto:

  StringGrid1.Cells[2, 4] := 23,80%

  Obrigado

  Jose Newton

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



  

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



[delphi-br] Eu sou de Aries . E você???

2009-07-07 Por tôpico Reginaldo Donizete Felix
 pessoas 1 hora de sorte*
08-12 pessoas 1 dia de sorte
13-17 pessoas 1 semana de sorte
18-22 pessoas 1 mês de sorte
23-27 pessoas 3 meses de sorte*
28-32 pessoas 7 meses de sorte*
33-37 pessoas 1 ano de sorte
38 e mais uma vida muito afortunada
 --
 --


--
--

--
Descubra quais produtos Windows Live tem mais a ver com você! Faça o teste!
--
Novo Internet Explorer 8: mais rápido e muito mais seguro. Baixe agora, é
grátis!


--
Veja quais são os assuntos do momento no Yahoo! + Buscados: Top 10 -
Celebridades - Música - Esportes


--
Veja quais são os assuntos do momento no Yahoo! + Buscados: Top 10 -
Celebridades - Música - Esportes


--
Veja quais são os assuntos do momento no Yahoo! + Buscados: Top 10 -
Celebridades - Música - Esportes
--
Novo Internet Explorer 8: mais rápido e muito mais seguro. Baixe agora, é
grátis!
--
Conheça os novos produtos Windows Live. Clique
aqui!http://www.windowslive.com.br



-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] OFF TOPIC: Mega Projeto

2009-06-15 Por tôpico Reginaldo
Meu pc de casa fica ligado 24 hs, posso contribuir, mas poderia dar mais 
detalhes do que contem essa base  de dados ?

Reginaldo

  - Original Message - 
  From: Reinaldo Aparecido Pereira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 15, 2009 8:56 AM
  Subject: [delphi-br] OFF TOPIC: Mega Projeto





  Olá amigos,

  Preciso de 300 voluntários para a execução de um projeto bem simples.
  Trata-se de um robô que irá baixar uma base de dados de 5 milhões de linhas.

  Para baixar usando apenas meu computador, segundo alguns cálculos levarei 1
  ano. 

  Dessa forma, estou convidando-os para uma grande desafio. Preciso de 300 pcs
  rodando um aplicativo para baixar a base. Acredito que um dia à um dia e
  meio de processamento está resolvido.

  A base tem um valor enorme e depois de integrada, envio a cópia dela para
  cada um que participou do processo.

  Quaisquer dúvidas estou à total disposição.

  Grato,

  Reinaldo

  [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] XML ou Access ou qual?

2009-04-28 Por tôpico Reginaldo
Firebird Embedded


  - Original Message - 
  From: Jhosef Marks 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, April 28, 2009 2:17 PM
  Subject: Re: [delphi-br] XML ou Access ou qual?


  
  
   Amigos,
  
   Eu produzo um catálogo digital e até o momento usava XML para distribuir a
   aplicação porque a quantidade de registros era pequena e não era preciso
   instalar nada na máquina do cliente.
  
   Como quantidade de registros agora vai crescer muito, to me vendo na
   necessidade de usar um banco de dados.
  
   Se usar Paradox (é apenas uma tabela então não precisa ser um banco
   parrudo)
   precisarei instalar o BDE. E aí tem toda aquela coisa de conflito com
   configurações de bde e tudo mais.
  
   Se eu usar o Access, aí tem o problema de licenciamento do Access na
   máquina
   do cliente. Além do mais, o que a minha aplicação terá que instalar na
   máquina do cliente para funcionar bem?
  
   Se eu usar o firebird, o que minha aplicação deverá instalar?
  
   Minha base tem uma tabela com 60 mil linhas onde só faço seleção. Não
   atualizo e nem excluo.
  
   Qual tecnologia devo usar?
  
   Abçs,
  
   Reinaldo
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 
  _
  Jhosef Marks de Carvalho
  Delphi Developer
  http://groups.google.com/group/soumaisdelphi

  #
  CAMPANHA POR UMA INTERNET SEGURA
  Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
  mensagens use SEMPRE o Cco (cópia oculta).
  Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
  um e-mail, delete todas as informações que apareçam no corpo do e-mail e que
  possam ser usadas por hackers.
  #
  Sent from Joinville, Santa Catarina, Brasil

  [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] AJuda no Delphi

2009-04-15 Por tôpico Reginaldo
Tudo é difícil antes de se tornar fácil

Me lembro que quando iniciei em Delphi a 9 anos ... reduzi um pequeno sistema 
de 10 mil linhas 2 mil 


tudo isso que fez ai ... eu faria assim :

  label1.Caption := FormatDateTime(' ,  dd  de   de ', date);


Reginaldo
Posso todas as coisas naquele me fortalece


  - Original Message - 



  .
  
   Ola tudo bem sou novo aq e tou criando um programa comercial atravez de um
   mlivro Delphi5 e o meu programa e Delphi6 e na hora de colocar data e hora
   da uma mensagen de erro (Expected';'but found.)isto é depois de escrever
   isto tudo ai em baixo
  
   unit Unit1;
   interface
   uses
   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs, ComCtrls, ExtCtrls;
  
   type
  
   TFRMPrin = class(TForm)
   SBDataHora: TStatusBar;
   Timer1: TTimer;
   procedure Timer1Timer'(Sender: TObject);
   private
   { Private declarations }
   public
   { Public declarations }
   Function DataPorExtenso : String;
   end;
  
   var
   FRMPrin: TFRMPrin;
  
   Implementation
  
   {$R *.dfm}
  
   Function TFRMPrin.DataPorExtenso:String;
   const
   Meses :Array [1..12] of String =
   ('Janeiro','Fevereiro','Março','Abril','Maio',
   'Junho','Julho','Agosto','Setembro','Outubro',
   'Novembro','Desembro');
   Semana :Array [1..7] of String =
   ('Domingo','Segunda-Feira','Terça-Feira',
   'Quarta-Feira','Quinta-Feira','Sexta-Feira',
   'Sabado');
   Var
   Dia,Mes,Ano,DiaSem:Word;
   begin
   DecodeDate(Date,Ano,Mes,Dia);
   DiaSem := DayOfWeeK(Date);
   Result := Semana[DiaSem] + ','+ IntToStr(Dia) +
   ' de '+ Meses[Mes] + ' de ' + IntToStr(Ano);
   end;
  
   
  
   

  

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



[delphi-br] Decompilador Delphi

2009-04-15 Por tôpico Reginaldo Donizete Felix
Alguem tem algum decompilador delphi,
tenho um projetinho meu antigo que ja nao tenho mais os fontes,
vou ter que refazê-lo de novo.
sei que não tem um decompilador que volta 100% mais pelo menos alguma coisa
ja estava bom, o que estou precisando é de algumas rotinas que eu  tinha na
biblioteca que iriam me ajudar muito.
Alguem tem alguma indicação ?

Obrigado

-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Criptografia

2009-04-09 Por tôpico Reginaldo Donizete Felix
Pessoal,
Valeu pela dicas que enviaram,
Por enquando estou conseguindo fazer uns testes
usando o Blowfish, tenho uma dificuldade a mais tambem pois tenho que
encryptar em Delphi e depois decryptar em Php.
Vou gerar um codigo hash tambem para ser usado na validação,
para cryptografar o hash vou usar MD5.

Encontrei uns exemplos bons em delphi em
http://www.cityinthesky.co.uk/cryptography.html

Valeu pela ajuda de todos.

2009/4/9 Joao Morais jcmorai...@gmail.com



 2009/4/8 Reginaldo Donizete Felix regife...@gmail.comregifelix%40gmail.com
 :

  Qual é o melhor algoritimo de criptografia ?
  IDEA, CAST128, GOST, BLOWFISH, TWOFISH
  Vou suar para enviar arquivos textos na web
  e preciso saber qual o melhor para usar na minha aplicação.

 Todos são excelentes. Por curiosidade, Rijndael (atualmente AES) e
 TwoFish são dois dos finalistas para substituição do DES - algoritmo
 de criptografia usado pelo governo americano.

 Joao Morais
  




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Re: Compressão dados no TIdHTTP

2009-04-08 Por tôpico Reginaldo Donizete Felix
Ja encontrei a solução,
Vou compactar usando o ZLib, e depois adicionar o arquivo como anexo no
TIdHTTP e depois descompactar o arquivo recebido via post no PHP.
Abaixo as funções:


Função para comprimir :
procedure TForm2.Comprime(sTexto: TStringList; sArquivo: String);
var
NewFile: TMemoryStream;

OutFile : TMemoryStream;
ZStream : TCompressionStream ;
begin
  NewFile := TMemoryStream.Create;
  try
sTexto.SaveToStream(NewFile);
OutFile := TMemoryStream.Create;
try
  ZStream := TCompressionStream.Create(clMax, OutFile);
  try
ZStream.CopyFrom(NewFile, 0);
  finally
ZStream.Free;
  end;
finally
  OutFile.Seek(0,0);
  OutFile.SaveToFile(sArquivo);
  OutFile.Free;
end;
  finally
NewFile.Free;
  end;

end;


Pegar um arquivo texto normal e compactar usando a função comprime acima :

procedure TForm2.Salva1Click(Sender: TObject);
var
  sTexto : TStringList;
  sArquivo : String;
  sArquivo2 :String;
begin
  sArquivo := 'C:\ENVIA.TEMPISS';
  sArquivo2 := ChangeFileExt(sArquivo, '.zp');// vai salvar o mesmo arquivo
com extençao .zp
  sTexto := TStringList.Create;
  sTexto.LoadFromFile(sArquivo);
  ShowMessage('Tamanho antes de comprimir=' +
intToStr(Length(sTexto.Text)));

  Comprime(sTexto, sArquivo2 );

end;
---
AGORA SIM ENVIAR O ARQUIVO VIA TIdHTTP

procedure TForm2.Send2Click(Sender: TObject);
var
  data: TIdMultiPartFormDataStream;
  retorno : string;
  NomArq : String;
begin
  data := TIdMultiPartFormDataStream.Create;
  try
{ add the used parameters for the script }
data.AddFormField('perm', '1');
data.AddFormField('action', 'envia');
data.AddFile( 'arquivo', 'C:\ENVIA.zp', 'multipart/mixed' );
{ Call the Post method of TIdHTTP and read the result into TMemo }
retorno := IdHTTP_ISS.Post('http://localhost/SPDNet/script.php', data);
showmessage(retorno);
  finally
data.Free;
  end;
end;

-
EXEMPLO EM PHP DO script.php que recebe o formulario

?
//ARQUIVO PHP script.php QUE RECEBE O FORMULARIO VIA POST E VAI PEGAR O
ARQUIVO ENVIADO.
//OBS para funcinar as função do Zlib tem que estar abilitado no PHP.ini
$DfAnexo = $_FILES[arquivo][name];
if(empty($DfAnexo)) {
  ECHO Arquivo de compactação inválido.;
  }  else {

#Se o anexo for maior que 5 MB, exibe a mensagem de erro abaixo e
termina a execução do script
if($_FILES[arquivo][size]  512) {

ECHOArquivo  maior que 5MB!;
exit;
}

if(!empty($_FILES[arquivo][tmp_name]) and
is_file($_FILES[arquivo][tmp_name])) {
if(eregi(.zp$, $_FILES[arquivo][name]) ) {
#DESCOMPACTA ARQUIVO
if($file_handle = gzopen($_FILES[arquivo][tmp_name],
r)){
   $contents = gzread($file_handle,
filesize($_FILES[arquivo][tmp_name]));
   $content=gzuncompress($contents);
echo $content; //vai mostrar na tela o texto original do
arquivo


//gzclose($file_name);
  }
}
#Se o anexo não tiver uma extensão aceita, exibe a mensagem de
erro abaixo e termina a execução do script
else {

echo Arquivo de compactação inválido.!;
exit;
}
}
#Se o anexo tiver sido indicado através de um caminho inválido ou
tenha um nome inválido, exibe a mensagem de erro abaixo e termina a execução
do script
else {

echoArquivo de compactação da Declaração inválido.!;
exit;
}
}

?

BOM É ISSO

2009/4/7 Reginaldo Donizete Felix regife...@gmail.com

 Alguem ai ja trabalhou com compressão de dados no TIdHTTP da Indy, para
 enviar dados via post ?
 Vi que tem uma propriedade do TidHTTP chamada Compressor, onde poderia
 passar os dados comprimidos, mais não sei como trabalhar com isso.
 Tenho um sistema em Delphi que envia uma msg via Post com o TIHTTP e um
 pagina php recebe esse formulario e processa as informaçoes. Só que tenho
 que comprimir antes de enviar depois no php descomprimir de novo. Seria
 isso.

 Desde já agradeço pela atenção.



 --
 Reginaldo D. Felix
 regife...@hotmail.com




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Criptografia

2009-04-08 Por tôpico Reginaldo Donizete Felix
Qual é o melhor algoritimo de criptografia ?
IDEA, CAST128, GOST, BLOWFISH, TWOFISH
Vou suar para enviar arquivos textos na web
e preciso saber qual o melhor para usar na minha aplicação.

Obrigado


-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Compressão dados no TIdHTTP

2009-04-07 Por tôpico Reginaldo Donizete Felix
Alguem ai ja trabalhou com compressão de dados no TIdHTTP da Indy, para
enviar dados via post ?
Vi que tem uma propriedade do TidHTTP chamada Compressor, onde poderia
passar os dados comprimidos, mais não sei como trabalhar com isso.
Tenho um sistema em Delphi que envia uma msg via Post com o TIHTTP e um
pagina php recebe esse formulario e processa as informaçoes. Só que tenho
que comprimir antes de enviar depois no php descomprimir de novo. Seria
isso.

Desde já agradeço pela atenção.



-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Compactar String usando Zlib

2009-03-31 Por tôpico Reginaldo Donizete Felix
Pessoal,
tenho exemplos de compactação de arquivos usando a Zlib,
porem o que eu precisava era de compactar e descompactar uma string
sem precisar de trabalhar com arquivo.

Alguem tem algum codigo de exemplo ?

Obrigado

-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Compactar String usando Zlib

2009-03-31 Por tôpico Reginaldo Donizete Felix
Obrigado pela ajuda Rubem,
Mais estes ainda usam a ZLib para trabalhar com compactação de Arquivos.
Precisa de exemplos que utlizem com String e sem gravar arquivo em disco.
Se alguem tiver algum.

Obrigado.

2009/3/31 Rubem Nascimento da Rocha djpardalro...@hotmail.com


 Quem procura, acha!

 http://www.torry.net/vcl/compress/std/LZZLib1.0.zip

 http://www.torry.net/pages.php?id=300

 Sds.


 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 From: regife...@gmail.com regifelix%40gmail.com
 Date: Tue, 31 Mar 2009 09:43:01 -0300
 Subject: [delphi-br] Compactar String usando Zlib


 Pessoal,
 tenho exemplos de compactação de arquivos usando a Zlib,
 porem o que eu precisava era de compactar e descompactar uma string
 sem precisar de trabalhar com arquivo.

 Alguem tem algum codigo de exemplo ?

 Obrigado

 --
 Reginaldo D. Felix
 regife...@hotmail.com regifelix%40hotmail.com

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

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

  




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Compactar / Descompactar Mensagem Texto

2009-03-24 Por tôpico Reginaldo Donizete Felix
Pessoal,
Tenho um trabalho a ser feito, em que tenho uma mensagem XML que é enviada
para um web service ,
E estamos gerando um trafego muito grande no servidor com isso solicitaram
que fizemos uma compactação da mensagem andes de enviar para o webservice e
no webservice descompactar tudo isso.
Bom acho que isso vai acabar gerando um outro problema relacionado com
processamento no servidor, mais como a ordem da gerencia no presente é
liberar banda no servidor.

Gostaria de saber se alguem tem algum algoritimo de compacatação te texto,
ou ferramenta e que eu possa depois implementar no meu aplicativo em Delphi
e tambem fazer a descompactação no WebService Java.

Dede já Obrigado.

-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Controle de USB

2009-03-17 Por tôpico Reginaldo
A única coisa que sei que dá pra fazer é bloquear ou desbloquear as portas USB 
através de manipilação do registro do windows.

Reginaldo
www.ideiainformatica.com.br 
Buscai ao SENHOR enquanto se pode achar, invocai-o enquanto está perto. 
Isaías 55:6
  - Original Message - 
  From: Juliano Silva - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 17, 2009 11:38 AM
  Subject: [delphi-br]  Controle de USB 


  Pessoal, bom dia

  Gostaria de saber se alguém tem alguma experiência com controle de porta USB
  via Delphi, se poderiam me indicar o caminho que devo seguir, estou
  começando agora um projeto que tenho que fazer controle de porta USB.

  atenciosamente

  Juliano Marçal

  [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] Controle de USB

2009-03-17 Por tôpico Reginaldo
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\UsbStor

para bloquear mude o valor para 4 em Hexadecimal.
para desbloquear mude para 3.

Reginaldo
www.ideiainformatica.com.br 
Buscai ao SENHOR enquanto se pode achar, invocai-o enquanto está perto. 
Isaías 55:6
  - Original Message - 
  From: Juliano Silva - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 17, 2009 11:38 AM
  Subject: [delphi-br]  Controle de USB 


  Pessoal, bom dia

  Gostaria de saber se alguém tem alguma experiência com controle de porta USB
  via Delphi, se poderiam me indicar o caminho que devo seguir, estou
  começando agora um projeto que tenho que fazer controle de porta USB.

  atenciosamente

  Juliano Marçal

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


  

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



Re: Res: [delphi-br] Forms Stay on top

2009-03-12 Por tôpico Reginaldo
Bom dia,

o objetivo deste parâmetro fsStayOnTop é fazer isso mesmo. O form ficará na 
frente de tudo, assim como o gerenciador de tarefas do Windows.

Reginaldo
Idéia Informática Ltda
www.ideiainformatica.com.br 
MSN : duvi...@ideiainformatica.com.br
Buscai ao SENHOR enquanto se pode achar, invocai-o enquanto está perto. 
Isaías 55:6

  - Original Message - 
  From: Andresa Ferreira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, March 12, 2009 8:24 AM
  Subject: Res: Res: [delphi-br] Forms Stay on top


  Bom dia Emanuel.

  Vou tentar te explicar melhor.
  Tenho um frm principal que está com a propriedade FormStyle = fsMDIForm. 
Nessa tela eu tenho o componente TreeView. 
  As minhas telas de cadastro coloquei como fsStayOnTop, pois se eu deixasse 
como fsMDIChild, quando eu chamava essa tela, parte dela abria embaixo do menu. 
Com StayOnTop sempre abre por cima.
  Porém qdoeu executo um processo demorado, essas telas ficam travadas, e eu 
não consigo fazer outra coisa, mesmo dando Alt+Tab, sempre a tela fica na 
frente.

  Vou mandar no seu e-mail a tela principal e uma tela de cadastro.

  Andresa

  
  De: Emanuel Coutinho emanuelcouti...@yahoo.com.br
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quarta-feira, 11 de Março de 2009 11:44:29
  Assunto: Res: [delphi-br] Forms Stay on top

  Andresa

  Não entendi bem... Se vc está usando uma tela principal como MDI e as outras 
como Children, o que vc colocar no form principal deverá naturalmente 
restringir a área para a abertura das telas children..
  Assim, não entendo como vc está conseguindo colocar uma ChildForm sob os 
componentes visuais que estão colocados no form principal.
  Dá para vc me mandar umas telas do que vc está fa\endo para poder avaliar 
amelhor?

  Sds

  Emanuel Coutinho
  Salvador-Ba- Brasil

   _ _ __
  De: Andresa Ferreira andresa_delphi@ yahoo.com. br
  Para: delphi...@yahoogrup os.com.br
  Enviadas: Quarta-feira, 11 de Março de 2009 11:36:16
  Assunto: [delphi-br] Forms Stay on top

  Olá a todos

  No meu sistema, resolvi usar um menu TreeView, porém qdo eu abria uma tela 
que estava com a propriedade MDIChild, esta tela abrir embaixo do menu. Mudando 
a propriedade p/ Stay on Top, ficou direitinho, como eu queria

  Porém tem um problema, qdo eu tenho processos demorados, essa tela sempre 
fica na frente de qq coisa, mesmo se eu minimizar o sistema, e queira ver qq 
coisa, como o browser por exemplo, a tela não sai da frente.

  Alguém poderia me ajudar???

  Andresa

   _ _ __
  De: Luciano Calenzani Simões simoesluciano@ yahoo.com. br
  Para: delphi...@yahoogrup os.com.br
  Enviadas: Quarta-feira, 11 de Março de 2009 8:53:37
  Assunto: Res: [delphi-br] Erro IDE D2009

  Aí está 72122.

  Obrigado.

  Luciano Calenzani Simões

   _ _ __
  De: Andreano Lanusse andreano.lanusse@ embarcadero. com
  Para: delphi...@yahoogru p os.com..br delphi...@yahoogru p os.com.br
  Enviadas: Terça-feira, 10 de Março de 2009 17:00:51
  Assunto: RE: [delphi-br] Erro IDE D2009

  Luciano,

  Por favor adicione no QC e me informe o número.

  Obrigado,
  Andreano

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

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

  Mensagens neste tópico (8) Responder (através da web) | Adicionar um novo 
tópico 
  Mensagens | Arquivos | Fotos | Links | Banco de dados 
  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Alterar configurações via web (Requer Yahoo! ID) 
  Alterar configurações via e-mail: Alterar recebimento para lista diária de 
mensagens | Alterar formato para o tradicional 
  Visite seu Grupo | Termos de uso do Yahoo! Grupos | Sair do grupo 
  Atividade nos últimos dias
  * 15
  Novos usuários
  * 1
  Novos arquivosVisite seu Grupo 
  Yahoo! Mail
  Conecte-se ao mundo
  Proteção anti-spam
  Muito mais espaço
  Yahoo! Barra
  Instale grátis
  Buscar sites na web
  Checar seus e-mails .
  Yahoo! Grupos
  Crie seu próprio grupo
  A melhor forma de comunicação
  . 

  __,_.._,___

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

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

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

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



[delphi-br] Convite para conhecer o jogo online da travian

2009-02-24 Por tôpico Reginaldo Donizete Felix
Olá,

O jogador regifelix (regife...@gmail.com) convida-o a conhecer
e jogar o mais viciante e bem construído jogo de WebBrowser: Travian.
regifelix joga no servidor br4 como membro da tribo Romanos.
Para criar a sua conta de jogo, clique neste link:
http://www.travian.com.br/?uc=br4_54994signup





-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Documentação de Regras de Negócio do Sistema

2009-02-13 Por tôpico Reginaldo Donizete Felix
Tenho uma questão acho que todos se deparam com esse trabalho meio que
braçal.
Como documentar as regras de negócio de um sistema.
Por exemplo tenho determinadas regras em determinados campos de minhas telas
qual a melhor alterantiva que vocês usam para documentar essas regras.
Regras essas muitas as vezes internas do sistema que auxiliam o programador
a endender o codigo.
Estamos montando aqui na empresa tabelas com os campos de cada tela com as
regras em word ou excel, mais não acho isso legal. Que alternativas podemos
usar podem ser melhores ? Existes ferramentas proprias pra isso ? Alguem que
utiliza alguma que pode indicar ?

-- 
Reginaldo D. Felix
regife...@hotmail.com



-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Arquivo XML

2009-02-12 Por tôpico Reginaldo Donizete Felix
 :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].AliquotaAtividade );
ChildNodes['TipoRecolhimento'].NodeValue  :=
ArrayRPS[ContRps].TipoRecolhimento ;
ChildNodes['MunicipioPrestacao'].NodeValue:=
TFuncoesDll.StrZero( ArrayRPS[ContRps].MunicipioPrestacao, 7 );
ChildNodes['MunicipioPrestacaoDescricao'].NodeValue :=
ArrayRPS[ContRps].MunicipioPrestacaoDescricao ;
ChildNodes['Operacao'].NodeValue  :=
ArrayRPS[ContRps].Operacao ;
ChildNodes['Tributacao'].NodeValue:=
ArrayRPS[ContRps].Tributacao ;
ChildNodes['ValorPIS'].NodeValue  :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].ValorPIS ) ;
ChildNodes['ValorCOFINS'].NodeValue   :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].ValorCOFINS ) ;
ChildNodes['ValorINSS'].NodeValue :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].ValorINSS ) ;
ChildNodes['ValorIR'].NodeValue   :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].ValorIR ) ;
ChildNodes['ValorCSLL'].NodeValue :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].ValorCSLL ) ;
ChildNodes['AliquotaPIS'].NodeValue   :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].AliquotaPIS ) ;
ChildNodes['AliquotaCOFINS'].NodeValue:=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].AliquotaCOFINS ) ;
ChildNodes['AliquotaINSS'].NodeValue  :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].AliquotaINSS ) ;
ChildNodes['AliquotaIR'].NodeValue:=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].AliquotaIR ) ;
ChildNodes['AliquotaCSLL'].NodeValue  :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].AliquotaCSLL ) ;
ChildNodes['DescricaoRPS'].NodeValue  :=
ArrayRPS[ContRps].DescricaoRPS  ;
ChildNodes['DDDPrestador'].NodeValue  :=
ArrayRPS[ContRps].DDDPrestador  ;
ChildNodes['TelefonePrestador'].NodeValue :=
ArrayRPS[ContRps].TelefonePrestador  ;
ChildNodes['DDDTomador'].NodeValue:=
ArrayRPS[ContRps].DDDTomador  ;
ChildNodes['TelefoneTomador'].NodeValue   :=
ArrayRPS[ContRps].TelefoneTomador  ;
AddChild('Deducoes');
AddChild('Itens');
For ContItens := 0 to Length(Rps[ContRps].Itens)-1 do begin
  ChildNodes['Itens'].AddChild('Item') ;
  with ChildNodes['Itens'].ChildNodes.Last do begin
ChildNodes['DiscriminacaoServico'].NodeValue :=
ArrayRPS[ContRps].Itens[ContItens].DiscriminacaoServico ;
ChildNodes['Quantidade'].NodeValue   :=
ArrayRPS[ContRps].Itens[ContItens].Quantidade ;
ChildNodes['ValorUnitario'].NodeValue:=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].Itens[ContItens].ValorUnitario
) ;
ChildNodes['ValorTotal'].NodeValue   :=
TFuncoesDll.FormataDouble( ArrayRPS[ContRps].Itens[ContItens].ValorTotal ) ;
  end;
end;
For ContDeducoes := 0 to Length(Rps[ContRps].Deducoes)-1 do begin
  ChildNodes['Deducoes'].AddChild('Deducao') ;
  with ChildNodes['Deducoes'].ChildNodes.Last do begin
ChildNodes['DeducaoPor'].NodeValue   :=
Rps[ContRps].Deducoes[ContDeducoes].DeducaoPor ;
ChildNodes['TipoDeducao'].NodeValue  :=
Rps[ContRps].Deducoes[ContDeducoes].TipoDeducao ;
ChildNodes['CPFCNPJReferencia'].NodeValue:=
Rps[ContRps].Deducoes[ContDeducoes].CPFCNPJReferencia ;
ChildNodes['NumeroNFReferencia'].NodeValue   :=
Rps[ContRps].Deducoes[ContDeducoes].NumeroNFReferencia;
ChildNodes['ValorTotalReferencia'].NodeValue :=
TFuncoesDll.FormataDouble(
Rps[ContRps].Deducoes[ContDeducoes].ValorTotalReferencia ) ;
ChildNodes['PercentualDeduzir'].NodeValue:=
TFuncoesDll.FormataDouble(
Rps[ContRps].Deducoes[ContDeducoes].PercentualDeduzir ) ;
ChildNodes['ValorDeduzir'].NodeValue :=
TFuncoesDll.FormataDouble( Rps[ContRps].Deducoes[ContDeducoes].ValorDeduzir
) ;
  end;
end;
  end;
end;
  end ;
  Result := vXMLDoc.XML.Text ;
end;

2009/2/12 Fabio Thomaz fabio_...@yahoo.com.br

   Ainda não estou conseguindo, veja como estou fazendo:

 //Carrego XML Anterior
 cds1.LoadFromFile('Origem.xml');
 cds1.Close;
 //Adiciono o Campo Desejado
 cds1.FieldDefs.Add('NovoCampo',ftString,10,False);
 cds1.FieldDefs.Update;
 cds1.CreateDataSet;
 //Salvo o XML
 cds1.SaveToFile('Destino.xml',dfXML);

 //Depois Carrego o Novo XML
 cds1.LoadFromFile('Destino.xml');

 O que estou fazendo de errado? O XML de destino continua igual o de origem.


 Fábio Thomaz
 RG System Informática Ltda - Desenvolvimento
 Msn: fa...@rgsystem.com.br fabio%40rgsystem.com.br

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

  




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Problema ao executar projeto no Delphi 2005 - Abre tela do windows installer

2009-01-20 Por tôpico Reginaldo Donizete Felix
Pessoal estou com um problema meio fantasma como algumas coisas na
informatica.
Estou usando o Delphi 2005 e todo vez q abro ou crio um novo projeto,
quando vou executar o projeto  ele abre uma tela do Windows Installer com
uma mensagem Preparing to install
com o botão cancelar abilitado, ai tento cancelar e ele exibe essa mensagem
mais umas daus vezes.
Isso acontece na primeira vez que vou executar qualquer projeto no Delphi
2005, dpois que eu clico em cancelar,
das outravez vezes q executo o mesmo projeto nao abre mais essa tela do
Windows installer.

Alguem sabe como faço para resolver isso ? se é alguma configuração no
delphi 2005.


Obrigado.



-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Perdi o Meu CD do Delphi 7!!!!!!!!

2009-01-19 Por tôpico reginaldo
A Code Gear vende o Delphi em banca de revistas ??

ou é uma forma de dizer que você quer uma versão ilegal ( pirata )  ??

Atenciosamente,

Reginaldo
Buscai ao SENHOR enquanto se pode achar, invocai-o enquanto está perto. 
Isaías 55:6

  - Original Message - 
  From: rafaelpinto19 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 19, 2009 3:27 PM
  Subject: [delphi-br] Perdi o Meu CD do Delphi 7




  Po Galera, perdi meu CD do Delphi 7 + Keygen e não estou
  conseguindo encontrar pelas bancas. Alguém sabe um site onde eu possa
  fazer o Downloade dele Rapidinho

  Estou precisando muito!!!

  [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] Homologação NF-e

2009-01-16 Por tôpico Reginaldo Donizete Felix
Boa tarde Fabio Lima,
Existem alternativas, você pode usar soluções de outros fornecedores de
sistemas ERP que tenham soluções para NF-e,
a FIT-Sistemas possui uma solução que pode se integrar com a sistema
utilizado na empresa.
qualquer coisa entre em contato com o Zuza da Fit Sistemas.
Telefone para contato : (11) 3586 7393

Reginaldo D. Felix
msn: regife...@hotmail.com



2009/1/16 Fabio Lima fabio.l...@grupocoan.com.br

   Boa tarde a todos!

 Temos uma seguinte dúvida aqui na empresa.

 Uma empresa do grupo onde trabalho terá a necessidade de emitir NF-e e a
 versão do sistema atual não tem esta funcionalidade.

 O fornecedor desta ferramenta disse que teremos que atualizar para uma
 versão mais nova que possui esta funcionalidade, concordo plenamente com
 esta postura.

 Porém o diretor da empresa questionou se há realmente a necessidade de
 atualização e se esta necessidade vem por conta da versão estar homologada
 junto ao governo e sendo somente ela autorizada a emitir a NF-e.

 Basicamente o diretor da empresa quer ter certeza de que há outra maneira
 de
 se obter esta funcionalidade, deixando como ultimo recurso a atualização de
 versão.

 Fábio Lima de Oliveira
 Analista de Sistema

 E-mail: mailto:fabio.l...@grupocoan.com.brfabio.lima%40grupocoan.com.br
 fabio.l...@grupocoan.com.br fabio.lima%40grupocoan.com.br

 Site: http://www.grupocoan.com.br/ http://www.grupocoan.com.br

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

 




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Problema ao instalar QuickReport no Delphi 2005 falta rtl100.bpl

2009-01-13 Por tôpico Reginaldo Donizete Felix
Obrigado Walter,
Descobri o erro que estava ocorrendo,
eu nao estava copiando os bpl's do Quick Report para a pasta
C:\Arquivos de programas\Borland\BDS\3.0\Bin  , eu estava tentando instalar
direto de uma outra pasta local.



2009/1/12 Walter Chagas (Bol) wchag...@bol.com.br

   Voce deve estar usando uma versão do Quick que não seja para o D2K5. O
 mais provavel.

 []s

 Walter Alves Chagas Junior
 Belo Horizonte - MG - Brazil
 wchag...@bol.com.br wchagasj%40bol.com.br
 http://www.geocities.com/SiliconValley/Bay/1058
 http://delphitocorporerm.blogspot.com/
 MSN: whitesock...@hotmail.com whitesockets%40hotmail.com
 SKYPE: WalterChagasJr


 - Original Message -
 From: Reginaldo Donizete Felix
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Monday, January 12, 2009 11:55 AM
 Subject: [delphi-br] Problema ao instalar QuickReport no Delphi 2005 falta
 rtl100.bpl

 Estou com um problema ao instalar o QuickReport no Delphi 2005,
 aparece a seguinte mensagem :
 Este aplicativo não pode ser iniciado porque não foi encontrado
 rtl100.bpl.
 A reinstalação do aplicativo pode corrigir o problema.

 Alguem sabe porque ocorre isto e como faço para conseguir esta rtl100.bpl ?

 Obrigado

 Reginaldo D. Felix
 Analista de Sistemas
 www.regifelix.com.br
 msn: regife...@hotmail.com regifelix%40hotmail.com

 --
 Reginaldo D. Felix
 regife...@hotmail.com regifelix%40hotmail.com

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

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

 




-- 
Reginaldo D. Felix
regife...@hotmail.com


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



[delphi-br] Problema ao instalar QuickReport no Delphi 2005 falta rtl100.bpl

2009-01-12 Por tôpico Reginaldo Donizete Felix
Estou com um problema ao instalar o QuickReport no Delphi 2005,
aparece a seguinte mensagem :
Este aplicativo não pode ser iniciado porque não foi encontrado rtl100.bpl.
A reinstalação do aplicativo pode corrigir o problema.

Alguem sabe porque ocorre isto e como faço para conseguir esta rtl100.bpl ?

Obrigado

Reginaldo D. Felix
Analista de Sistemas
www.regifelix.com.br
msn: regife...@hotmail.com

-- 
Reginaldo D. Felix
regife...@hotmail.com


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



Re: [delphi-br] Sistema de Gestão Escolar

2009-01-05 Por tôpico reginaldo
Boa tarde amigo,

visite o nosso site  www.ideiainformatica.com.br 
temos um sistema de gestão escolar completo, inclusive com emissão de boletos 
bancários.

Reginaldo
(31)3291-9799
Idéia Informática Ltda
MSN : duvi...@ideiainformatica.com.br
Buscai ao SENHOR enquanto se pode achar, invocai-o enquanto está perto. 
Isaías 55:6
  - Original Message - 
  From: gilberto_rr 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, January 05, 2009 10:30 AM
  Subject: [delphi-br] Sistema de Gestão Escolar


  Alguém possui um Sistema de Gestão Escolar concluído e disponível para
  comercialização? O Sistema deve possuir ao menos os seguintes módulos:
  matrícula, rematrícula, transferência, montagem de turmas, controle de
  notas e situação do aluno, boletim, histórico escolar, contas a
  pagar/receber (em aberto, vencidas, pagas), mensalidades (em aberto,
  vencidas, pagas). Aguardo contatos, obrigado!



   

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



Re: [delphi-br] Arquivo Ini no Delphi

2008-12-17 Por tôpico reginaldo
Inclua a unit IniFiles na clausula uses do seu form.

Procedure TForm1.GravaIni( Numero : Longint ; Texto : String ; Condicao : 
Boolean);
var
ArqIni : TIniFile;
begin
ArqIni := TIniFile.Create('c:\windows\temp\Teste.Ini');
Try
ArqIni.WriteInteger('Dados', 'Numero', Numero);
ArqIni.WriteString('Dados', 'Texto', Texto);
ArqIni.WriteBool('Dados', 'Condição', Condicao);
Finally
ArqIni.Free;
end;
end;

Procedure TForm1.LeIni( Var Numero : Longint ; Var Texto : String ; Var 
Condicao : Boolean);
var
ArqIni : tIniFile;
begin
ArqIni := tIniFile.Create('c:\windows\temp\Teste.Ini');
Try
Numero := ArqIni.ReadInteger('Dados', 'Numero', Numero );
Texto := ArqIni.ReadString('Dados', 'Texto', Texto );
Condicao := ArqIni.ReadBool('Dados', 'Condição', Condicao );
Finally
ArqIni.Free;
end;
end;

Utilize as procedures assim:

procedure TForm1.Button1Click(Sender: TObject);
begin
GravaIni(1234,'TESTE',True);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
N: Integer;
T: String;
C: Boolean;
begin
LeIni(N,T,C);
Showmessage(IntToStr(N)+' '+T);
end;  

Atenciosamente,

Reginaldo
Buscai ao SENHOR enquanto se pode achar, invocai-o enquanto está perto. 
Isaías 55:6
  - Original Message - 
  From: Cleber Edson Lino 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, December 17, 2008 10:57 AM
  Subject: [delphi-br] Arquivo Ini no Delphi


  Olá pessoal... bom dia...
  Olha só, preciso pegar conteúdo de arquivo .ini, alguém tem um exemplo 
  aí que possa me ajudar. E tem que ter alguma coisa que pega a variável 
  de sessão aquela que fica entre [Teste] ok?

  Obrigado a todos.



   

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



[delphi-br] Comando para repetir ações no Delphi - Teclas de Atalho

2008-12-03 Por tôpico Reginaldo Donizete Felix
Pessoal,
alguem pode me relembrar no no editor do Delphi um comando de teclas que
quando pressionadas
ele grava na memória a sequencia de comandos realizados no editor
depois usando teclas rapidas voce repete estes comandos.

Esse comando é otimo quando tem um sequencia de ações repetitivas a ser
execultado no editor de codigo.


Obrigado

-- 
Reginaldo D. Felix
web: www.regifelix.com.br
[EMAIL PROTECTED]


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



[delphi-br] Gerar XML de TClientDataSet com Detail

2008-11-27 Por tôpico Reginaldo Donizete Felix
Tenho um TClienteDataSet chamado cdsPAI gerado dinamicamente e este possui
seu DataSource dsrPAI,

e este tem seus registros detalhes de um outro TClienteDataSet denominado
cdsfilho, e neste filho coloquei a propriedade MasterSource para o dsrPai.

No codigo coloquei o seguinte codigo :

cdsPai.CreateDataSet ;
cdsPai.Open;
cdsPai.Insert;
cdsPai.FieldByName('CodCidade').AsString := '01' ;
cdsPai.FieldByName('NomeCidade').AsString := 'SAO PAULO' ;
cdsPai.Post ;

cdsFilho.CreateDataSet ;
cdsFilho.Open;
cdsFilho.Insert;
cdsFilho.FieldByName('CodCidade').AsString := '01' ;
cdsFilho.FieldByName('CodRua').AsString := '01' ;
cdsFilho.FieldByName('NomeRua').AsString := 'RUA FULANA DE TAL' ;
cdsFilho.Post ;

CdsPai.SaveToFile('CDS_CIDADE.xml');

---

No Xml do pai ele so gera dele proprio as tags XML e nao gera do filho
como faço para fazer ele gerar do filho

O XML QUE GEROU FOI O SEGUINTE
?xml version=1.0 standalone=yes?  DATAPACKET
Version=2.0METADATAFIELDSFIELD attrname=CodCidade
fieldtype=string WIDTH=20/FIELD attrname=NomeCidade
fieldtype=string WIDTH=20//FIELDSPARAMS CHANGE_LOG=1 0
4//METADATAROWDATAROW RowState=4 CodCidade=01 NomeCidade=SAO
PAULO//ROWDATA/DATAPACKET

COMO FAÇO PARA GERAR JUNO NO XML O FILHO TAMBEM ???

DESDE JA
OBRIGADO

-- 
Reginaldo D. Felix
[EMAIL PROTECTED]


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



Re: [delphi-br] Gerar XML de TClientDataSet com Detail

2008-11-27 Por tôpico Reginaldo Donizete Felix
Desta forma nao vou ter as tags xml formatadas certinhas
e preciso seguir um padrao xml .
os ClientDataSet tem que ser criados dinamicamente tambem.



2008/11/27 Guionardo Furlan [EMAIL PROTECTED]

   Acho que não vai funcionar desse jeito, pelo que entendo do CDS.
 Mas vc poderia criar outro CDS, com todos os campos do pai e do filho
 e com dois loops aninhados preencher com os dados desejados.
 Depois, teria um XML só.
 Mas é POG!!!

 2008/11/27 Reginaldo Donizete Felix [EMAIL 
 PROTECTED]regifelix%40gmail.com:


  Tenho um TClienteDataSet chamado cdsPAI gerado dinamicamente e este
 possui
  seu DataSource dsrPAI,
 
  e este tem seus registros detalhes de um outro TClienteDataSet denominado
  cdsfilho, e neste filho coloquei a propriedade MasterSource para o
 dsrPai.
 
  No codigo coloquei o seguinte codigo :
 
  cdsPai.CreateDataSet ;
  cdsPai.Open;
  cdsPai.Insert;
  cdsPai.FieldByName('CodCidade').AsString := '01' ;
  cdsPai.FieldByName('NomeCidade').AsString := 'SAO PAULO' ;
  cdsPai.Post ;
 
  cdsFilho.CreateDataSet ;
  cdsFilho.Open;
  cdsFilho.Insert;
  cdsFilho.FieldByName('CodCidade').AsString := '01' ;
  cdsFilho.FieldByName('CodRua').AsString := '01' ;
  cdsFilho.FieldByName('NomeRua').AsString := 'RUA FULANA DE TAL' ;
  cdsFilho.Post ;
 
  CdsPai.SaveToFile('CDS_CIDADE.xml');
 
  ---
 
  No Xml do pai ele so gera dele proprio as tags XML e nao gera do filho
  como faço para fazer ele gerar do filho
 
  O XML QUE GEROU FOI O SEGUINTE
  ?xml version=1.0 standalone=yes? DATAPACKET
  Version=2.0METADATAFIELDSFIELD attrname=CodCidade
  fieldtype=string WIDTH=20/FIELD attrname=NomeCidade
  fieldtype=string WIDTH=20//FIELDSPARAMS CHANGE_LOG=1 0
  4//METADATAROWDATAROW RowState=4 CodCidade=01 NomeCidade=SAO
  PAULO//ROWDATA/DATAPACKET
 
  COMO FAÇO PARA GERAR JUNO NO XML O FILHO TAMBEM ???
 

 --
 Timeo hominem unius libri
 Cogito ergo sum - Carpe diem

 []s
 Guionardo Furlan
 http://guionardo.blogspot.com

 




-- 
Reginaldo D. Felix
[EMAIL PROTECTED]


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



[delphi-br] Duvida sobre DLL em Delphi

2008-11-26 Por tôpico Reginaldo Donizete Felix
Bom dia,
Estou com uma duvida básica em DLL
Esta lendo um artigo sobre DLL e vi que alguns tipos de variaveis quando
utilizadas em uma DLL podem não ser reconhecidas em uma outra linguagem ao
utilizar esta dll, como chamadas de funções e etc.
Estou desenvolvendo uma DLL e estou com duvida em relação aos tipos que devo
usar nas chamadas de função.
gostaria de saber se os tipos básicos de Delphi : String, Integer, Double.
se eu posso usar estes tipos nos parametros das funções ou se existe outros
fomatos que devo usar.

Obrigado

-- 
Reginaldo D. Felix
[EMAIL PROTECTED]


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



[delphi-br] Dll com funcoes para grava notas ficais

2008-11-25 Por tôpico Reginaldo Donizete Felix
Bom dia pessoal,
tenho que desenvolver uma dll com rotinas que trabalham com notas fiscais
gostaria de saber a melhor maneira cria uma funcao que receba como parametro
o cabecalho da nota fiscal e os itens. Tenho que desenvolver essa Dll de
modo que ela possa ser utilizada por outras plataformas, entao estou em
duvida quando a melhor maneira de fazer as funções
se seria  uma funcao que eu registro o cabeçalho e outra para os itens como
abaixo :

funcao NotaFiscal ( NroNota, Data, Clietes, Etc )
funcao ItensDaNota( NroNota, NroItem, Produto, Etc )

Desta forma quando for fazer o codigo da chamada, teria que primeiro chamar
a funcao NotaFiscal que envia o cabecalho, depois um loop com a funcao dos
itens.
mais queria saber poderia fazer de um forma melhor.





-- 
Reginaldo D. Felix
[EMAIL PROTECTED]


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



Re: [delphi-br] [MAF] sistema multi idioma

2008-09-10 Por tôpico reginaldo
O Delphi 2009 tem suporte a multi idiomas.

Atenciosamente,

Reginaldo
posso todos as coisas naquele que me fortalece

  - Original Message - 
  From: Marcos Abreu Ferreira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 09, 2008 10:37 PM
  Subject: [delphi-br] [MAF] sistema multi idioma


  Pessoal,

  por acaso voces tem algum manual para criar um sistema com mais de um 
  idioma no Delphi 7?

  valeu,

  Marcos



   

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



Re: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!

2008-09-09 Por tôpico reginaldo
Olá pessoal, estive no Delphi Tour de Belo Horizonte. O delphi 2009 está show 
de bola, novos componentes, ide mais rápida e diversos recursos que poderemos 
testar com a versão Demo que já está disponivel no site da CodeGear.

Atenciosamente,

Reginaldo
(31)3291-9799
Idéia Informática Ltda
www.ideiainformatica.com.br 
MSN : [EMAIL PROTECTED]
posso todos as coisas naquele que me fortalece
  - Original Message - 
  From: Gerhard Roger Nack 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 09, 2008 4:05 PM
  Subject: RES: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!


  Eu sei que não se restringem só aos métodos anônimos Bruno, mas é sobre eles 
que fiquei curioso.

  Já quanto ao novo Office (Ribbon Controls) já uso isso a quase 2 anos 
graças a TMS Software que lançou os componentes pra isso na mesma época em 
que saiu o Office 2007.

  Um tempo depois a DevExpress também lançou um pacote que faz isso.

  Quanto ao resto das novidades desta versão, vamos esperar pra ver quais são 
então.

  Alguém que vá nesse evento amanha favor nos relatar quais são.

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Bruno 
Lichot
  Enviada em: terça-feira, 9 de setembro de 2008 09:26
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RE: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!

  As novidades não se restringem somente a métodos anônimos.

  Isto apenas uma pequena parte do que está a nossa disposição.

  HTTP://dn.codegear.com/br 

  Abs

  BL

  From: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] 
On Behalf Of Gerhard Roger Nack
  Sent: terça-feira, 9 de setembro de 2008 08:50
  To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
  Subject: RES: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!

  Nem por aqui em SC, e com certeza não vou sair daqui pra ir a SP ou outro 
estado descobrir o que viria a ser isso.

  Por isso que perguntei, mas parece que o Bruno não quer estragar essa 
surpresa que vão mostrar no evento.

  Mas já imagino o que seja, só queria ter a confirmação de alguém que já teve 
acesso a esta nova versão.

  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 Açaí
  Enviada em: segunda-feira, 8 de setembro de 2008 19:26
  Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br 
  Assunto: Re: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!

  Infelizmente este evento não acontecerá aqui no DF

  2008/9/8 Gerhard Roger Nack [EMAIL PROTECTED] mailto:ginho%40mult.com.br 
mailto:ginho%40mult.com.br mailto:ginho%40mult.com.br 

   Ola Bruno, aproveita então e já manda ai pra galera um exemplo desse tal
   Método Anônimo e pra que serve.
  
   [ ] s
  
   De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.br [mailto:
   delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.br] Em nome de
   Bruno Lichot
   Enviada em: segunda-feira, 8 de setembro de 2008 10:42
   Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
delphi-br%40yahoogrupos.com.br
   Assunto: [delphi-br] CodeGear Delphi 2009 Tour - Evento Gratuito!!!
  
   Salve Galera
  
   As inscrições para o Delphi Tour de lançamento do Delphi 2009 estão a todo
   vapor!!! As inscrições para todas as cidades já estão disponíveis, mas
   lembre-se que as vagas são limitadas e o evento começa amanhã. Não deixem
   para se inscrever na última hora, pois pode não haver mais disponibilidade
   de vagas.
  
   http://latam.codegear.com/br/delphitour/
  
   Será uma série de eventos em várias capitais. A inscrição é gratuita!
  
   Durante o evento serão apresentadas todas as novidades do Delphi 2009.
  
   Apresentaremos todas as novidades incluindo o novo DataSnap com total
   independência do Windows, os componentes novos da VCL entre eles os de
   interface do novo Office(Ribbon Controls), as melhorias da linguagem, o
   suporte a Generics e Métodos Anônimos e muitas outras novidades.
  
   Esse ano teremos a participação especial do David I.
  
   Esperamos vocês no evento!
  
   Abraços,
  
   Bruno Lichot
  
   [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

Re: [delphi-br] ideia sobre valores

2008-08-08 Por tôpico reginaldo

Eu cobraria 30.000,00 do desenvolvimento e mais 3.000,00 de manutenção mensal.
Pois vc vai trabalhar pra eles como se fosse funcionário. Pense bem !


Reginaldo
posso todos as coisas naquele que me fortalece

  - Original Message - 
  From: felipe govoni 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 08, 2008 11:39 AM
  Subject: [delphi-br] ideia sobre valores


  bom dia

  hoje a tarde tenho uma reunia com um cliente, e gostaria
  da opiniao dos colegas, pois a empresa vai fechar um contrato comigo
  para criarmos um sistema para gerenciar toda a empresa
  (estoque, vendas, rh, financeiro e sabe -se la mais o que eles vao pedir)

  qnt voces acham q eu devo cobrar?
  e manutencao? como devo proceder?

  ainda nao tinha feito um projeto tao grande como free lancer,
  por isso nao sei qnt cobrar.

  vlw galera.

  -- 
  Felipe Govoni
  -
  Programador
  Fone 8472-8718

  [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] Evento Tiburón[Feedback ao Andre ano]

2008-08-01 Por tôpico reginaldo
Concordo com a Maria das Graças, não conseguimos até o momento migrar do Delphi 
7 para o 2007 devido a incompatibilidade de componentes.

O evento com Live Meeting foi bom, mas acho q deveria cortar o audio do 
pessoal, pois teve momentos que ficou dificil entender, pois havia muitos 
falando ao mesmo tempo.

Reginaldo
posso todos as coisas naquele que me fortalece
  - Original Message - 
  From: Maria das Graças . 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 01, 2008 1:42 PM
  Subject: Re: [delphi-br] Evento Tiburón[Feedback ao Andreano]


  Como o pessoal do Codegeargroup.com.br não responde mais nada por lá, vou dar 
meu feedback sobre o Evento Tiburón aqui, por ser o Delphi-br o principal grupo 
de discussão de Delphi que conheço.
   
  O Live Meeting foi satisfatório, no meu micro ficou normal, nada de lentidão. 
O que atrapalhou mesmo foi o pessoal falando e interrompendo a demonstração do 
Andreano.
   
  Faltou atenção às perguntas feitas no chat no final do evento. 
   
  Agora, quanto ao Delphi 2009, se o pessoal da Embarcadero não apresentar mais 
novidades além do que foi apresentado, duvido que o pessoal saia do Delphi 7, 
ou mesmo do RAD, pois eu tenho RAD e não vi novidade nenhuma no 2009 que mereça 
migração.
  Graça

  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses

  [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] Error loading MIDAS.DLL

2008-06-26 Por tôpico reginaldo
declare no 
Uses
MidasLib

e compile o projeto novamente.

Atenciosamente,

Reginaldo
posso todos as coisas naquele que me fortalece
  - Original Message - 
  From: André Luis de Oliveira 
  To: NDDV (multicamadas) ; Delphi BR 
  Sent: Thursday, June 26, 2008 8:06 AM
  Subject: [delphi-br] Error loading MIDAS.DLL


  Meu servidor de aplicação (SA) está funcionando corretamente.
  A aplicação cliente conecta normal no SA, quando vou usar alguma metodo que 
está no SA aparece a seguinte mensagem Error loading MIDAS.DLL. Já registrei a 
dll, já adicionei no uses o MidasLib e nada resolveu. Alguém já passou por isso?
  Estou usando Delphi 2007 e Oracle 10g.

  André Luis de Oliveira
  Analista de Sistemas
  E-mail: [EMAIL PROTECTED]
  ( (19) 3322-4018

  Uniodonto Campinas
  Av. Brasil, 200 - Campinas/SP
  ( (19) 3322-4000
  Visite nosso site: www.uniodontocamp.com.br

  --

  Se você recebeu essa mensagem por engano, desconsidere-a.
  Antes de imprimir, pense em sua responsabilidade com o meio ambiente. 
  UNIODONTO, FEITA POR PESSOAS QUE FAZEM O BEM. 

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



   


--


  No virus found in this incoming message.
  Checked by AVG. 
  Version: 7.5.524 / Virus Database: 270.4.1/1510 - Release Date: 19/6/2008 
15:21


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



Re: [delphi-br] Acessar PARADOX via REDE - Wndows XP

2008-06-12 Por tôpico reginaldo
Siga o conselho que já foi dado  deixe o paradox enquanto ainda há tempo

Dica:
Instale o BDE e crie um mapeamento na maquina cliente.
nas configurações do BDE em path coloque o caminho com o mapeamento para o 
servidor,  tipo G:\seu banco\  
onde G representa a unidade do servidor .

Lembrando que o banco poderá se corremper com o uso em rede, pois isso é muito 
comum no Paradox. procure ferramentas no google para restauração de indices 
pois vai precisar.

Atenciosamente,

Reginaldo
- Original Message - 
  From: nillgolv 
  To: delphi-br 
  Sent: Thursday, June 12, 2008 3:09 AM
  Subject: [delphi-br] Acessar PARADOX via REDE - Wndows XP


  A quem possa me ajudar,

  Tenho um sistema de cadastro de clientes que usei o bd paradox.
  Instalei na maquina PC-01.

  Peguei a cópia do executavel e coloquei no PC-02.
  Quero acessar o bd que esta no PC-01

  Qual o procedimento que devo fazer. Onde devo configurar para ter o acesso 
deste bd.

  Peço esta ajuda por favor

  Grato

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



   


--


  No virus found in this incoming message.
  Checked by AVG. 
  Version: 7.5.524 / Virus Database: 270.2.0/1495 - Release Date: 10/6/2008 
17:11


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



Re: [delphi-br] Compra de Delphi 2007 Win32 e Delphi For PHP 2.0 no exterior. [off-topic] - [offt] - [offtopic] - [ot]

2008-06-04 Por tôpico reginaldo
Liguei no telefone 11-2165-1606 e me informaram que esta promoção é apenas para 
licenças adicionais, ou seja vc tem que ter 1 licença do RAD ou do Delphi 2007 .

Atenciosamente,

Reginaldo
posso todos as coisas naquele que me fortalece
  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 04, 2008 2:22 PM
  Subject: RE: [delphi-br] Compra de Delphi 2007 Win32 e Delphi For PHP 2.0 no 
exterior. [off-topic] - [offt] - [offtopic] - [ot]


  A promoção de 60% de desconto é Real, basta ligar para 11-2165-8048 ou mandar 
email para [EMAIL PROTECTED]mailto:[EMAIL PROTECTED].

  A promoção já está chegando ao seu fim, mas ainda é possível comprar com este 
desconto esta semana.

  Abs

  BL

  From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of 
Joao Morais
  Sent: quarta-feira, 4 de junho de 2008 13:51
  To: delphi-br@yahoogrupos.com.br
  Subject: Re: [delphi-br] Compra de Delphi 2007 Win32 e Delphi For PHP 2.0 no 
exterior. [off-topic] - [offt] - [offtopic] - [ot]

  Paulo Batalhão wrote:
   eu ia entrar com os sistemas instalados no note que vou levar !!! mais...
  
   ... axo não nao vai compensar o trabalho e a insegurança de ficar sem 
suporte e updates depois !!!
   , vou ficar com meu Delphi 5 mesmo (q ja ta comprado e pagado) !!! o 
esperar as versões Embarcadero pra ver no que vai dar !

  Se a informação em www.borlandshop.com.br, que informa que o Delphi e
  RAD studio estão com 60% de desconto, o Delphi Professional sairia por
  R$ 1.079,00. Vale a pena pegar um telefone e conferir (ou pedir a eles
  que corrijam o banner)

  Joao Morais

   
   From: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br 
[mailto:delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br] On 
Behalf Of Andrei Luís
   Sent: Tuesday, June 03, 2008 11:50 PM
   To: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
   Subject: Re: [delphi-br] Compra de Delphi 2007 Win32 e Delphi For PHP 2.0 
no exterior. [off-topic] - [offt] - [offtopic] - [ot]
  
   Bem, analisando números:
  
   Comprando nos EUA, se não me engano sobre os valores do site tem 6% de
   acréscimo que é o imposto. Calculei com o dolar a R$ 1,70
  
   Enterprise new user USD 1.999,00 * 1,7 + 6% = R$ 3.602,19
   Professional new user USD 899,00 * 1,7 + 6% = R$ 1.619,99
  
   Comprando no Brazil:
  
   Enterprise new user R$ 4.797,60
   Professional new user R$ 2.157,60
  
   Bem, o cálculo é fácil, no enterprise você economiza R$ 1.195,41 e no
   professional R$ 537,61.
  
   Isso tudo sem pagar imposto de importação, que caso você pague vai
   provavelmente quase que igualar os valores, se não ficar mais caro.
  
   Se fizer o que o Ricardo mencionou de trazer camuflado, acho que tu até
   consegue. Mas já que a entrada foi ilegal, será que a Borland vai considerar
   como uma cópia válida caso você precise de algo junto a Borland / CodeGear
   / Embarcadero / Escambau / Tabajara / Sei lá o que mais vão inventar? Não
   irão considerar como uma cópia pirata?
  
   Eu acho que não valeria o risco de comprar um software original, e entrar
   com ele de forma ilegal no país.
  
   Alguém com e-mail @borland ou @codegear poderia esclarecer essa questão?
  
   []
   Andrei

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



   


--


  No virus found in this incoming message.
  Checked by AVG. 
  Version: 7.5.524 / Virus Database: 269.24.6/1482 - Release Date: 4/6/2008 
07:10


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



[delphi-br] Aumentar o tamanho da fonte em um TMainMenu

2006-10-19 Por tôpico Reginaldo Donizete Felix
Boa Noite a todos

por favor alguem sabe como aumentar o tamanho da fonte em um MainMenu
procurei na net e não encontrei, se alguem puder me ajudar

obrigado

-- 
_
Reginaldo Donizete Felix
msn: [EMAIL PROTECTED]
icq: 264587310
web: www.regifelix.com.br


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




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 



[delphi-br] Erro ao instalar componente no delphi

2006-07-18 Por tôpico Reginaldo Donizete Felix
Estou com um problema se alguem puder me ajudar.
Ao tentar instalar um componente ele da a seguinte mensagem.
Primeiro eu compilo ele normalmente.
Depois ao clicar em instalar da a seguinte mensagem.

Este aplicativo não pôde ser iniciado porque não foi encontrado rtl90.bpl. A
reinstalação do aplicativo pode corrigir o problema.

Logo em seguida aparece a seguinte mensagem :

Can't load package c:\aquivos de
programas\borland\delphi7\Project\Bpl\gbCob7.bpl.
Não foi possivel encontrar o módulo especificado.


Estou utilizando o Delphi7

Alguem poderia me ajudar

Obrigado

Reginaldo Donizete Felix
msn: [EMAIL PROTECTED]
icq: 264587310
web: www.regifelix.com.br


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





[delphi-br] Serial do Delphi 7 não funciona

2006-01-09 Por tôpico Reginaldo Donizete Felix
Pessoal aguem poderia me ajudar
eu instalei o delphi 7 pro e não consegui rodar,
ele fica exibindo uma mensagem de serila invalido e não aceita o serial.
alguem sabe como proceder
se puder me ajudar mande para meu email : [EMAIL PROTECTED]

--
_
Reginaldo Donizete Felix
msn: [EMAIL PROTECTED]
icq: 264587310
web: www.regifelix.com.br


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 




[delphi-br] Problema com a instalação do Delphi

2005-12-01 Por tôpico Reginaldo Donizete Felix
Pessoal,
estou com um problema com o delphi,
estava usando normalmente o delphi, qndo derepende esses dias, ele
começou a dar a mensagem: Borland License Information for Delhi does
not yet exist.
Check the Register Now, e abre um caixa para infomar o código de licença.
Coloco o serial e a chave mais ainda não funciona.
Ja reinstalei o delphi e mesmo assim aparece a mesma coisa.
Alguem sabe o que pode ser ? E como soluciono ?

Obrigado

--
_
Reginaldo Donizete Felix
msn: [EMAIL PROTECTED]
icq: 264587310
web: www.regifelix.com.br


-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 




Fw: [delphi-br] bpl´s

2005-04-20 Por tôpico Reginaldo

Romário bom dia, esse assunto me interessou, por um acaso tem alguma outra 
forma de utilizar-se BPL sem ter que usar a opção  Build With Runtime 
Packages  das options do Delphi, digo utilizar dinamicamente pra nao deixar 
fixo, por exemplo via programação. Desde já agradeço alguma atenção para com a 
essa questão.

 Obrigado.

Reginaldo Torres-Analista de Sistemas Sênior
Fabrica de Software  -  Desenvolvimento
Libra Advanced Solutions
Libra Tecnology
Telefone: (17) 3521-3080
Celular:   (17) 8117-8178
Fax:   (17) 3522-1717
[EMAIL PROTECTED]
www.libraas.com.br

O emitente desta mensagem é o único responsável, por seu conteúdo. 
- Original Message - 
From: Romario (Listas) 
To: delphi-br@yahoogrupos.com.br 
Sent: Tuesday, April 19, 2005 9:52 PM
Subject: Re: [delphi-br] bpl´s


Fonte  : Revista Clube Delphi
Ano: 5
Edição : 60
Seção  : Cartas

A melhor forma de modularizar uma aplicação, sem causar efeitos 
colaterais ou grandes mudanças na estrutura do projeto, é usando 
packages (pacotes) em tempo de execução.

O processo é simples e você pode fazer pouco antes de distribuir a 
aplicação, não é necessário se preocupar durante a fase de desenvolvimento.

O código que você escreve é sempre o mesmo (declaração no uses, criação, 
chamadas, etc.), não importa se está ou não usando runtime packages.

Crie um novo package a partir do Object Repository e adicione nele os 
formulários/DataModules do respectivo módulo (você pode criar um pacote 
para cada módulo, por exemplo). Compile o pacote, o que irá gerar uma BPL.

Volte ao projeto que usa os mesmos formulários e não os remova, apenas 
marque a opção Build With Runtime Packages no item Packages das opções 
do projeto e indique a(s) BPL(s) criada(s).

Pronto, não é necessário escrever código algum! Com isso, o Delphi não 
compila os formulários no EXE (apesar das referências continuarem da 
mesma forma) e passa a usar a BPL, que deve ser agora distribuída 
juntamente com a aplicação.

Se um formulário for alterado, na maioria das vezes você precisará 
distribuir somente a BPL afetada, não é necessário recompilar todo o 
projeto.


Sds,

Romario



mds_rs escreveu:
 
 Ola pessoal,
 
 Seguinte, estou me deparando com um pequeno grande problema.
 
 Desenvolvemos um sistema de Gestão completo.
 Porém, nosso executavel esta muito grande, entao, estou tentando 
 transformar esse nosso projeto em vários executáveis.
 Vi os arquivos no site www.techtips.com.br que por sinal ficaram 
 muito bons, porém, gostaria de compartilhar essa experiencia com 
 voces! Alguem ja fez isso ? (migrar um projeto pronto para varios 
 executaveis)
 
 Qualquer dica agradeço muito,
 Márcio



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]



  Yahoo! Grupos, um serviço oferecido por: 
   
  São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte 
Brasília  
   
 



Links do Yahoo! Grupos

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

  b.. Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]

  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 







No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.18 - Release Date: 19/04/2005

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.18 - Release Date: 19/04/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Propriedade existe

2005-03-17 Por tôpico Reginaldo


- Original Message -
From: Demian Lessa [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, March 17, 2005 11:27 AM
Subject: Re: [delphi-br] Propriedade existe



 Na unidade TypInfo, utilize a rotina GetPropInfo. Veja o help ou os
 fontes para maiores detalhes. Essa rotina retorna um ponteiro que, se
 diferente de NIL, indica que a instância possui uma propriedade com o
 nome passado.

 Mas atenção! Funciona *apenas* com propriedade publicadas (published).

 Atenciosamente,

 Demian Lessa
 Salvador - Brasil

 frcjf wrote:
 
  Oi
 
  Existe alguma função ou procedimento para saber se um determinado
  componente tem uma propriedade. por exemplo:
  se um componente tem o foco gostaria de saber se ele tem a
  propriedade DATASOURCE, isto serviria para fazer uma rotina genérica,
  dei uma olhada no manual mas não achei nada
 
  grato
 
  Flávio


 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

 Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos













-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Delphi 3 e 4

2005-03-11 Por tôpico Reginaldo

Saiu na revista cdexpert, caso queira adquirila é só entrar no site dele e
compra-la .
Site da revista www.cdexpert.com.br, na pagina principal no menu edições
anteriores,
na proxima pagina no menu categoria escolha pc expert , na proxima pagina
tem dois links um com o nome de edição do mês e outro edições anteriores
escolha a segunda, vai aparecer todas as revistas anteriores e la tem as
duas versões do delphi falou.


- Original Message -
From: gaucho_31 [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, March 11, 2005 9:44 AM
Subject: [delphi-br] Delphi 3 e 4




Alguem sabe qual a revista que saiu o Delphi 3 e 4 ?







--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos












-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Problemas ao conectar MySQL com Delphi[POR FAVOR]

2005-03-09 Por tôpico Reginaldo Ribeiro - DBCOM IT EXPERTS


Vc colocou a dll onde? Em qual pasta? Vc deve colocá-la em 
c:\windows\system. Se não funcionar, coloque na system32.

Reginaldo Ribeiro - DBCOMIT EXPERTS
msn: [EMAIL PROTECTED]

Giovani - Terra escreveu:

 E qual erro que dá?
 Se você não especificar não dá pra gente te ajudar...
   - Original Message -
   From: muriloccardoso
   To: delphi-br@yahoogrupos.com.br
   Sent: Sunday, March 06, 2005 4:56 PM
   Subject: [delphi-br] Problemas ao conectar MySQL com Delphi[POR FAVOR]




   Bom, já fui aos 4 cantos do mundo com essa dúvida e ainda nao obtive
   exito, eu sei que existem algumas incompatibilidades do Mysql com
   Delphi.
   Acho que é na tal de Libmysql.dll, mas eu já troquei essa dll uma
   porção de vezes. Ja troquei a libmysql.dll de +/-1mb por a de +/-
   400kb e tem uma outra de 242kb eu acho, e tem uma outra que eu ainda
   nao consigui achar de um ouro tamanho. Afinal estou perdido. Agora
   que estou começando a me familiarizar com deplhi !

   o meu windows é XP
   e meu delphi é a versão 7

   Obrigado pela anteção









   --
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

   Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou [EMAIL PROTECTED]



 Yahoo! Grupos, um serviço oferecido por:
 
 
  
 
   


 --
   Links do Yahoo! Grupos

 a.. Para visitar o site do seu grupo na web, acesse:
 http://br.groups.yahoo.com/group/delphi-br/
  
 b.. Para sair deste grupo, envie um e-mail para:
 [EMAIL PROTECTED]
  
 c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
 Serviço do Yahoo!.




 --


   No virus found in this incoming message.
   Checked by AVG Anti-Virus.
   Version: 7.0.308 / Virus Database: 266.6.2 - Release Date: 4/3/2005

   --

 No virus found in this outgoing message.
 Checked by AVG Anti-Virus.
 Version: 7.0.308 / Virus Database: 266.6.2 - Release Date: 4/3/2005


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



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]



 *Yahoo! Grupos, um serviço oferecido por:*

 * 
 http://br.rd.yahoo.com/SIG=12ahs6f2p/M=264105.3931087.6562589.1588051/D=brclubs/S=2137111264:HM/EXP=1110417697/A=2361264/R=6/SIG=10v4acpp0/*http://br.shopping.yahoo.com/*
   


 
 *Links do Yahoo! Grupos*

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

 * Para sair deste grupo, envie um e-mail para:
   [EMAIL PROTECTED]
   mailto:[EMAIL PROTECTED]

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





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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Usando o LOCATE

2005-02-25 Por tôpico Reginaldo

Ola neto , não sei pra que serve o clientdataset, mas vi que essa função é
igual a do componente Table do interbase, vamos la.

function Locate(const KeyFields: String; const KeyValues: Variant; Options:
TLocateOptions): Boolean;

o primeiro parametro você deve passar uma string, essa string devera ser o
nome do campo que vc criou como indice ex: Cod_Cli, o segundo parametro é o
valor que vc quer encontrar na tabela de pesquisa pode ser qualquer tipo
pois é uma constante de tipo variant, o terceiro vc vai dizer a função como
ela vai fazer a pesquisa, ela tem dois valores [ loCaseInsensitive] e [
loPartialKey] , o primeiro valor é sencivel ao valor que esta procurando ex:
se na sua tabela de cliente no campo Nome_Cli tiver o valor ' Neto',
se vc mandar pesquisar ' Net ' faltando o 'o' a função retornará falso que
não encontrou nada, ja com o segundo valor ela retornara o primeiro nome do
cliente que começa com
' Net ' . obs: Se na tabela os dados estão gravados em letras maiusculas a
pesquisa devera ser com letras maiusculas e virce-versa.


- Original Message -
From: Neto [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, February 24, 2005 12:44 PM
Subject: [delphi-br] Usando o LOCATE



Olá, pessoal!

ALguém poderia me dar um exemplo de como usar o Locate corretamente? Estou
tentando usá-lo com ClientDataset e não estou conseguindo filtrar o Dataset
corretamente. Sempre vem vazio.
Estou usando D6 e InterBase.

Agradeço antecipadamente

Neto

Masterserv Serviços Ltda.
Brasília/DF
visite: www.masterservltda.com.br




---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.856 / Virus Database: 583 - Release Date: 07/02/2005


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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos












-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





[delphi-br] Ser Feliz !!!

2005-02-15 Por tôpico Reginaldo Torres

VEJA SÓ... Parece até um EXERCÍCIO para o EGO !!! 



Reginaldo Torres - Analista de Sistemas Sênior
Libra Advanced Solutions - Fábrica de Software / Desenvolvimento
' (17) 3521-3080 ramal 215 /Ê Fax +55 (17) 3522-1717
+ [EMAIL PROTECTED] / www.libraas.com.br 

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/02/2005


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Re: Tquery apanhando!

2005-01-14 Por tôpico Reginaldo Terrabuio

Ok galera.. funcionou... OBRIGADO
  - Original Message - 
  From: Fabrício e Andréia 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 12, 2005 8:27 PM
  Subject: Res: [delphi-br] Re: Tquery apanhando!



  É isso aí, está faltando a configuração correta do parametro, pois não é 
  AsString e sim .AsDateTime ou .AsDate. 

  ---Mensagem original--- 

  De: delphi-br@yahoogrupos.com.br 
  Data: 01/12/05 18:13:27 
  Para: delphi-br@yahoogrupos.com.br 
  Assunto: [delphi-br] Re: Tquery apanhando! 


  Olá, 

Não, porque, ele está dando um outro sql.add que vai para a próxima 
  linha, logo, não vai ficar colado, mas é sempre bom dá um espacinho 
  antes do where. 

Tente assim: 

ParamByName('pardata1').AsDateTime :=  strToDateTime 
  (Timededata2.DateText); 

 ou 

ParamByName('pardata1').AsDateTime :=  strToDateTime 
  (Timededata2.Text); 

 Um abraço, 

 Carlos 

  --- Em delphi-br@yahoogrupos.com.br, Osmar de Souza Júnior 
  [EMAIL PROTECTED] escreveu 
   
   
   Entre a palavra Auditori e Where precisa ter um espaço em branco: 
   A sua query sairá assim: 
   
   Select * from Auditoriwhere data between :pardata1 and :pardata2 
   
   Antes do Open, coloque um showmessage(sql.text), e verá que falta um 
   espaço em branco... 
   
   --- Em delphi-br@yahoogrupos.com.br, Reginaldo Terrabuio 
   [EMAIL PROTECTED] escreveu 
Galera é o seguinte, tenho um Tquery,  e estou tentando rodar o 
   seguinte: 

with QryAudito do 
   begin 
 Close; 
 sql.Clear; 
 sql.Add ('Select * from Auditori'); 
 sql.Add ('where data between :pardata1 and :pardata2'); 
 ParamByName('pardata1').AsString :=  dedata1.DateText;   
  *1 
 ParamByName('pardata2').AsString :=  dedata2.DateText;   
  *1 
 Open; 
   end; 

*1 --  Nesta parte ele não consegue retornar o valor correto à : 
   pardata1, ou seja seria uma data, por exemplo 11/01/2005 
  qnd executo no SQL explorer faço o seguinte e da 
  certo: 

 select * 
 from auditori 
 where data between '01/11/2005' and '01/21/2005' 

será que ele não está colocando o apóstrofo nas datas?  
   correto: '01/11/2005'   incorreto: 01/11/2005. 


Qualquer ajuda é válida, 
  Obrigado! 

   

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





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM  

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

  Para falar com o moderador, envie um e-mail para: 
  [EMAIL PROTECTED] ou [EMAIL PROTECTED] 



  Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE 





  Links do Yahoo! Grupos 

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

  Para sair deste grupo, envie um e-mail para: 
  [EMAIL PROTECTED] 

  O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
  Yahoo!. 




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






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] PopUp pelo Teclado

2005-01-13 Por tôpico Reginaldo Torres


Vc já tentou usar a propriedade 'ShortCut' como opção do componente 'Popup',
pode ser que de certo, não custa tentar . OK valeu.

Reginaldo Torres - Analista de Sistemas Libra Advanced Solutions - Fábrica
de Software / Desenvolvimento ' (17) 3521-3080 ramal 215 /Ê Fax +55 (17)
3522-1717 + [EMAIL PROTECTED] / www.libraas.com.br

- Original Message - 
From: Filipe [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, January 13, 2005 7:53 AM
Subject: [delphi-br] PopUp pelo Teclado




 Bom Dia, galera!

  Estou Desenvolvendo uma Aplicação que utiliza um RxTrayIcon, junto com
um PopUpMenu. Será que alguém saberia uma Maneira de Acionar o PopUpMenu
atravéz de um Atalho do Teclado?


  Obrigado.



  
  Filipe Geyer
  Programador
  [EMAIL PROTECTED]
  www.bludata.com.br




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos










-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.6.11 - Release Date: 12/01/2005





-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.6.11 - Release Date: 12/01/2005






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





[delphi-br] Tquery apanhando!

2005-01-12 Por tôpico Reginaldo Terrabuio

Galera é o seguinte, tenho um Tquery,  e estou tentando rodar o seguinte: 

with QryAudito do
   begin
 Close;
 sql.Clear;
 sql.Add ('Select * from Auditori');
 sql.Add ('where data between :pardata1 and :pardata2');
 ParamByName('pardata1').AsString :=  dedata1.DateText;   *1
 ParamByName('pardata2').AsString :=  dedata2.DateText;   *1
 Open;
   end;

*1 --  Nesta parte ele não consegue retornar o valor correto à : pardata1, 
ou seja seria uma data, por exemplo 11/01/2005
  qnd executo no SQL explorer faço o seguinte e da certo:

 select *
 from auditori
 where data between '01/11/2005' and '01/21/2005'

será que ele não está colocando o apóstrofo nas datas?   correto: 
'01/11/2005'   incorreto: 01/11/2005.


Qualquer ajuda é válida, Obrigado!

   

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Deslocamento de Coluna RDPrint

2005-01-11 Por tôpico Reginaldo Torres


Uma sugestão vc pode desinstalar todo o componente e fazer a instalação
novamente ou ainda pode ser uma coluna sobreposta a outra onde uma esta
invadindo o espaço da outra, é bom dar uma verificada OK

Reginaldo
- Original Message - 
From: Rafael [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br;
[EMAIL PROTECTED]
Sent: Monday, January 10, 2005 6:01 PM
Subject: [delphi-br] Deslocamento de Coluna RDPrint



 Boa tarde a todos !

 Uso o componente RDPrint para imprimir boletos do UniBanco só que me
 deparei com o seguinte erro:
 - Em alguns boletos, inexplicavelmente, o rdprint desloca uma coluna,
 jogando os dados da coluna posterior para trás...
 Por exemplo, a coluna 5 é engolida na hora da impressão, e onde era pra
 sair:
 Rafael
 sai:
 Rafal

 Se o mesmo boleto for impresso novamente, sozinho ou junto com outros, ele
 sai certo... Não há uma lógica ou razão para o erro acontecer...
 simplesmente acontece de vez em quando...

 Pesquisei no site do deltress (fornecedores do componente) e vi que a
 versão 3.0h possuia uma correção para esse tipo de Bug, mas verifiquei a
 minha versão e ela é a 3.0h.

 Este erro complica muito, pois acontece em colunas varidas, as vezes
 pegando parte de data de vencimento ou no valor, que ficam modificados e
 praticamente imperceptíveis após a impressão, só sendo possivel detectar o
 problema se conferindo boleto por boleto.

 Alguem já passou por isso?

 Um abraço a todos,
 agradeço antecipadamente,

 Rafael Amantéa Mogone
 -
 Programador
 ABC Soluções Sistemas de Informação e Automação Comercial
 http://www.abcsolucoes.com.br



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

 Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

 Links do Yahoo! Grupos










 -- 
 No virus found in this incoming message.
 Checked by AVG Anti-Virus.
 Version: 7.0.300 / Virus Database: 265.6.9 - Release Date: 06/01/2005






-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.6.9 - Release Date: 06/01/2005






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





[delphi-br] Recursively uses itself

2004-11-10 Por tôpico Reginaldo M . de Macedo


Montes Claros, 10 de novembro de 2004 

Prezados, 

É uma satisfação estar de volta à lista, depois de tanto tempo. 

Amenidades à parte, o problema é o seguinte: Uso WIN2000, SP4, D7 
Enterprise, GExperts e ReportBuilder específicos para esta versão. Ao 
compilar os aplicativos, recebo o seguinte erro: 

[Fatal Error]: line 1024. Program or unit 'variants.pas' recursively uses 
itself. 

É interessante informar que não consigo compilar e linkeditar sem incluir as 
pastas .\source\... no path library em Tools... Environments Options. 

Por fim, é interessante comentar que uma empresa de software vizinha de sala 
da minha, cujos proprietários são muito amigos, utilizam sistemas em 
configuração igual e nada ocorre com eles. 

Por oportuno, esclareço que trabalho com o Delphi desde a versão 2.0, tendo 
utilizado todas as versões anteriores e não tinha acontecido nada parecido 
desde então. 

Se alguém já passou pelo problema ou tem uma solução, comentário ou oração 
que resolva o caso, por favor, entre em contato. Ficarei muito agradecido. 

Atenciosamente, 

Reginaldo M. de Macedo 
[EMAIL PROTECTED] - [EMAIL PROTECTED] 

_
Quer mais velocidade?
Só com o acesso Aditivado iG, a velocidade que você quer na hora que você 
precisa.
Clique aqui: http://www.acessoaditivado.ig.com.br



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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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

 





Re: [delphi-br] Dúvida Inno SetUp

2004-09-21 Por tôpico Reginaldo Terrabuio
Caro colegas, ontem (20/09/204) estava justamenta trabalhando com ele.


  olha o script ai... mas tem que pegar um zip no site: 
http://www.jrsoftware.org/iskb.php?bde


Files]
Source: MiniReg.exe; DestDir: {tmp}
Source: BdeInst.dll; DestDir: {tmp}
Source: Bbealias.exe; DestDir: {tmp}

[Run]
Filename: {tmp}\MiniReg.exe; Parameters: {tmp}\BdeInst.dll
Filename: {tmp}\Bbealias.exe;

blz!!!

  - Original Message - 
  From: Rodrigo Ribeiro Gonçalves 
  To: Delphi Lista 
  Sent: Tuesday, September 21, 2004 9:12 AM
  Subject: Re: [delphi-br] Dúvida Inno SetUp


  Oseías e Eduardovaleu...vou experimentar as configurações que estão
  no site...

  [ ]'s

  Rodrigo

  Em Ter, 2004-09-21 às 08:15, Eduardo Jedliczka escreveu:
   dê uma olhada na própria página do Inno Setup...
   
   http://www.jrsoftware.org/iskb.php?a=bde
   
   e
   
   http://www.jrsoftware.org/isfaq.php
   
   =
   Eduardo Jedliczka
   GeraSoft Informática
   Apucarana - PR
   =
 - Original Message - 
 From: Rodrigo Ribeiro Gonçalves 
 To: [EMAIL PROTECTED] ; Delphi Lista 
 Sent: Monday, September 20, 2004 5:59 PM
 Subject: [delphi-br] Dúvida Inno SetUp
   
   
 PessoALL,
   
 Tenho uma dúvida com o INNO
   
 Preciso saber como fazer ele instalar automaticamente o BDE...alguém
 sabe??
   
 [ ]'s
   
 Rodrigo
   
   
   
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
   
 Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages
   
 Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
   
   
   
   Yahoo! Grupos, um serviço oferecido por: 
 
   
   
   --
 Links do Yahoo! Grupos
   
   a.. Para visitar o site do seu grupo na web, acesse:
   http://br.groups.yahoo.com/group/delphi-br/
 
   b.. Para sair deste grupo, envie um e-mail para:
   [EMAIL PROTECTED]
 
   c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 
   
   
   
   [As partes desta mensagem que não continham texto foram removidas]
   
   



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

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

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

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