Re: [delphi-br] CONECTAR O BANCO DE DADOS VIA NET COM ZEOSCONECTION

2008-07-04 Por tôpico Itamar Souza
Boa Tarde amigo
 
Você pode conectar utilizando o IP do host que disponibiliza o banco de dados. 
Isto e feito acrescentando “:” (exemplo: 
192.168.0.1:C\Diretório|Banco|NomeBanco.gdb).
 
Veja se lhe ajuda!!


  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]



Re: [OT] - Re: [delphi-br] Função para Atu alizar Estoque

2008-07-02 Por tôpico Itamar Souza
Minha sincera opinião.
 
O pessoal da área de informática, principalmente os programadores são sempre 
assim, todo mundo acha que sabe muito, mais sabe apenas aquilo que sempre fez, 
tem muito programador experiente que escreve muitas linhas de código para fazer 
coisas simples e só ele consegue entender o que fez. Aqui neste fórum basta ter 
uma pergunta que a maioria acha simples ou não coerente para que muitos usem 
isso como ponto para criticas, porque não vão tentar ajudar? Porque não perdem 
o seu valioso tempo com coisas úteis? Participo de outros fóruns e posso afirma 
que este e muito bom mais esta longe de ser o melhor, porque tem muita gente 
aqui que se acha o rei da cocada preta. O que mais tem e programador medíocre 
com seus códigos absurdos e sistemas lixo, sem documentação e sem padrão algum. 
E péssimo ter que falar estas coisas, pois sei que tem muita gente boa que 
realmente ajuda muito, mais a maioria não contribui em nada, apenas fica na 
espera da
 próxima vitima.
 
Acho que está faltando está regra no fórum. Critica não vai ser a melhor 
solução, pois uma coisa que pode simples para alguns pode ser complexa para 
outros, ninguém sabe tudo.
 
As pessoas que vencem neste mundo são as que procuram as circunstâncias de que 
precisam e, quando não as encontram, as criam. 
Bernard Shaw


  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]



Re: [OT] - Re: [delphi-br] Função para Atu alizar Estoque

2008-07-02 Por tôpico Itamar Souza
Muito boa á pergunta.
 
Listo a baixo os motivos pelos quais não pude ajudar.
 
1 – Em primeiro lugar, a resposta inicial a pergunta já foi uma critica, quando 
na verdade deveria ser:
Amigo poste uma descrição mais detalhada do seu problema, para que todos possa 
entender melhor a sua situação.
 
2- Logo em seguida uma tonela de  post que não resolvia o problema apenas 
seguia a mesma linha de raciocínio.
 
3- A pergunta não tinha informações suficientes para se chegar a uma resposta 
viável, e melhor calar que falar besteira.
 
4- A minha experiência em delphi e um seguimento que não tem controle de 
estoque.
 
5 – Já tenho um bom tempo de experiência em delphi e ainda estou aprendendo, 
não sei fazer qualquer função que faça isso ou aquilo, procuro estudar muito e 
só em último caso eu posto na lista.
 
6 – Não tive a intenção que indagar ninguém em especial, apenas dei minha 
sincera opinião em relação à área de programação. 
 
Estas são algumas das questões que acredito ser o motivo pelo qual eu não 
ajudei a resolver o problema.
 
Informação é a moeda corrente da era do conhecimento.


  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]



Re: [delphi-br] Atualiza Status

2008-06-26 Por tôpico Itamar Souza
Você pode fazer isso de varias formas, vai depender do resultado final.
 
Ex. pega um componente da paleta Data Controls.
” DBRadioGroup” na propriedade values você coloca suas opções :
Emprestado
Disponivel
Estes valores serão gravados no banco, recomendo você usar “S” ou “N” fica mais 
fácil.
Vai em “Itens” e coloca as opções que você vai visualizar no formulário na 
mesma seqüência das alternativas. Depois e só ligar o seu datasource, datafiel 
o campo que será usado para a gravação.
 
Espero ter ajudado!!


  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]



[delphi-br] - List index out of bounds (0).

2008-06-24 Por tôpico Itamar Souza
Muito grato mesmo amigo
   
  Mais eu 
   
  Alterei o layout do arquivo de importação acrescentando “;  agora o código 
consegue fazer a gravação corretamente dos dados.
  Mais ao concluir a importação gera a seguinte mensagem de erro:
  Exception class EstringListError with message ‘List index out of bounds (0).
   
  3351781;MARIA DA PENHA 
CAUS;69601640444;055;021;46671479;015;46687415;013;48879253;
  3351781;MARIA DA PENHA 
CAUS;69601640444;055;021;46671479;015;46687415;013;48879253;
  3351781;MARIA DA PENHA 
CAUS;69601640444;055;021;46671479;015;46687415;013;48879253;
  3351781;MARIA DA PENHA 
CAUS;69601640444;055;021;46671479;015;46687415;013;48879253;
  3351781;MARIA DA PENHA 
CAUS;69601640444;055;021;46671479;015;46687415;013;48879253;
  3351781;MARIA DA PENHA 
CAUS;69601640444;055;021;46671479;015;46687415;013;48879253;
   
  Agradeço a ajuda
  
 

   
-
Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.

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



RE: [delphi-br] - List index out of bounds (0).

2008-06-24 Por tôpico Itamar Souza
Já estou pesquisando a horas uma solução para este problema, preciso da ajuda 
do grupo delphi-br. referencia inexistente
   
  segue o meu codigo:
  
procedure TfrmImportacao.btnImportaClick(Sender: TObject);
var
  fArq: TextFile;  //Variável do Tipo Arquivo de Texto
  Caminho: string; //Variável que armazenará o caminho
  Linha: string;   //Variável que vai armazenar cada linha
  mTexto: TStringList; //Utilizada para contar as linhas a importar
  i: integer;  //variável utilizada no contador de linhas Importadas
  sl_linha:TStringList;
begin
  Caminho := editArquivo.Text; //Variavel vai receber os dados do edit
  AssignFile(fArq, Caminho);
  ReSet(fArq);
  mTexto := TStringList.Create;
  sl_linha:=TStringList.create;
  sl_linha.Delimiter:=';';
  try
mTexto.LoadFromFile(Caminho);
ProgressBar1.Max := mTexto.Count - 1;
i := 0;
  finally
mTexto.Free;
  end;
  while not Eof(fArq) do  //Enquanto não chegar ao fim do arquivo
  begin
Application.ProcessMessages;
Readln(farq, linha); //Lê a linha e posiciona o cursor na próxima
sl_linha.DelimitedText := linha;
frmImportacao.Caption := 'Lendo Linha: ' + IntToStr(i) + ' de: ' + 
IntToStr(ProgressBar1.Max);
  DM.cdsImportacao.Open;  //Abre o CDS
  //
if DM.cdsImportacao.IsEmpty then //Se Não existir o registro
   DM.cdsImportacao.Append //Insira os dados da linha atual
else //Senão, se o registro já existir
   DM.cdsImportacao.Append; // mesmo ezistindo ele inseri
   //Aqui os campos recebem as linhas lidas
   DM.cdsImportacaocod_integracao.AsString :=sl_linha[0];
   DM.cdsImportacaonome.AsString   :=sl_linha[1];
   DM.cdsImportacaocontato.AsString:=sl_linha[2];
   DM.cdsImportacaoddi.AsString:=sl_linha[3];
   DM.cdsImportacaoddd.AsString:=sl_linha[4];
   DM.cdsImportacaofone.AsString   :=sl_linha[5];
   DM.cdsImportacaoddd_2.AsString  :=sl_linha[6];
   DM.cdsImportacaofone_2.AsString :=sl_linha[7];
   DM.cdsImportacaoddd_3.AsString  :=sl_linha[8];
   DM.cdsImportacaofone_3.AsString :=sl_linha[9];
   DM.cdsImportacao.Post; //Salve o registro em memória
   DM.cdsImportacao.ApplyUpdates(0); //Aplica as atualizações em memória no 
banco
   DM.cdsImportacao.Close;  //Fecha o CDS }
   Inc(i);
   ProgressBar1.Position := ProgressBar1.Position + 1;
  end;
   ShowMessage('Processo Concluído Com êxito!!!');
   DM.cdsImportacao.Close;
   btnImporta.Enabled:=False;
 end;

   
-
Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.

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



RE: [delphi-br] Alterando delimitador de um arquivo txt para ';'

2008-06-23 Por tôpico Itamar Souza
Boa tarde deu certo, mais ocorre o seguinte:
   
  Agora debugando o código verifique que :
  DM.cdsImportacaocod_integracao.AsString esta pegando o valor correto. Mais em 
DM.cdsImportacaonome.AsString esta pegando apenas o 1 nome, como o restante do 
nome esta com “espaço’ ele esta jogando o resto para o outro campo, gerando 
erro.
   
  Agradeço a ajuda!!

   
-
Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.

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



RE: [delphi-br] Alterando delimitador de um arquivo txt para ';'

2008-06-23 Por tôpico Itamar Souza
Amigo, nem sei como lhe agradecer.. estava a dias tentando resolver este 
problema, tentei de todas as formas e ninguem respondia uma coisa certa.
   
  So houve um pequeno problemas 
  // DM.cdsImportacaocontato.AsString   := mLinhaTexto[2];
   
  nesta linha tive que comentar pois gerava um erro, pegava um valor totalmente 
diferente..
   
  Se possível gostaria de saber quanto ficaria para você me dar uma 
consultoria, pois estou com um projeto novo e tem algumas coisa que estou em 
dúvida, ou seja até consigo fazer o código mais sempre falta alguma coisa que 
trava o meu trabalho.
   
  Caso aceite me ajudar , podemos nos falar a noite pelo msn : [EMAIL 
PROTECTED] ou me enviar um telefone ou celular que eu ligo para conversarmos.
   
  Muito grato!! 
   

   
-
Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.

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



Re: Res: [delphi-br] Ajuda com Importação de dados em TXT

2008-06-20 Por tôpico Itamar Souza
Boa Tarde Jean
   
  Após verificar o código, encontrei os campos que gerava  erro, mais pude 
verificar que os campos inseridos na base está com as informações pela metade.
  Ex: 
  Código no txt = 1343489
  No Banco = 1343489 
  Nome no txt = KATIA LUCIATO DE OLIVEIRA  
  No Banco = IA LUCIATO DE OLIVEI
  Produto no txt = 37740858897
  Produto no banco = E OLIVEIRA
   
  Como proceder para contar os campos de forma que esteja correto? Acredito que 
o erro deva ser o fato de esta jogando parte de uma informação de um campo em 
outro diferente.
   
Agradeço a ajuda,
   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Sistema de Ftp no delphi

2008-06-10 Por tôpico Itamar Souza
Valeu mesmo Marços
   
  Vou pesquisar um pouco mais.
   
  Muito grato!!

Marcus Vinicius Pavan [EMAIL PROTECTED] escreveu:
  Meu caro.
Componente idFTP / INDY
É só pesquisar no google que vc acha toneladas de exemplos. Tem para todo gosto 
!
[]´s

Pavan.
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.

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



   

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: RES: [delphi-br] Gravar caminho de imagens no registro do windows

2008-06-05 Por tôpico Itamar Souza
Muito Obrigado..
   
  Carregando o caminho do arquivo, adicionei na uses a instrução “FileCtrl”
   
  procedure TForm1.BitBtn1Click(Sender: TObject);
  var
Dir : String;
  begin
if SelectDirectory('Selecione um diretório.','',Dir) then
  editImagem.Text := Dir;
  end;
   
  De certo... valeu!!
   
   


   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: RES: RES: [delphi-br] Gravar caminho de imagens no registro do windows

2008-06-05 Por tôpico Itamar Souza
 Desculpa, não expressei bem..
  O que quis dizer e o seguinte.. após gravar o novo caminho para armazenar as 
imagens, o sistema só reconhece esta alteração apos ser reiniciado.
 alguém saberia como fazer esta atualização de forma automática? 
 

Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu:  
   Eu não entendi. Que parâmetro?
 
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de itasouza
 Enviada em: quinta-feira, 5 de junho de 2008 16:24
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: RES: [delphi-br] Gravar caminho de imagens no registro do windows
 
 Amigos..
 
 Apos determinar o caminho da pasta onde será gravado as imagens tenho
 em uma outra tela um comando de inserir a imagem. Onde consigo gravar
 a imagem na pasta configurada no parametro. O problema e que o
 sistema só reconhece uma alteração feita no parametro se fechar o
 sistema e abri-lo novamente, alguém saberia como fazer esta
 atualização de forma automática?
 
 Agradeço a ajuda!!
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
   

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Delphi for PHP 2

2008-04-15 Por tôpico Itamar Souza
Está e uma ótima notícia, pois já estou testando deste a versão 1
  preciso baixar uma demonstração e verificar isso.
   
  Espero que a codegear possa melhorar a qualidade do help pegando
  como exemplo o help do Flex da Adobe. 
   
  att..

 between -00-00 and -99-99   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Passar parâmetros para a que ry!

2008-04-02 Por tôpico Itamar Souza
Bom dia
   
  Seguindo a lógica do amigo Moacir poderia ser feito assim.
   
  Você tem um cadastro de Turma e precisa preencher o campo curso, o curso deve 
ter uma consulta para que possa pesquisar o mesmo. Sendo assim, você pode 
colocar no events OnDblClick do grid o seguinte código.
   
  procedure TfrmConsultaCurso.DBGrid1DblClick(Sender: TObject);
  begin
//
DM.CdsCadTurma.Close;
DM.CdsCadTurma.Params[0].Value := DM.CdsConsCursoIDCURSO.Value;
DM.CdsCadTurma.Open;
close;
  end;
   
  Agora você manipula os dados que vão ser retornados infomando que um 
determinado campo do cadastro turma terá o seu valor (.text) igual a:
   
  DM.CdsConsCursoNOMECURSO
   
  E demais campos que achar necessário.
   
  Espero ter ajudado.
   
  Caso alquém tenha uma outra solução, e só posta.

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Re: Res:SOAP com SSL

2008-03-31 Por tôpico Itamar Souza
Bom dia
   
  Apos você ter colocado o HTTPRIO você vai abri o navegador acessar o 
Webservice, clicar em WSDL de do serviço que você criou e copiar a última linha 
de endereço URL do texto  XML apresentado. Você precisa fazer referencia as 
Unit’s IDM e Iservicos (ALT-F11).
   
  Apos isso você podera importar (WSDL Importer), abrindo o webservice clicar 
em WSDL de IDM (seu madamodulo) e copiar o endereço do navegador:
   
  http://localhost/webescola/meuWebService.exe/wsdl/IDM
   
  veja se isso lhe ajuda.

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Res:SOAP com SSL

2008-03-28 Por tôpico Itamar Souza
Usando o HTTPRIO você tera que usar o WSDLImporter para importar as interfaces 
que se encontra no servidor web e implementam as funcionalidades do webservice 
a serem consumidas pelo projeto cliente.
   
  Você pode usar uma solução baseada em conectividade por intermédio dos 
agentes Cliente SOAP e Servidor SOAP, disponibilizados por um Webservice 
fazendo o acesso direto ao banco com a conexão SOAP.
  Basta colocar um datamodulo e um componenente SoapConn e pega o endereço que 
esta no webservice e copia a linha URL do texto XML e conectar.
   
  O resto e igual, coloca os clientDataset e fazer a conexão se você tiver 
usando multicamadas o RemoteServer será o SoapConn e o ProviderName será o 
ClientDataset do seu servidor de conexão, neste caso “executar o Fetch Params e 
AddAllFields”
   
  Veja se isso pode lhe ajuda!!
   

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



RE: [delphi-br] Organizar arquivos

2008-03-28 Por tôpico Itamar Souza
Boa Tarde
   
  Dentro da mesma pasta do seu projeto você pode ter várias pastas para separar 
os fontes de forma que fique mais organizado, mais quando precisa tira os 
arquivos de um determinado local tera que altera o caminho.
   
  Faz um teste alterando os caminhos que estão em:
  Project / Options/ Directories/Conditionals
   
  Espero ter ajudado..

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Criar Documentos

2008-03-28 Por tôpico Itamar Souza
Boa Tarde
   
  No meu ponto de vista acredito que ficaria mais fácil você tratar estas 
informações persistindo dados no formato xml caso você esteja utilizando o 
ClientDataSet o mesmo tem a capacidade de salvar e recuperar dados em um 
arquivo de dados no formato DataPackageXML.
   
  Para fazer isso, você adiciona dois novos componentes, “OpenDialog” e 
“SaveDialog” da palheta Dialog, acrescente tambem na cláusula Uses, a 
biblioteca  DBClient.
   
  Ai então basta você acrescentar um botão para executar a geração do arquivo 
no formato xml e outro para obtenção dos dados.
   
  .. salvar XML
   
  procedure TForm1.btSalvarXMLClick(Sender: TObject);
  begin
if SaveDialog1.Execute then
  begin
  DM.CdsConsTeste.SaveToFile(SaveDialog1.FileName,dfXML);
  end;
  end;
   
  ..Ler dados XML
   
  procedure TForm1.btSalvarXMLClick(Sender: TObject);
  begin
if SaveDialog1.Execute then
  begin
  DM.CdsConsTeste.LoadFromFile(SaveDialog1.FileName,dfXML);
  end;
  end;
   
  Espero ter ajudado!!

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Tratamento de exceção no d elphi

2008-03-26 Por tôpico Itamar Souza
Boa tarde amigos
   
  O processo esta rodando corretamente, mais quando disconecto scktsrvr.exe 
  ele gera o erro pois não encontra o serviço. O problema e tratar este erro.
   
   
  Att.. 
  
 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Form é fechado, mas memóri a continua a mesma ?????

2008-02-25 Por tôpico Itamar Souza
Bom dia Flavio
   
  Geralmente faco isso para chamar um formulário e ao fecha-lo o mesmo saira 
  da memória.
   
  procedure TFMenu.Clientes1Click(Sender: TObject);
begin
  try
FConsClientes := TFConsClientes.Create( Application );
FConsClientes.ShowModal;
  finally
FreeAndNil( FConsClientes );
  end;
end;

   
  t+

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



[delphi-br] Projeto - Analise Específico

2007-12-21 Por tôpico Itamar Souza
Bom dia Clovis
   
  Preciso que você verifique este arquivo e veja quando custa para você fazer 
igual a este, o mesmo serve para avisar ao usuário que tem algum atendimento em 
espera, o sistema on-line já esta na web, precisava apenas disso de forma 
personalizada, pois isso ficaria na maquina local .
   
  Veja o quanto antes.
   
  Atenciosamente 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

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



Re: [delphi-br] Delphi + Zeos + MySql

2006-11-01 Por tôpico itamar

para quem usa o MySql n Windows,

eu nao abro ele como serviço, e sim como uma aplicação
crio um atalho para mysqld-nt.exe e nalinha de comando do atalho coloco 
o seguinte

D:\mysql\bin\mysqld-nt.exe --flush

este comando -flush  mantem o cache descarregado a cada transacao e eu 
nao tenho problemas de performace...



- Mensagem de [EMAIL PROTECTED] -
Data: Tue, 31 Oct 2006 15:36:10 -0300
De: Andre Mesquita [EMAIL PROTECTED]
Endereço para Resposta (Reply-To): delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Delphi + Zeos + MySql
  Para: delphi-br@yahoogrupos.com.br


 Agradeço pela informações.

 Eu tinha esquecido de avisar que o MySql é o 4.0 e roda sob Linux.

 [ ]'s

 - Original Message -
 From: Eduardo Silva dos Santos [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Tuesday, October 31, 2006 11:46 AM
 Subject: Re: [delphi-br] Delphi + Zeos + MySql


 Perda constante com o servidor mysql geralmente é na configuração do Timeout
 no my.ini.  se não resolver vou te mandar o meu my.ini .

 Em 31/10/06, Douglas Uesato - Depto. de Informática [EMAIL PROTECTED]
 escreveu:

 André,

Eu consegui resolver isso depois que eu baixei a LibMySQL.dll
 atualizada do site mysql.com .



 Atenciosamente,
 Douglas Uesato

 
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
 nome de Andre Mesquita
 Enviada em: segunda-feira, 30 de outubro de 2006 19:26
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Delphi + Zeos + MySql

 Galera,

 Alguém aí já teve alguma aplicação utilizando Delpli + Zeos + MySQL que
 acontecia perda constante de conexão com o banco de dados? Caso positivo,
 como foi solucionado?

 [ ]'s,

 Andre





 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos






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


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



 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos





 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos







- Final da mensagem de [EMAIL PROTECTED] -





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

 



Re: [delphi-br] Impressão de Texto - Genérico

2006-10-04 Por tôpico Itamar Roloff

//---//
Itamar B. Roloff
Analista de Sistemas - Delphi 7 Mysql 5
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
//---//

- Original Message - 
From: Eduardo Silva dos Santos [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, October 03, 2006 10:57 PM
Subject: Re: [delphi-br] Impressão de Texto - Genérico


Sugiro que vc descubra o fabricante da impressora e seu respectivo site,
geralmente neste site vai existir vários exemplos de como imprimir.

Em 03/10/06, voodoorv [EMAIL PROTECTED] escreveu:

 Olá pessoal, preciso imprimir em uma daquelas impressoras pequenas,
 tipo fiscal mas não é fiscal, me indicaram a criar uma impressora
 genérica só texto no windows.
 Criei a impressora, sem problema.

 Alguém sabe os comandos para mandar imprimir nesta impressora ?

 Que tamanho de papel tenho que deixar ?

 Grato

 Ricardo





 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 Links do Yahoo! Grupos











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


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos










__ Informação do NOD32 IMON 1.1788 (20061003) __

Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.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

 





Re: [delphi-br] Dúvida Impresso Fiscal

2006-10-02 Por tôpico Itamar Roloff
estas impressora basta imprimir diretamente na sua porta usando o writln()
ex:

assignfile(F,'SUA_PORTA')  // pode ser com1,com2,lpt1
rewrite(F);
writeln(F,'Teste de impressao');
closefile(F);

//---//
Itamar B. Roloff
Analista de Sistemas - Delphi 7 Mysql 5
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
//---//

- Original Message - 
From: voodoorv [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Sunday, October 01, 2006 9:31 PM
Subject: [delphi-br] Dúvida Impresso Fiscal


Olá pessoal, desenvolvi um sistema para um amigo meu dono de pizzaria,
e preciso imprimir o pedido em uma impressora pequena fiscal, o modelo
dela é PROCOMP IMP-5900, não estou conseguindo fazer nada, alguém sabe
onde posso encontrar o driver e como imprimir pelo delphi nestas
impressoras.

Aguardo ajuda de vocês e Obrigado

Ricardo






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos










__ Informação do NOD32 IMON 1.1784 (20060929) __

Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.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

 





Re: [delphi-br] Geração de etiquetas com FORTES RE PORT - D7 - FB 1.5.3

2006-10-01 Por tôpico Itamar Roloff
como sao pouco campo o modo mais facil e gerar uma tabela temporaria com as 
quantidades e rodar as etiqueta a partir desta tabela

//---//
Itamar B. Roloff
Analista de Sistemas - Delphi 7 Mysql 5
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
//---//

- Original Message - 
From: Allan [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]; brDelphi - BR 
delphi-br@yahoogrupos.com.br
Sent: Friday, September 29, 2006 7:53 PM
Subject: [delphi-br] Geração de etiquetas com FORTES REPORT - D7 - FB 1.5.3


Prezados,é o seguinte, gero etiquetas de preço assim:
NOME DO PRODUTO HNOME DO PRODUTO XNOME DO 
PRODUTO Y
VALOR:200,00 VALOR: 15,39 VALOR: 152,84
IMAGEM BARRA CODIGOINTERNO   IMAGEM BARRA CODIGOINTERNO  IMAGEM BARRA 
CODIGOINTERNO
NOME DO PRODUTO KNOME DO PRODUTO NNOME DO 
PRODUTO G
VALOR:50,00 VALOR: 55,85 VALOR: 15,84
IMAGEM BARRA CODIGOINTERNO   IMAGEM BARRA CODIGOINTERNO  IMAGEM BARRA 
CODIGOINTERNO
NOME DO PRODUTO QNOME DO PRODUTO WNOME DO 
PRODUTO J
VALOR:520,00 VALOR: 1,39 VALOR: 12,50
IMAGEM BARRA CODIGOINTERNO   IMAGEM BARRA CODIGOINTERNO  IMAGEM BARRA 
CODIGOINTERNO


o problema é que ele deveria gerar 5 etiquetas do produto H, 4 do produto Y, 
8 do produto, 5 do produto K, 2 do produto N, etc
estou usando uma rlgroup, dentro dela um rldetailgrid com 3 colunas, ate ae 
tdo certo, está imprimindo blz, só que não sei como fazer com que ele gere 
de acordo com a quantidade que está no campo quantidade na mesma 
tabela(estoque), como fazer com que ele gere a qtde que eu quizer de cada 
etiqueta/produto.

Obrigado pela ajuda pessoal.

DEUS É PAI.

Atenciosamente,
Allan Gabriel
Concórdia - SC
(49) 8812-1518
msn [EMAIL PROTECTED]
Skype allan_gabriel

Conheça o grupo OPEN PDV, acesse:
http://br.groups.yahoo.com/group/OpenPDV


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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos










__ Informação do NOD32 IMON 1.1784 (20060929) __

Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.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

 




Re: [delphi-br] INICIO DE UM MEMO EM DBGRID

2006-05-25 Por tôpico itamar Roloff



voce pode testar se a linha 1 do memo esta vazia
se estiver coloca na linha 1 o seu inicio do memo

nao lembro a sinraxe correta
parece que é memo.items[0].asstring := 'Codigo Nome OBS
endereço'

- Original Message - 
From: Allan [EMAIL PROTECTED]
To: brDelphi - BR delphi-br@yahoogrupos.com.br
Sent: Wednesday, May 24, 2006 9:36 PM
Subject: [delphi-br] INICIO DE UM MEMO EM DBGRID


Desculpem a msg de antes, falta completar, (é que dei acidentalmente um CTRL
+ ENTER);por exemplo:
Codigo Nome OBS
endereço
01 Pedro S. F Teste Observações do cliente fulando de ta..
Rua dos testes etc etc

Vejam que no campo OBS ele ficou com as reticências, esse é um campo blob
sub Type 1.Como fazer isso pessoal.

Obrigado pela atenção e compreensão.

[]s
Allan.


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]






  




  
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!.












Re: [delphi-br] DbExpress

2006-05-04 Por tôpico itamar Roloff



use ZEUS 6.5.1 tem acesso nativo ao Oracle e outros

itamar roloff
[EMAIL PROTECTED]

- Original Message - 
From: Fabio Costa [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, May 02, 2006 8:56 AM
Subject: [delphi-br] DbExpress


Estou tendo alguns problemas com o DbExpress e gostaria de saber se
alguém pode me ajudar.

É um sistema Cliente/Servidor, portanto a aplicação fica na estacão
que acessa o banco de dados (Oracle 8i) no servidor.

1) Um dos problemas que eu vejo de cara é o arquivo DbxConnections.Ini
que tem que ser disponibilizado para o usuário junto com a aplicação.
Acontece que este arquivo possui a senha de acesso ao banco de dados
em um arquivo TXT.

2) Quando mandamos a aplicação atualizada para as estações, reclama
que o arquivo dbxconnections.ini não foi encontrado, mesmo ele
estando na estação (o que eu já disse que não concordo pela falha de
segurança).

3) Outras vezes ele reclama de violação de acesso na Ntdll.dll.

Como resolver estes problemas? Como eu distribuo uma aplicação
Cliente/Servidor na minha rede?

Agradeço antecipadamente qualquer ajuda que voce possa me dar.

Obrigado.






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]






  




  
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!.











Re: RES: [delphi-br] MESTRE / DETALHE - ClientDataSet

2006-04-25 Por tôpico itamar Roloff



QRY_PROPRIETARIOS.Locate('codigo',CurrencyEdit1.Text,
[loCaseInsensitive,loPartialKey]);

COLOCA ISTO NO EVENTO ONKEYLOCKUP DO SEU PONTE DE PESQUISA

COLOCA UM DBGRID E OBSERVA O RESULTADO
PODE SER UMA QUERY COM 100.000 REGISTRO NAO TEM FILTRO SOMENTE
POSIOCIONAMENTO

---
Itamar Roloff - Analista de Sistemas
[EMAIL PROTECTED]

- Original Message -
From: Francisco Thiago [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, April 25, 2006 11:33 AM
Subject: Re: RES: [delphi-br] MESTRE / DETALHE - ClientDataSet


 A solução que eu encontrei foi simples:

 Fazer um filtro para o lookup.

 O problema é o fetch all que o lookup precisa. Correto? e se por acaso o
 usuário informasse parte de uma pesquisa antes?

 Suponamos que ele quer lookupear um cliente. Não preciso trazer todos.
Crio
 apenas uma forma de o usuário digitar, por exemplo Francisco,apertar
enter
 e automaticamente o Lookup será preenchido com todos os cliente que
começam
 com Francisco. Isso parte do princípio de que o usuário sabe parte da
 informação que ele quer lookupear. Se não souber, toca fogo nele, ou cria
 uma telinha de pesquisa.

 E pronto! vc conseguiu fazer um lookup! Só dói um pouquinho... mas é
 temporário.


 Espero ter ajudado


 Francisco Thiago de Almeida
 Enter  Plug Informática
 Divisão: Desenvolvimento e Banco de dados
 Franca / SP
 msn: [EMAIL PROTECTED]
 http://enterplug.no-ip.com/sistema_ctrc/



 ___
 Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular
e anti-spam realmente eficaz.
 http://br.info.mail.yahoo.com/


 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 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]






  




  
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!.











Re: RES: [delphi-br] MESTRE / DETALHE - ClientDataSet

2006-04-25 Por tôpico itamar Roloff



no momemto em que voce ja tem umm te]la com o nome do cliente ou cnpj ou cpf
em um dbgrid para busca este memtodo que estou usando nao pesa em nada pois
ele faz a varredura em cima do cursor que esta no grid e nao tem trafego de
rede ou atualizacoes do tipo.
se a tela ja esta montada e visivel nao importa se tem 1 ou 10 registro
o seu trafego nao é alterado simplesmento o ponteiro é deslocado no cursor

Faca um teste e me retorne oresultado.]


- Original Message -
From: Luis Lopes [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, April 25, 2006 4:29 PM
Subject: Re: RES: [delphi-br] MESTRE / DETALHE - ClientDataSet


Itamar,

Mas ae o fetch nos 100.000 registros, não?! E como fica memória, tráfico de
rede? etc.?

 []´s

Luis Alberto
Belo Horizonte - MG


-
 Yahoo! Search
 Imposto de Renda 2006: o prazo está acabando. Faça já a sua declaração no
site da Receita Federal.

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]






  




  
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!.











Re: RES: [delphi-br] MESTRE / DETALHE - ClientDataSet

2006-04-25 Por tôpico itamar Roloff



logico que tem este custo.
mas em uma carteira de imoveis por exemplo para se lancar o movimento de
contas para gerar a cabrança no final do mes nao tem como fazer um select
quarquer para diminuir o trafego de rede, temos que trabalhao o a tabela
toda por isso faco um cusrsor somente com os campos de pasquisa para
diminuir o trafego da rede e isso so ocorre na abertura do formulario.

- Original Message -
From: Luis Lopes [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, April 25, 2006 5:21 PM
Subject: Re: RES: [delphi-br] MESTRE / DETALHE - ClientDataSet


Mas tem um gargalo aí, em termos de rede, quando da busca desses 100.000
registros e esses 100.000 vai estar comendo memória, certo? E o custo disso
em termos de performance e uso de memória? Como é que fica? Tem idéia?

[]´s


Luis Alberto
Belo Horizonte - MG


-
 Yahoo! Messenger com voz - Instale agora e faça ligações de graça.

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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]






  




  
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!.











Re: [delphi-br] Filtrar um arquivo específico! Me dá uma força!

2006-04-02 Por tôpico itamar
ACRECENTE NO SEU PARAMETRO O NOME DO ARQUIVO A SER DESCOMPACTADO OU MASRCARA
EX:  *.DOC
OU
MEU_ARQUIVO.TXT


Itamar B. Roloff - Analista de Sistemas.
[EMAIL PROTECTED]
[EMAIL PROTECTED]

- Original Message - 
From: conexaoi [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Sunday, April 02, 2006 8:10 AM
Subject: [delphi-br] Filtrar um arquivo específico! Me dá uma força!


Gente consegui descompactar o arquivo,  mas extrai todos os arquivos,
eu queria especificar somente um. Eu não queria usar nada externo:
zipmaster, abrevia, .

Eu usei este código abaixo! tá fincionando???

==
Descompactar:

WinExec(PChar('c:\arquivos de programas\winzip\winzip32.exe' +' -min -
e '+'c:\arquivo.zip'+' '+''+'c:\destino\teste'+''),sw_ShowNormal);

Mesmo esquema, só que agora:
'c:\arquivo.zip' ..: Nome do arquivo .zip
'c:\destino\teste' ..: Local destino onde os arquivos contidos no .zip
serão extraidos.


alguém por favor me ajudeEE! Eu ainda to aprendendu. : )





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]
 
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] Banco Não Grava Informações

2006-01-30 Por tôpico itamar
ola,
ja me aconteceu isto.
so que uso mysql 3,5XX
para resolver execute o mysql em linha de comnado ou via algum gerenciador o 
comando repair table sua_tabela

isso pode ter acontecido por quebra de indice interno do mysql


ps- na chamada do MEU mysql eu uso o programa MYSQLOd.exe --flush
isso da um commit a cada transacao do banco e nao deixa quebrar os indices




Citando Cleiton [EMAIL PROTECTED]:

 Olá pessoal ...
 
 Está me acontecendo algo um tanto quanto curioso, do qual fiz diversas
 tentativas de resolver o problema e ainda não consegui.
 
 Para título de curiosidade estou usando MySql 4.1 e delphi 7.
 
 O que acontece é o seguinte:
 
 Tenho uma tabela cliente que entre outros campos tem:
 
 * sexo - campo do tipo varchar (1) que indica o sexo do cliente. O campo é
 obrigatório.
 
 * cidade_empresa - campo do tipo integer que indica a cidade onde se
 localiza a empresa onde o cliente trabalha e que faz referência a tabela
 cidade, ou seja, é uma chave estrangeira. Esse campo não é obrigatório.
 
 O que acontece é que após prenchido corretamente todos os dados do
 formulário de cadastro do cliente, salva-se as informações. Acontece que,
 não porque acontece mas, os campos sexo e cidade_empresa ficam em branco no
 formulario e acaba não gravando nada no banco. Não aparece nenhuma mensagem
 de erro e quando vou verificar no banco, todas as informações foram
 gravadas, apesar do campo sexo ser obrigatorio.
 
 Fiz um teste e inseri essas informações usando o Mysql Front. Aí na
 formulário aparece as informações que eu coloquei mas se tentar alterar
 acontece a mesma coisa quando vou inserir novos dados, mas mantendo a
 informação anterior que foi colocada no banco pelo MySql Front.
 
 No campo sexo estou usando um DBComboBox e no campo cidade_empresa estou
 usando um DBEdit. Já a inversáo dos dois componentes nesses campos e
 acontece a mesma coisa.
 
 Alguém do grupo já passou por isso? Ou alguém tem idéia de como resolver
 esse problema?
 
 um grande abraço a todos
 
 Cleiton
 -- 
 Esta mensagem foi verificada pelo sistema de antivírus e
  acredita-se estar livre de perigo.
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
  
 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]
 
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] Ajuda: ClientDataSet + XML

2006-01-03 Por tôpico Itamar
basta vc tratar o evento do botao cancelar e nao realizar a carga de dados
pois vc esta tentando caragare NADA noa houve selecao

_
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
analista de sistemas - Rio Grande - RS
--

- Original Message - 
From: Welson Avelar [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, January 03, 2006 9:19 AM
Subject: Re: [delphi-br] Ajuda: ClientDataSet + XML


-x-
ediberto_alves escreveu:

  Primeiramente um PRÓSPERO 2006 pra todos! Muita saúde, alegria, paz,
harmonia, realizações...e claro, muita $$$ no bolso :D  .

Estou com um problema num cds + xml. Abaixo segue a procedure:

procedure TfrmInventario.btnAbrirBDClick(Sender: TObject);
begin
  if opendialog.Execute then
cdsInventario.FileName := opendialog.FileName;
  cdsinventario.Close;
  if not cdsinventario.Active then
cdsInventario.Open;
end;

Ou seja, ao clicar no botão, o opendialog é aberto e o usuário caminha
no drive até encontrar o arquivo XML, ao selecionar vai tudo OK,
carrega o XML num dbgrid, agora se o usuário cancela o opendialog,
quando está procurando o arquivo. Acontece o seguinte erro:

cdsInventario: Missing data provider or data packet

Tem alguma forma de tirar esse erro???

Agradeço antecipadamente.

Abraços.
-x-

  [Welson] Coloque dentro de um Try/Except.

  procedure TfrmInventario.btnAbrirBDClick(Sender: TObject);
begin
try
if opendialog.Execute then
  cdsInventario.FileName := opendialog.FileName;
cdsinventario.Close;
  if not cdsinventario.Active then
cdsInventario.Open;
  except
abort; //faz uma saida silenciosa, sem retornar erro.
end;

  Esse erro aí tá ocorrendo porque se você não especificar um arquivo em
FileName, ele ainda tentará abrir o CDS, mas irá gerar o erro, pois
afinal, não tem arquivo algum especificado, sacou ?!

  Abraços...


=
Nunca ande pelo caminho traçado, pois ele conduz somente até onde os outros
já foram.
Alexander Graham Bell
=
Welson de Avelar Soares Filho
Programador Delphi
Gemini Sistemas
www.geminisistemas.com.br
Juiz de Fora - Minas Gerais
=

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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

2006-01-02 Por tôpico Itamar
regra simples:
se vc estiver usando SQL (componente) para a insercao fica facil;
faca um select em sua tabela usando o dados do seu XML
verifique o rescordcount da pesquisa se for  0 esta o registro ja existe
nao execute a insercao

caso o recordcount = 0 deve inserir
bom ano novo
_
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
analista de sistemas - Rio Grande - RS
--

- Original Message - 
From: Caio [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, January 02, 2006 9:45 AM
Subject: [delphi-br] XML


Olá Pessoal,

estou trabalhando com XML e tenho algumas duvidas,
tenho uma tabela a qual exporto os registros para XML e depois em outro
sistema que tenha uma tabela com a mesma estrutura tento importar.
Eu consgido mas o problema é que estou passando por todos os registros do
XML e fazendo um insert pra cada um ... gostaria de saber se consigo jogar o
data source direto na tabela sem que tenha que fazer os inserts de todos os
registros.

Uma outra dúvida é que essa tabela que eu importo o XML não pode conter
registros duplicados então como eu faria para inserir apenas os registros
diferentes?

Eu tentei jogar todos os registros em uma tabela temporaria e depois usar a
função SQL MINUS para inserir mas não estou conseguindo.

Já me ajudaria muito se eu conseguisse selecionar da primeira tabela apenas
os registros que não tem na segunda.

Desde já agradeço pela Atenção

--
Atenciosamente,
Caio


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





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]
 
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] I/O error 32??

2006-01-02 Por tôpico Itamar
este erro ocorre quando vc abre um arquivo para escrita e gravacao:
assignfile(F,teste.txt);
rewrite(F);


da um erro no seu sistema ou
vc nao esta fechando ele com
fileclose(F);
na saida da sua rotina

e tenta abrir ele novamente;

bom ano novo!!
_
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
analista de sistemas - Rio Grande - RS
--

- Original Message - 
From: Rubem Nascimento da Rocha [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, January 02, 2006 3:43 PM
Subject: RE: [delphi-br] I/O error 32??


 Melhor vc postar o código fonte pra gente poder analisar melhor o
problema.
 Sds.


 From: Diogo [EMAIL PROTECTED]
 Reply-To: delphi-br@yahoogrupos.com.br
 To: delphi-br@yahoogrupos.com.br
 Subject: [delphi-br] I/O error 32??
 Date: Mon, 2 Jan 2006 14:43:41 -0200
 
 Olá
 
 Estou com esse erro: I/O error 32, acredito que seja porque estou
 tentando
 fazer algo com um arquivo e alguma outra aplicação esteja tentando usar,
ou
 concorrendo comigo, para fugir disso, posso setar a variável FileMode =
0
 para conseguir modo exclusivo?
 
 Geralmente o erro aparece na hora que tento copiar um arquivo de um
 diretório para o outro, como esses arquivos estão chegando via FTP
acredito
 que seja nesse momento.
 
 Alguém teria alguma sugestão?
 
 Filemode = 0 funciona mesmo?
 
 
 
 Obrigado
 
 
 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 

 _
 MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br



 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 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]
 
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] DBGrid - Informação

2005-12-30 Por tôpico Itamar
Coloca somente o numero de campos que caiba detro do dbgrid
ou ajusta o tamanho dos campor para o tamnho da janela
nao tem propriedade para esta barra de rolagem

bom ANO NOVO a todos
_
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
analista de sistemas - Rio Grande - RS
--

- Original Message - 
From: lucsilfreitas [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, December 30, 2005 2:30 PM
Subject: [delphi-br] DBGrid - Informação


Olá pessoal!

Tenho um dbgrid contendo vários campos, mas não gostaria que apareça a
barra de rolagem inferior (horizontal). Como e qual propriedade que
executa essa ação?

FELIZ 2006! SUCESSO PARA TODOS!

LUCIANO





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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]
 
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] Soma de campos e plotagem de Gráfico

2005-11-06 Por tôpico Itamar
vou tentar:
para o seu campo A,B e C Coloque um Maskedit para cada um deles e coloque no
propriedade editmask 0.00 para aceitar somete numero.
na proriedade OnExit (Ao sair) do seu campo B coloque o seguinte:
campoC.text := FloatToStr(StrToFloat(CampoB.Text) +StrToFloat(CampoB.Text))
Isto é necessario porque o componentes visuais do delphi trabalham sempre
com o fomato STRING dai a necessidade da conversao e reconversao.

para o banco de dados é so seguir a mesma receita.

qq coisa faca contato
_
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]
analista de sistemas - Rio Grande - RS
--

- Original Message - 
From: fititnt [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Sunday, November 06, 2005 12:34 AM
Subject: [delphi-br] Soma de campos e plotagem de Gráfico


Bom dia a todos.

Vou procurar ser bem explicativo.

A situação é a seguinte. No primeiro caso, eu gostaria de inserir
algum valor númerico no campo de texto A , e, assim que eu colocasse
outro valor numérico no campo B, o programa realizasse a soma
altomaticamente num campo C, que é o campo de resposta.

Outra situação, é a de que, em vez de eu inserir os dados, eu
realizo uma busca em um banco de dados externo, e os valores são
exibidos em campos D e E, e, só a partir desdes estarem sendo
exibidor, o campo F mostra a soma de D e E.

Num terceiro caso, eu gostaria de ter um dado que é proveniente de
um banco de dados no campo H seja somado a um valor que eu vou
inserir no momento no campo I, e o valor, além de mostrado num campo
de resultado K, seria plotado num gráfico qualquer,
preferencialmente no que mais simples, o componente que normalmente
acompanha o delphi.

No caso, eu gostaria de saber quais são os componentes que devo usar
nesses casos, e a sintaxe básica dos comandos. Claro que vou fazer
mais doque só a soma, mas pedi só isso porque acredito que seja bem
didádico para explicar, e, que sabendo-se disso, e tendo aonde
procurar mais informação, o resto depende do cara.

Aliás, se solberem algum link explicando melhor isso, eu agradeço.
Tenho especial interesse pela plotagem gráfica, e de como fazê-la.







-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



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

2005-08-20 Por tôpico Itamar
  

para todos os colegas que usam o mysql,
achei esta pagina e ainda nao testei nada so estou repassando

http://crlab.com/mysqlnet/download.html
   
  segue abaixo o conteudo da mesma

   MySQLDirect .NET Data Provider Download 
  You can download trial versions of our products to try using 
them. Trial versions of MySQLDirect .NET have functional limitation. It allows 
to fetch only first six fields of result set. 

 
   MySQLDirect .NET Data Provider 


MySQLDirect .NET version 3.00 for .NET Framework 1.x [size 
4185 Kb]

  Download | Details


MySQLDirect .NET version 3.00 for .NET Framework 2.0 [size 
4123 Kb]

  Download | Details


  *note: This package works with Visual Studio .NET 2005 Beta 2 
only

DBMonitor for Windows version 2.10 [size 673 Kb]

  Download 

 
   MySQLDirect .NET Data Provider Mobile 


MySQLDirect .NET Mobile version 3.00 for .NET CF 1.1 [size 
2653 Kb]

  Download | Details



 
   MySQLDirect .NET Documentation 


HTML Help documentation [size 1534 Kb]

  Download 
 



  
 
  
  Home | Products | Download | Ordering | Forums | Site map | Contact 

_
[EMAIL PROTECTED]
analista de sistemas
Rio Grande - RS
--


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

2005-08-09 Por tôpico Itamar
a senha é lowercase (minusculas)

_
[EMAIL PROTECTED]
analista de sistemas
Rio Grande - RS
--

- Original Message - 
From: [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 09, 2005 11:49 AM
Subject: [delphi-br] SENHA FIREBIRD


Colegas

Crio o meu ALIAS no BDE aparentemente tudo correto usuario SYSDBA, mas
qdo vou busca a tabela para ligar ao TABLE no Delphi a senha MASTERKEY nao
funciona dá:

Invalid Configuration Parameter
Alias: Migrante

o que faço, ja se pego o Alias IBLocal criado pelo Interbase ai consigo
rodar normal.. To apanhando do firebird, vale ressaltar que baixei a fonte
de ODBC  para conexão : IBPHOENIX ODBC por que eu nao tinha essa fonte no
meu BDE

obrigado

Rogerio Garcia

[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

 





Re: [delphi-br] OFF TOPIC

2005-07-31 Por tôpico Itamar
uma maneira de recuparar os dados seria gerar os relatorio dos sistema em
disco e com uma aplicacação em delphi RECORTAR o relatorio e importar para
um banco.
da um pouco de trabalho mas é viavel e seguro

1 - Para jogar os relatorio para DISCO eu uso um software muito antigo que
se chama PRN2FILE.COM deve ser executotado em somemento prompt do dos pois
entra em conflito com a lpt1 do windows
2 - tem na net

3- executa se assim prn2file c:\saida.txt  roda o seu programa em cobol
executa o relatorio e no final
  executa somente prn2file para finalizar a captura
4 - abra o arquivo c:\saida.txt com qualquer edito e bom trabalho

_
[EMAIL PROTECTED]
analista de sistemas
Rio Grande - RS
--

- Original Message - 
From: Sheila [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Sunday, July 31, 2005 11:59 AM
Subject: Re: [delphi-br] OFF TOPIC


Ronaldo,
se vc não tem os fontes do sistema realmente vai ficar difícil, se pelo
menos souber a estrutura dos arquivos, será possível, já que a estrutura
normalmente fica dentro dos fontes.
Converse com o cliente e veja com ele se realmente não há nenhum documento
deixado pelo programador.
Sheila
  - Original Message - 
  From: Ronaldo Sousa
  To: delphi-br@yahoogrupos.com.br
  Sent: Sunday, July 31, 2005 12:32 AM
  Subject: Re: [delphi-br] OFF TOPIC


  Eu não o tenho...

  ronperso

  From: Sergio Alexandre Georg Martins [EMAIL PROTECTED]
  Reply-To: delphi-br@yahoogrupos.com.br
  To: delphi-br@yahoogrupos.com.br
  Subject: Re: [delphi-br] OFF TOPIC
  Date: Sun, 31 Jul 2005 00:23:37 -0300
  
  Ronperso,
  
  Você tem os fontes do sistema em Cobol?
  
  Sergio
  - Original Message -
  From: Ronaldo Sousa [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Sunday, July 31, 2005 12:18 AM
  Subject: [delphi-br] OFF TOPIC
  
  
  Boa noite a todos
  
  Desculpe o off é que estou com um problema serio, um cliente tem um
sistema
  em cobol (arquivos .dat) e o programador sumiu do mapa, agora preciso
  migrar
  para o Delphi, alguem pode me ajundar, preciso disso com urgencia.
  
  Favor entrar em contato em ptv
  
  
  
  Ronperso
  [EMAIL PROTECTED]
  
  _
  MSN Messenger: converse com os seus amigos online.
  http://messenger.msn.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
  
  
  
  
  
  
  
  
  
  

  _
  MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.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

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









-- 
 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] Win98 erro com arquivos DBF

2005-07-28 Por tôpico Itamar
tem como voce me passar a tabela ou comente alguns registro dela para que au
possa montar um modulo exportador para voce???

_
[EMAIL PROTECTED]
analista de sistemas
Rio Grande - RS
--

- Original Message - 
From: Evandro Siqueira [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, July 27, 2005 8:43 AM
Subject: Re: [delphi-br] Win98 erro com arquivos DBF


Ficaria bem mais fácil se tivessemos informações tipo, Linguagem,
componente, a mensagem de erro... coisas desse tipo.

[]'s
Evandro Siqueira
Programador
Recife/PE
  - Original Message - 
  From: delphi6_2005
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, July 27, 2005 3:09 AM
  Subject: [delphi-br] Win98 erro com arquivos DBF


  tenho um aplicativo compilado em XP que acessa arquivos DBF que
  funciona bem no XP porém ao instalar no 98 não funciona dá errp na
  abertura dos arquivos.

  Algum amigo já trabalho com aquivos dbf e poderia me dar uma dica.


  Agradeço a ajuda de todos.

  Paulo




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

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









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

2005-07-25 Por tôpico Itamar
if POS(seucampo,'.')  0 then
begin
   // se encontraro ponto dentro do seucampo retorna um valor diferente de
zero
   // so implementar as suas acoes.

end;
_
[EMAIL PROTECTED]
analista de sistemas
Rio Grande - RS
--

- Original Message - 
From: Marcos [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, July 25, 2005 3:45 PM
Subject: [delphi-br] Buscar caracter


Amigos,
Existe alguma função para fazer uma busca em um campo com um
determinado caracter, por exemplo . e caso exista nao efetuar a
alteraçao/inclusão.
Ela seria para evitar que as pesoas abreviassem os nomes. ex: José A.
da Cunha.

Grato




-- 
 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] Valor total do DBGRID

2005-07-22 Por tôpico Itamar
coloque um label n seu form
apos o evento de pesquisa coloque isso

label1.caption := inttostr(suaquery.recordcout);
application.process

_
[EMAIL PROTECTED]
analista de sistemas
Rio Grande - RS
--

- Original Message - 
From: Info Desenvolvimento [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, July 20, 2005 9:52 AM
Subject: [delphi-br] Valor total do DBGRID


Como faço para mostras quantos registros tem em um DBGrid, estou usando
Query para pesquisa falta colocar o total de registros da pesquisa, pode ser
um label.
Alguém sabe como faço isso?

PAULO FERNANDES
PORTO ALEGRE/RS


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

2005-06-16 Por tôpico Itamar
estou desenvolvendo com delphi6 + Zeos + Mysql 3.xx

preciso urgente achar uma maneiro de poder desenvolverem minha manquina com
o companente database ligado (localhost) e poder entregar a aplicacao no
cliente e rodar normalmente em rede

a solucao seria eu colocar as configuracoes em um arquivo INI  - MAS
COMO?

ou alguem teria outra solicao


ps: nao importa se o codigo fique feio o importante é eu poder resolver



Analista de Sistemas. - Rio Grande - RS
[EMAIL PROTECTED]
MSN [EMAIL PROTECTED]



-- 
 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] Liberar Excel da Memoria

2005-04-05 Por tôpico itamar

TENTA NO FINAL
EXCELAPPLICATION.QUIT

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Adalberto Sousa Monteiro [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, April 05, 2005 6:20 PM
Subject: [delphi-br] Liberar Excel da Memoria



 Estou montando uma rotina para exportar dados automaticamente para o
Excel.

 Segue a rotina abaixo

 lcid := GetUserDefaultLCID; //pega o usuário logado
 Path := ExtractFilePath(Application.ExeName) + 'pedido.xls';
 WkBk := ExcelApplication1.Workbooks.Open(Path , EmptyParam, EmptyParam,
 EmptyParam,
 EmptyParam, EmptyParam, EmptyParam, EmptyParam,
 EmptyParam, EmptyParam, EmptyParam,
 EmptyParam, EmptyParam, LCID);

 ExcelApplication1.Visible[lcid] := true; //torna a aplicação visível
 //ExcelApplication1.Visible[lcid] := False; //torna a aplicação visível
 ExcelApplication1.DisplayAlerts[lcid] := false; //remove alertas do excel
 ExcelWorksheet1.ConnectTo(WkBk.Worksheets[2] as _Worksheet);
 ExcelWorksheet1.Activate(LCID); //ativa a planilha conectada
 ExcelApplication1.ScreenUpdating[lcid] := true; //torna possível fazer
 alterações

 For vi_ContaLinha := 1 to vi_TotLinha Do
 Begin
 .. rotina ..
 End;

 ExcelApplication1.disconnect;
 ExcelWorksheet1.SaveAs( ExtractFilePath(Application.ExeName) +
 EditNameArq.Text + '.xls');
 ExcelApplication1.Free;
 Meu problema é o seguinte, quando deixo assim:
 ExcelApplication1.Visible[lcid] := False; //torna a aplicação visível

 O excel nao libera dos processos do windows, ficando preso e não consigo
 abrir novamente o excel, mesmo utilizando a rotina ExcelApplication1.Free;

 Alguem teria uma ideia?
 Obrigado
 Beto



 -- 
  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] Apagar conteúdo de um campo MaskedEdit

2005-03-30 Por tôpico itamar

tambem tive este problema, passei a usar o componente da rxlib datedata alem
de ser melhor com visual melhor nai tem estes bugs.



e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Luiz Henrique Severo d Oliveira [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, March 30, 2005 10:37 AM
Subject: [delphi-br] Apagar conteúdo de um campo MaskedEdit



 Pessoal,

 Tenho um campo MaskedEdit numa tela para entrada de datas. Meu problema é
que se digito uma data e depois resolvo apagá-la (tanto faz se uso
backspace, del, se seleciono o campo todo e pressiono del, etc) recebo o
seguinte erro: Invalid Input Value. Use Escape Key to Abandon Changes.
 Tentei usar o método Clear nos eventos OnExit e OnChange mas não funcionou
pois a exceção ocorre antes...

 Alguém sabe como faço para apagar o conteúdo de um MaskedEdit, depois dele
ter sido prenchido?


 Obrigado
 Luiz Henrique Severo d Oliveira
 RPG Soluçoes
 www.rpgsolucoes.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











-- 
 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] Relatórios Múltiplos em QR

2005-03-21 Por tôpico itamar

este conjunto de dados da tres tabela é bastante semelhante
gera uma tabela temporaria com qq coisa de quebra
depois e so gerar o quickReport sem traumas.

é só uma ideia se algue tiver outra...

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: moacirponti [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, March 21, 2005 11:21 AM
Subject: [delphi-br] Relatórios Múltiplos em QR




Olá,

  Preciso fazer um relatório em QuickReport que gere 3 sequências
diferentes em um só relatório. Pra exemplificar:

   Contas Recebidas
   ---
   ---
   Contas Pagas
   ---
   ---
   Resumo do dia
   Total Contas Pagas: 
   Total Contas Recebidas: 
   Saldo: 

   Uma opção é ter um objeto QRep para cada relatório, mas não
consigo ainda gerar o resumo, pois uso o QRExpression para somar
os Totais e este objeto não soma os valores se não
forem impressos os registros.

   E então, alguma sugestão?

   Obrigado,

   Moacir.





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

2005-03-19 Por tôpico itamar

coloque este codigo no seu evento OnKeyUp do seu edit

neste caso ele localisa o campo NOME da query cliente  independente de
digitar maiusculas ou minusculas e nao importa como esta no banco

QRY_Clientes.Locate('nome',edit1.Text, [loCaseInsensitive,loPartialKey]);

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Tooklar Materiais Para Construcao LTDA [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, March 18, 2005 9:24 PM
Subject: [delphi-br] Dbgrid




 Dbgrid,



 Amigos estou fazendo uma tela de consulta em uma tabela de produtos, na
tela
 tem um Dbgrid  e um campo edit para digitar a palavra do produto a qual
 quero procurar como faço para a hora que começar digitar o nome do produto
 que este seja selecionado no dbgrid automaticamente e com apenas um Enter
 passamos para a seleção e daí possamos procurar o produto caso tenha mais
de
 um com a seta para baixo ou para cima.



 Estou usando Delphi 5, tabela paradox 7 ,



 Já fiz esta pergunta antes mas não sei se foi respondida, meu computador
foi
 formatado e não perdi muito e-mails.



 Betho;






 -- 
  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] ARQ .MB .DB demora ao carregar MEMO

2005-03-19 Por tôpico itamar

ola colega
passei por algo semelhante so com arquivo de fotos tudo na mesma tabela
para abertura chegava a levar 3 minutos, quase perdi o meu figado para o
cliente.
Solução dividi a tabela em uma de dados e uma de fotos e ralacionei as duas
a vantagem e que o select principal fica muito leve pois traz somentes osa
dados
e no evento afterscroll da query principal eu coloquei o relacionamento onde
tra somente
a foto ou no seu caso o memo do REGISTRO EM FOCO
continuo com o cliente e esta bastante satisfeito...



e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Qualy System Informática [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, March 19, 2005 2:23 PM
Subject: [delphi-br] ARQ .MB .DB demora ao carregar MEMO



Srs.
Minha configuração D6-BDE-FB 1.5-ainda utilizando Query+UPDSql
Meu problema esta em uma tabela (8000 registros) que tem um campo Observação
com informação em todos os registros, minha aplicação fica lenta pois ao
gravar ele leva p/ atualizar os .MB e .DB quese 1 min., pelo que pude
perceber estes arq temporários utilizados pelo BDE sao para armazenar as
informações do MEMO., infelizmente tenho que trabalhar com SELECT * FROM
TABELA
Pergunto, alguem passou por este problema?
Ha como controlar a qtde de registros que sao manipulados pelo .DB?
Srs. pretendo passar p/ ClientDataSet e etc..., mas isso leva tempo e meu
problema preciso resolver logo
obrigado

Junior

[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

 





Re: [delphi-br] Re: Shell (duvida) URGENTE!!!!

2005-03-13 Por tôpico itamar

retirada da DTDELPHI 850

007 - Desabilitar Teclas Ctrl+Alt+Del
Ai vai um codigo que peguei no site da Borland que trava as teclas

(Ctrl+Alt+Del),(Alt+Tab), (Ctrl+Esc)

var
OldValue : LongBool;
begin
{liga a trava}
SystemParametersInfo(97, Word(True), @OldValue, 0);
{desliga a trava}
SystemParametersInfo(97, Word(False), @OldValue, 0);
end;


e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Hudson BHTE [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, March 12, 2005 3:00 PM
Subject: Re: [delphi-br] Re: Shell (duvida) URGENTE



uma dica de codigo.

 para o programa
Gostaria de saber como fazer para que, ao iniciar minha aplicacao Delphi, eu
 desabilite  o shell do Windows (Explorer). Ou seja, o que eu preciso e'
de uma forma de fazer com que apos a minha aplicacao seja iniciada, o
usuario nao tenha como alternar entre programas, acessar outros icones, etc

No System.ini você tem uma configuração como esta :

Shell=Explorer.exe

Basta trocar por

Shell=Myprog.exe

Ou usando delphi

procedure Tform1.ChangeShell(String programa);
var
ArquivoIni : Tinifile;
begin
try
ArquivoIni := Tinifile.Create('System.ini');
ArquivIni.WriteSection('Config','Shell','Myprog.exe');
fynally
ArquivoIni.Destroy;
end;
end;
  - Original Message - 
  From: Sérgio Rodrigo Alves Silva
  To: delphi-br@yahoogrupos.com.br
  Sent: Saturday, March 12, 2005 1:00 AM
  Subject: [delphi-br] Re: Shell (duvida) URGENTE



  Cara, procurei, procurei e não achei nada no Delphi em relação a esse
  tal de: ChangeShell.

  Como vc ficou sabendo dele?


  --- Em delphi-br@yahoogrupos.com.br, Hudson BHTE [EMAIL PROTECTED]
  escreveu
   Gente estou com este codigo:
  
   procedure Tform1.ChangeShell(String programa);
   var
   ArquivoIni : Tinifile;
   begin
   try
   ArquivoIni := Tinifile.Create('System.ini');
   ArquivIni.WriteSection('Config','Shell','Myprog.exe');
   fynally
   ArquivoIni.Destroy;
   end;
   end;
  
   ele faz o programa ser exclusivel..a duvida é a
  seginte.onde esta este evento  ChangeShell e pq quando tento
  criar este.ele da codigo de erro.de execução.
  
   tentei colocar.em outro evento como ONSHOW..mas deu erro de
  execução no (Tinifile)...logo no começo...
  
   alguem pode me ajudarpois tenho q entregar isso na
  segunda!!
  
   [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:

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.7.1 - Release Date: 9/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]

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] Impressora Matricial em rede

2005-02-19 Por tôpico itamar

AssignFile(F,'\\nome_da_fila\Nome_da_Impressora');
Rewrite(F);
Write(F,'Teste');

ou passa por parametro



e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Ulisses [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, February 19, 2005 7:07 PM
Subject: [delphi-br] Impressora Matricial em rede




Boa noite a todos!

Como faço para imprimir direto para um impressora matricial em rede
usando o código abaixo?

AssignFile(F,Porta);
Rewrite(F);
Write(F,'Teste');

Tem jeito?

Grato.

Ulisses







-- 
 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] Configuração dos sistemas individualmente

2005-02-14 Por tôpico itamar

DA UM POUCO DE TRABALHO
mas o primeiro passo vai ser definir a estrategia
1 - por maquina
2 - por usuario
 existe uma diferença barbara entra as duas

vamos ao primeiro caso
montar um arquivo .INI na maquina e salvar o que quiser la dentro
funciona PARA A MAQUINA independente do usuario
nao adiuanta fazer um INI por unsuario pois so usuario se logar em outra
maquina
nao tem de onde recuperar os dados


segundo caso
monta uma tabela no banco com as diretivar a ser salva e recuperadas por
usuario
porem isso aumenta a demanda da rede com um trafego bem maior
ex :
usuario abre form CLIENTES
   vai ao banco e pega as configurações do usuario para o fomr clientes do
tipo
   cor fontes
   nome fontes
   posicao da janela
   entre outros

espero que ajude

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Eduardo Silva ® [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, February 14, 2005 1:54 PM
Subject: [delphi-br] Configuração dos sistemas individualmente



 Galera, tenho um sistema que eu gostaria que ele fosse configurado
 individualmente por usuário, isto é, cada usuário teria a sua
configuração,
 mas não tenho idéia de como fazer isso.

 Alguém pode me dar alguma sugestão ?

 Obrigado.

  _  ___  _
 / )|   |( \
/ / | Eduardo de Almeida Silva  | \ \
  _( (_ |  _[EMAIL PROTECTED] _  | _) )_
 (((\ \)|_/ )___( \_|(/ /)))
 ( \_/ / \ \_/ )
  \   /   \   /
   \_/ \_/
   /   / \   \



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

2005-02-02 Por tôpico itamar

313 - DbGrid Zebrado // RETIRADO DA DTDelphi 2.6

O exemplo abaixo mostra como deixar cada linha do componente DBGrid de uma
cor diferente, dando assim um efeito zebrado. O controle é feito no evento
OnDrawColumnCell.

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, DBTables, Grids, DBGrids, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
DBGrid1: TDBGrid;
Table1: TTable;
DataSource1: TDataSource;
procedure DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol:
Integer; Column: TColumn; State: TGridDrawState);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;

implementation
{$R *.DFM}

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
If odd(Table1.RecNo) then
begin
DBGrid1.Canvas.Font.Color:= clWhite;
DBGrid1.Canvas.Brush.Color:= clGreen;
end
else
begin
DBGrid1.Canvas.Font.Color:= clBlack;
DBGrid1.Canvas.Brush.Color:= clWhite;
end;
DBGrid1.Canvas.FillRect(Rect);
DBGrid1.Canvas.TextOut(Rect.Left+2,Rect.Top,Column.Field.AsString);
end;

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Carlinhos Pucc [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, February 02, 2005 10:15 AM
Subject: [delphi-br] Pintar GRID



 Bom Dia Pessoal,

 Preciso de uma ajuda.
 Gostaria de no momento que abro os dados em um DBGrid possa
aparecer
 de outras cores determinadas linhas.
 Por exemplo, abro um cadastro e todos que são de São Paulo saiam
 com fontes de outra cor ou fundo de outra cor, só que não posso perder o
 posicionamento, ou seja, se o campo está centralizado precisa continuar.
 Existe alguma função pra isso ? Onde coloco ? em qual evento eu
 coloco a função ?

 Obrigado à todos,

 Carlinhos





 -- 
  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: RES: [delphi-br] Como evitar '' is not a valid floating point value

2005-01-26 Por tôpico itamar

porque voce nao o currencyedit da RXlib que nao tem estes problemas
voce pode edit o maskedit dele e tirar o simbolo de R$ se quiser...

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: jmourajr2000 [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 26, 2005 7:04 PM
Subject: Re: RES: [delphi-br] Como evitar '' is not a valid floating point
value




Caro Rubem, boa noite!
 Agradeço muito pela ajuda, mas eu ja tinha tentado assim

  if Length(dbcAliquota.Text)  0 then begin...

só que ao tentar digitar 25,25 o segundo numero vai para o proximo
campo sendo que o numero 2 fica no RXSpinEdit e o 5 vai para outro
TEdit.
Preciso firmar a digitação neste RXSpinEdit.

Grande abraço e mais uma vez obrigado.

José de Moura


--- Em delphi-br@yahoogrupos.com.br, Rubem Rocha [EMAIL PROTECTED]
escreveu
 Ora, é só checar no evento se o tamanho do texto digitado no
componente é maior que 0(zero)!
 Simples!

 -Mensagem original-
 De: jmourajr2000 [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 26 de janeiro de 2005 16:50
 Para: delphi-br@yahoogrupos.com.br
 Assunto: [delphi-br] Como evitar '' is not a valid floating point
value




 Caros amigos boa noite!

 Estou usando um RXSpinEdit e usando em sua propriedade value-type
 como vtFloat (ou seja valores Float entre 1,00 e 100,00).
 Estou trabalhando no evento onChange e se eu for digitar qualquer
 numero me retorna a mensagem de erro:

  =  '' is not a valid floating point value

 Pois necessito fazer com que o usuario possa digitar qualquer valor
 float nesta faixa, como por exemplo: 35,25.

 Estou apanhando, alguem pode me ajudar.

 Desde ja obrigado e abraços.

 José de Moura







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









 ---
 Incoming mail is certified Virus Free.
 Checked by AVG anti-virus system (http://www.grisoft.com).
 Version: 6.0.799 / Virus Database: 543 - Release Date: 19/11/2004





-- 
 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] Contar Caracter - Urgente

2005-01-22 Por tôpico itamar

use  o LENGTH(EDIT1.TEXT)
isso conta o numero de caracteres.

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: fpsp2000 [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, January 22, 2005 4:14 PM
Subject: [delphi-br] Contar Caracter - Urgente




Estou tentando contar o carcteres q recebo em uma variavel, so q nao
estou conseguindo fazer, li q o comando LEN faz isso, so q o delphi
nao aceita esse comando. Se alguem puder me dizer como q façoi isso.

Agradeço desde ja,
Fernanda.





-- 
 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] Como anular teclar da melhor forma ???

2005-01-19 Por tôpico itamar

UTILIZE O COMPONENTE CURRENCY DA RXLIV ja esta pronto e testado
e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Osmar de Souza Júnior [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 19, 2005 10:56 AM
Subject: [delphi-br] Como anular teclar da melhor forma ???





Para o usuário digitar somente números num TEdit, estou colocando o
seguinte código no evento OnKeyPress:

 if not (key in ['0'..'9', #8, #9, #27, #13]) then
  key := #0;

O problema é que isso restringe Ctrl+C e Ctrl+V, por exemplo. Só é
possível copiar e colar via mouse (mas é um pé no saco).

Se existe uma melhor forma de fazer isso, por favor, post-it !!!





-- 
 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] Prob. referente ao mysql

2005-01-19 Por tôpico itamar

EM TEMPO

NO ATALHO ONDE CHAMAR O MYSQLD-OPT
COLOQUE O SEGUINTE COMANDO

mysqld-opt.exe --flush

ISSO DEIXA O BANCO UM TIQUINHO MAIS LENTO POREM PODE CAIR QUE NO PERDE MAIS
QUE UM REGISTRO ISSO FORÇA UM COMMIT DIRETO


e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Vinicius Mommensohn [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 19, 2005 8:43 PM
Subject: Re: [delphi-br] Prob. referente ao mysql



Tente rodar em vez do winmysqladmin o mysqld-opt. Se quiser rodar no
winmysqladmin mesmo, troque na aba my.ini Setup para a opção mysqld ou
mysqld-opt. Assim vai funcionar!!

[]s

Vinicius

- Original Message - 
From: itamar
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 19, 2005 7:04 PM
Subject: Re: [delphi-br] Prob. referente ao mysql


ola, ja enfrentei algo semelhante.
uso delphi6 + mysql 3.xx.xx + win98
ao executar a aplicacao paresentava um erro  relacionadao ao soket inativo
O que fiz
1 - reinstalei o windows 98 por cima
   NAO FUNCIONOU
2 - reinstalei o mysql completo
   NAO FUNCIONOU
3 - reintalei o myodbc
   NAO FUNCIONOU
4 - retirei  a placa de rede, reinstalei a placa e o TCP/IP
   NAO FUNCIONOU
5 - reinstalei o java
   NAO FUNCIONOU
6 - removi tudoe que podia - antivirus INCD nero ad-warw spyboot (nunca tive
uma maquina tao leve)
   NAO FUNCIONOU

7 - fiz um UPGRADE do win98 para win2000
FUNCIONOU

motivo: NAO TENHO A MENOR IDEIA DO PROBLEMA.
AINDA BEM QUE A MAQUINA ERA MINHA, JA PENSOU SE É DE CLIENTE E NO CLIENTE...



e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Weber Luvisa [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 19, 2005 8:55 AM
Subject: [delphi-br] Prob. referente ao mysql




Olá amigos, estou com um problema com mysqladmin.. ele abre a tela do
gerenciador e desabilita.. (Semafaro vermelho)..

uso o windows 2000 professinal e mysql 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]



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






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










-- 
 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] No Seria HD

2005-01-17 Por tôpico itamar

OLa, deixa eu dar a minha opiniao, pois assunto é muito serio,
1 - NAO DEVEMOS MUDAR U NUMERO DE SERIE DA HD
2 - TODAS AS CHAVES DA TRANSPORTE DO RESGISTRO SAO GERADAS COM BASE NO
NUMERO DO HD
3 - SISTEMA JA INSTALADOS E QUE FAZEM A VERIFICACAO DO NUM DO HD VAO PARAR
DE FUNCIONAR
obs:
se voce que seguranca use hardlock


e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Walter Alves Chagas Junior [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, January 17, 2005 10:23 AM
Subject: RES: [delphi-br] No Seria HD



Serial do Volume ou Serial da Controladora eu desconheço alguma coisa que
faça isto.



 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200



 -Mensagem original-
 De: MOITA [mailto:[EMAIL PROTECTED]
 Enviada em: segunda-feira, 17 de janeiro de 2005 09:18
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] No Seria HD



 Essa rotina é apenas para buscar o SN, gostaria de muda-lo.
 Vc teria uma rotina ?

 Obrigado.
   - Original Message - 
   From: Walter Alves Chagas Junior
   To: 'delphi-br@yahoogrupos.com.br'
   Sent: Monday, January 17, 2005 8:34 AM
   Subject: RES: [delphi-br] No Seria HD


   Tem como buscar o numero serial interno do HD (Não é o do volume):

   function GetIdeDiskSerialNumber : String;
   type
 TSrbIoControl = packed record
HeaderLength : ULONG;
Signature: Array[0..7] of Char;
Timeout  : ULONG;
ControlCode  : ULONG;
ReturnCode   : ULONG;
Length   : ULONG;
  end;
  SRB_IO_CONTROL = TSrbIoControl;
  PSrbIoControl = ^TSrbIoControl;

  TIDERegs = packed record
bFeaturesReg : Byte; // especificar comandos SMART
bSectorCountReg  : Byte; // registro de contador de setor
bSectorNumberReg : Byte; // registro de número de setores
bCylLowReg   : Byte; // valor de cilindro (byte mais baixo)
bCylHighReg  : Byte; // valor de cilindro (byte mais alto)
bDriveHeadReg: Byte; // registro de drive/cabeça
bCommandReg  : Byte; // comando IDE
bReserved: Byte; // reservado- tem que ser zero
  end;
  IDEREGS   = TIDERegs;
  PIDERegs  = ^TIDERegs;

  TSendCmdInParams = packed record
cBufferSize  : DWORD;
irDriveRegs  : TIDERegs;
bDriveNumber : Byte;
bReserved: Array[0..2] of Byte;
dwReserved   : Array[0..3] of DWORD;
bBuffer  : Array[0..0] of Byte;
  end;
  SENDCMDINPARAMS   = TSendCmdInParams;
  PSendCmdInParams  = ^TSendCmdInParams;

  TIdSector = packed record
wGenConfig : Word;
wNumCyls   : Word;
wReserved  : Word;
wNumHeads  : Word;
wBytesPerTrack : Word;
wBytesPerSector: Word;
wSectorsPerTrack   : Word;
wVendorUnique  : Array[0..2] of Word;
sSerialNumber  : Array[0..19] of Char;
wBufferType: Word;
wBufferSize: Word;
wECCSize   : Word;
sFirmwareRev   : Array[0..7] of Char;
sModelNumber   : Array[0..39] of Char;
wMoreVendorUnique  : Word;
wDoubleWordIO  : Word;
wCapabilities  : Word;
wReserved1 : Word;
wPIOTiming : Word;
wDMATiming : Word;
wBS: Word;
wNumCurrentCyls: Word;
wNumCurrentHeads   : Word;
wNumCurrentSectorsPerTrack : Word;
ulCurrentSectorCapacity: ULONG;
wMultSectorStuff   : Word;
ulTotalAddressableSectors  : ULONG;
wSingleWordDMA : Word;
wMultiWordDMA  : Word;
bReserved  : Array[0..127] of Byte;
  end;
  PIdSector = ^TIdSector;

   const
  IDE_ID_FUNCTION   = $EC;
  IDENTIFY_BUFFER_SIZE  = 512;
  DFP_RECEIVE_DRIVE_DATA= $0007c088;
  IOCTL_SCSI_MINIPORT   = $0004d008;
  IOCTL_SCSI_MINIPORT_IDENTIFY  = $001b0501;
  DataSize = sizeof(TSendCmdInParams)-1+IDENTIFY_BUFFER_SIZE;
  BufferSize = SizeOf(SRB_IO_CONTROL)+DataSize;
  W9xBufferSize = IDENTIFY_BUFFER_SIZE+16;
   var
  hDevice : THandle;
  cbBytesReturned : DWORD;
  pInData : PSendCmdInParams;
  pOutData : Pointer; // PSendCmdOutParams
  Buffer : Array[0..BufferSize-1] of Byte;
  srbControl : TSrbIoControl absolute Buffer;

   procedure ChangeByteOrder( var Data; Size : Integer );
   var ptr : PChar;
i

Re: [delphi-br] Query

2005-01-12 Por tôpico itamar

coloca outro componente query liga ele
e no evento on exit dester campo data faça a verificaçao, se a data existe
da o aviso de retorna o foco ao campo data.

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Daniel Coelho [EMAIL PROTECTED]
To: delphi-br delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 12, 2005 9:48 PM
Subject: [delphi-br] Query



Olá para todos..

Tenho uma query que seu resultado é exibido em um DBGrid.. Quando dou 2
clicks na Grid, chama outro form com todos os campos desta query, é onde eu
altero os dados..
O problema é que existe um campo de data, onde esta data não poderá
repetir na tabela.. Portanto eu precisava, antes de dar o POST, verificar se
a data informada existe, caso existir eu preciso dar um aviso e não deixar
concluir, caso contrário, poderá ser salvo normalmente.
Então quando estou anterando um certo registro da query e vou consultar
os outros registros, simplesmente perco o registro atual (o que estavo
alterando)..

Acho que deu pra entender o que está acontecendo.
Como que posso fazer este processo sem perder minhas informações ???

Utilizo Delphi 7, FireBird 1.5..


Atenciosamente,
Daniel..

[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

 





Re: [delphi-br] Sugestão !!!

2005-01-07 Por tôpico itamar

ola Erika,
esta tela tem somente o codigo do cliente
se nao muda a ordem do cas campos de forma que o codigo do cliente não seja
o ultimo campo.

Valeu,

e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Erika [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, January 06, 2005 4:05 PM
Subject: [delphi-br] Sugestão !!!




Oi gente!

Eu tenho uma edit que quando o usuário entra com o número do cliente
aparece o nome dele num panel.
Eu sou novata em delphi por isso queria saber o seguinte: estou
usando o evento OnChange da Edit, só que se o número tem mais de um
digito ele não acha...
Se eu for usar OnExit fica estranho porque ele digita o nome e já
aperta o botão GRAVAR (apagando os dados da tela para novo cadastro)
e fica sem ver se o cliente era mesmo aquele.

Não queria colocar botão, queria que ele digitasse e já aparecesse o
nome!

Alguma sugestão???

Obrigado!





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

2005-01-07 Por tôpico itamar

ola,
tem varias maneiras de fazer esta coisa,
1 - seria declarar uma matriz tipo elementos['aa',ab','ac,' zz']  vai
set trablho demais
2 - declarar 1 contante  c1 := 'ABCDE...XYZ'
paga com copy(edit1.text,2,1) pega a posicao na postante e icrementa de 1
se = z incremente incrementa a primeira letra e passa a 2 para A


espera ter ajudado qq manda


e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Michel Kafury Pael [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 07, 2005 1:45 AM
Subject: [delphi-br] Incremento diferente




Bom pessoal, vou postar um problema que numca vi.

Em um edit a pessoa pode digitar AA, AB, AC até chegar a ZZ e eu
tenho um botão para verificar: quando for AA muda para AB; quando for
AB muda para AC e isso até ZZ. Não tenho idéia de como fazer.

Michel





-- 
 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] Impressão Na REDE

2005-01-05 Por tôpico itamar

tive este problema no clipper que se menaifesta da mesma maneira.

solucao;
1 - a impressora loca nao mexer
2 - da impressora remota capture a porta da impressora como LPT2 na
propriedades da impressora
   faca isso nos doi xps
3 - na impressao direciona o seu listbox/combobos como LOCAL / REMOTA
4 - se local mande direto assignfile(F, 'LPT1')
5 - se remota  assignfile(F, 'LPT2')

naoencontrei outra forma e no clipper funcionao
escrevei assim no delphi 6 e esta funcionando BEM


e-mail - [EMAIL PROTECTED]
MSN  - [EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: DelphiStar [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 05, 2005 2:25 PM
Subject: [delphi-br] Impressão Na REDE



Boa Tarde, Pessoal
Estou tendo um problemão pra conseguir emitir relatório de um micro XP para
outro XP
Utiliza Delphi com Paradox
Coloquei no meu Formulário um comboBOX que lista todas as impressoras
instaladas no micro
utilizei a Procedure abaixo:

var
I: Integer;
begin
cboPress.Items.Clear;
For I:= 1 to Printer.Printers.Count do
  Begin
  if Pos('LPT', printer.Printers.Strings[I-1])  0 Then
 CboPress.Items.Add('LPT1')
 Else
if Pos('\\', printer.Printers.Strings[I-1])  0 Then
   CboPress.Items.Add(Copy(printer.Printers.Strings[I-1],
   Pos('\\', printer.Printers.Strings[I-1]),
   length(printer.Printers.Strings[I-1]) -
   Pos('\\', printer.Printers.Strings[I-1]) + 1));
End;
cboPress.ItemIndex:=0;

Depois que o usuário selecionar a impressora digitada, utilizo o comanda
abaixo:

AssignFile(ArqPrn,cboPress.Text);

Essa rotina funciona perfeitamente na REDE
Só que se eu tentar emitir de um micro XP para outro XP
da o erro abaixo:

I/O ERROR 53

Alguém saberia me dizer como resolver este problema ???
Estou precisando muito disso
Desde já agradeço
Abraço
Ademir

[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

 





Re: [delphi-br] Erro na Tabela

2004-12-23 Por tôpico itamar

antes da instrucoes de campo coloca isso
SAEData.tblSAECadastro.EDIT;  // para editat um registro
ou
SAEData.tblSAECadastro.Insert;  // para um registro novo
[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: alisson_delphi [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, December 23, 2004 8:28 AM
Subject: [delphi-br] Erro na Tabela




Salve amigos programadores, eu programo faz pouco tempo e estou com
um problema que não estou conseguindo solucionar.
Trabalho com o FireBird 1.5 e delphi 7, está ocorrendo um erro que eu
não estou conseguindo solucionar falando que a minha tabela
tblSAECadastro não está em mode de inserção ou edição, eu já tentei
de tudo, antes ele naum gravava as informações no campo e dava o
erro, agora eu coloquei essa instrução e ele grava no campo na saida.
Estou trabalhando com o componente DBLoockUpComboBox para fazer
consulta em outra tabela e no OnExit eu coloquei essa instrução
abaixo para fazer a pesquisa e gravar no banco... Aonde ele vai
gravar é no DBEdit as informações.
DBLoockUpComboBox busca o Cep, e automaticamente nos DBEdit aparece o
Endereço e o nome do Bairro.
Gostaria que alguém me ajudasse a solucionar o erro, que fala que a
tabela naum está em mode de inserção ou edição, e se o comando no
OnExit está certo.
Veja a instrução abaixo

  if Operacao in [oprIncluir,oprAlterar] then begin
 dbdtDS_ENDERECO.DataSource.DataSet.FieldByName
( 'ds_endereco' ).AsString := SAESys.tblCep.FieldByName
( 'ds_logradouro' ).AsString;
 dbdtMN_BAIRRO.DataSource.DataSet.FieldByName
( 'mn_bairro' ).AsString := SAESys.tblCep.FieldByName
( 'nm_bairro' ).AsString;
 SAEData.tblSAECadastro.Post
end;





-- 
 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] Re: Localizar linha em arquivos texto

2004-12-23 Por tôpico itamar

PARA AGILIZAR EM MUITO ESTE METODO UTILIZE O FUNCAO POS()
que ao encontrar a primeira ocorrencia de busca descarta o resto da linha
procedure percorreArquivoTexto ( nomeDoArquivo: String );
var
   arq: TextFile;
   linha: String;
   i: integer
begin
 AssignFile ( arq, nomeDoArquivo );
 Reset ( arq );
 ReadLn ( arq, linha );
 while not Eof ( arq ) do begin
   if pos('*',linha) then  //ALTERDO AQUI RETIRADO O FOR
   Begin
// Faz o que for preciso
End;
  ReadLn ( arq, linha );
 end;
 CloseFile ( arq );
end;



[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: dom_rr2004 [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, December 23, 2004 8:38 AM
Subject: [delphi-br] Re: Localizar linha em arquivos texto




Bom dia companheiro.

Aqui tem um procedimento que lê o arquivo linha por linha e em cada
linha verifica caracter por caracter. Se encontra o caracter
procurado (no exemplo o '*') então faz o que for preciso.

{ Para ler o arquivo }
procedure percorreArquivoTexto ( nomeDoArquivo: String );
var
   arq: TextFile;
   linha: String;
   i: integer
begin
 AssignFile ( arq, nomeDoArquivo );
 Reset ( arq );
 ReadLn ( arq, linha );
 while not Eof ( arq ) do begin
  for i := 1 to Length(linha) do
   if Copy(linha,i,1) = '*' then
// Faz o que for preciso
  ReadLn ( arq, linha );
 end;
 CloseFile ( arq );
end;

Espero que ajude e que você tenha um ótimo dia.



--- Em delphi-br@yahoogrupos.com.br, Leandro Ferreira
[EMAIL PROTECTED] escreveu
 Boa Tarde Pessoal,

 Preciso da ajuda de vocês para descobrir como construo um if
onde o
 parte do conteúdo contenha '*'  ou '.'.

 Por exemplo: dentro do meu arquivo texto, possuo uma linha
 'teste*.txt=teste*.txt.*.passou' e
outra 'txt.teste=txt.*.teste.passou'.
 Estas duas linhas precisam ser inclusas num listbox ou memo desde
que o
 conteúdo delas possua até chegar no símbolo de '=' os símbolos
de '*' ou
 '.'.

 Agradeço a ajuda de todos,

 -- 
 Leandro Ferreira
 Desenvolvedor - Tecnologia
 NEXXERA Tecnologia e Serviços S.A.





-- 
 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] Dúvidas SQL

2004-12-09 Por tôpico itamar

vou responder so so a NUM 1
if qeury.recordcount = 0 then
begin
sua mensagem('')
   exit;   // nao executa o resto da procedure/ funcao
end;


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Cristina Orthmann [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, December 09, 2004 11:16 AM
Subject: [delphi-br] Dúvidas SQL



Olá pessoal,

Estou com 3 dúvidas, que acredito que vcs possam me ajudar.

1) Como posso tratar quando um consulta não retorna nada,
 quando não há nenhum registro sempre aparece a mensagem BOF ou EOF são
verdadeiros, ou registro atual foi excluído. A operação solicitada pelo
aplicativo requer um registro atual.

2) Ao excluir registros através de comando SQL aparece a
mensagem CommandText does not return a result set

3) Como incluir um ComboBox em um dbGrid.

Estou utilizando Delphi5 com banco Access 97


-- 

Atenciosamente
-
Cristina Orthmann da Silva
HACON Automação e Tecnologia Ltda
Rua Lauro Linhares 589 - Bairro Trindade
Florianópolis - SC - Brasil
CEP 88036-001
Fone/Fax: 55 48 333-0699
Site: http://www.hacon.com.br/
Email: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED]
-



[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

 





Re: [delphi-br] Imprimir condensado em impressora Epson LX-300

2004-12-08 Por tôpico itamar

este comamando so funciona no modo direto.
ex: voce abre a porta da impressoa com assignfile(f,'LPT1') e ai sim voce
manda os caracteres de controle.


se voce mandar os carcteres de controle e usar um gerados tipo qreport, rave
ou outro a prioridade é para o fonte do windows.
voce nao tem o controle sobre a impressora

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Alisson Costa Resende [EMAIL PROTECTED]
To: YahooGrupo [EMAIL PROTECTED]
Sent: Wednesday, December 08, 2004 12:14 AM
Subject: [delphi-br] Imprimir condensado em impressora Epson LX-300



 Olá pessoal,

 Preciso imprimir no modo condensado em uma impressora
 matricial Epson LX-300. Pesquisei na internet e
 encontrei dois comandos diferentes(#27+#15 e #15), mas
 nenhum deles funcionou. É algum desses comandos
 mesmo?Alguém tem algum exemplo pra me enviar? Qualquer
 ajuda será bem-vinda.





 ___
 Yahoo! Mail - Agora com 250MB de espaço gratuito. Abra
 uma conta agora! http://br.info.mail.yahoo.com/


 -- 
  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] como comparar string com float

2004-12-08 Por tôpico itamar

coveete tudo para float ou tudo para string, comparacoes so podem set feito
no mesmo tipo,
// comparacao com string
//---
if seu string = floattostr(seu float)  then
begin

end;

//---

// comparacao com float
if strtofloat(seu string)  = seu float  then
begin

end;


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: delphi6_2005 [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, December 08, 2004 9:57 AM
Subject: [delphi-br] como comparar string com float




Amigos estou com dificuldades para comparar string e float, nesse
caso:

comparar string 50 com float 0,5.

Alguma amigo poderia me dar uma idéia de como fazer.


grato

Paulo






-- 
 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] Toolbar Internet Explorer

2004-12-08 Por tôpico Itamar

Pessoal, alguem ja desenvolveu uma barra para internet Explorer ou sabe onde
posso conseguir um tutorial de como desenvolver.

Uma barra tipo aquela do UOL, Google, etc

Itamar

- Original Message -
From: Eduardo Silva ® [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Friday, December 03, 2004 4:56 PM
Subject: RES: [delphi-br] TRAY ICON



Coloquei no form e não funcionou, dei ctrl alt del, cancelei o sistema e o
ícone continuou lá na bandeja.
  -Mensagem original-
  De: MOITA [mailto:[EMAIL PROTECTED]
  Enviada em: sexta-feira, 3 de dezembro de 2004 15:44
  Para: [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] TRAY ICON


  nid é a variavel que uso e foi declarada em public, veja o nome que vc
esta usando ou utilize assim

public
{ Public declarations }
nid: TNotifyIconData;

- Original Message -
From: Eduardo Silva ®
To: [EMAIL PROTECTED]
Sent: Friday, December 03, 2004 3:18 PM
Subject: RES: [delphi-br] TRAY ICON


Ta dando erro na primeira linha, nid 
  -Mensagem original-
  De: MOITA [mailto:[EMAIL PROTECTED]
  Enviada em: sexta-feira, 3 de dezembro de 2004 15:08
  Para: [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] TRAY ICON


  Eu tambem tinha esse problema, coloquei o seguinte codigo que
resolveu:

  procedure TFIcon.FormDestroy(Sender: TObject);
  begin
nid.uFlags := 0;
Shell_NotifyIcon (NIM_DELETE, @nid);
  end;

- Original Message -
From: Osmar de Souza Júnior
To: [EMAIL PROTECTED]
Sent: Friday, December 03, 2004 1:41 PM
Subject: [delphi-br] TRAY ICON




criei um icone no tray (bandeja) do windows para minha aplicação.

quando encerro a aplicação, o icone não desaparece automaticamente.
ai quando passo o mouse por cima, ele desaparece.

alguem sabe porque ???





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

  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!.



---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.789 / Virus Database: 534 - Release Date: 07/11/2004


[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

  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

Re: [delphi-br] Ancestrais.

2004-12-07 Por tôpico itamar

entre estas preciosidades posso acrescentar algo raro como Niro e Tamos
sistema oprecional LABO escrito em basic LABO em dialeto laemao
o proprio basic labo qua nao manipulava variaveis e sim substrings dentro do
registro de arquivo sarch(arq,20,50) oara leitura ou gravacao
 e falando de coisas velhas que aqui chegou a trabalhar com unix five do
EDISA com o cobol 2.2 ansi... heheh SAUDADES

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Rubem Rocha [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, December 07, 2004 10:25 AM
Subject: RES: [delphi-br] Ancestrais.



Xtree Gold, FoxTools, SideKick, Wordstar, Lotus 1-2-3, Quattro Pro (um
pouco), QBasic, GWBasic, Norton Utilities, ... cheguei até usar um
compressor de HD (não lembro bem o nome dele agora!)... Se alguém aí
lembrar?!?!?
[]s

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 7 de dezembro de 2004 07:22
Para: '[EMAIL PROTECTED]'
Assunto: RES: [delphi-br] Ancestrais.



 mas vindo mais para o presente, como foi lembrado do Carta
 Certa, alguém lembra do Quattro Pro, Lotus 123, WordStar, WordPerfect e o
 Dbase que já saiu na versão II, a versão 1 se chama de Vulcano.


Dessa turma aí, eu mexi muito com o WordStar e com o Lotus 123.

E com o XTree? Alguém aqui se lembra


 []s

 Walter Alves Chagas Junior
 Projeto e desenvolvimento
 Telemont Engenharia de telecomunicações
 [EMAIL PROTECTED]
 Fone: (31) 3389-8215 Fax: (31) 3389-8200



 -Mensagem original-
 De: Campus [mailto:[EMAIL PROTECTED]
 Enviada em: terça-feira, 7 de dezembro de 2004 07:15
 Para: [EMAIL PROTECTED]
 Assunto: Re: [delphi-br] Ancestrais.



 hehehe

 Williams pareceque esse é um tempo que tu não quer lembrar heim ???

 me lembro dos disketes de 8 polegadas, eram 160 k e de face
 única, baixa
 densidade.

 os PCs tinha 64 k de memória, e esse era o tamanho máximo de
 um executável,
 naquela época não havia paginação de memória.

 lembra do Exe2Bin, para converter executavel em binario .exe
 para .com ?

 E a programação para processadores Z80 ?  TK-85/90, Sysdata
 etcc...depois
 surgiu o Amiga.

 mas vindo mais para o presente, como foi lembrado do Carta
 Certa, alguém
 lembra do Quattro Pro, Lotus 123, WordStar, WordPerfect e o
 Dbase que já
 saiu na versão II, a versão 1 se chama de Vulcano.

 Realmente o salário da época era outra coisa, tudo era
 grande...me lembro de
 um IBM que quando era ligado, demorava 45 minutos para
 terminar o processo
 de boot.



 - Original Message - 
 From: Williams Diaz [EMAIL PROTECTED]
 To: [EMAIL PROTECTED]
 Sent: Tuesday, December 07, 2004 12:47 AM
 Subject: Re: [delphi-br] Ancestrais.


 
  Pois é André, eu que sou um ancestral te confirmo: eu
 mesmo programei
  muito em cobol perfurando cartão. Eu até tinha esquecido
 disso, você tinha
  que lembrar? :);
  É mais, quando surgiu o pc tinhamos diskete de 125 K para processar,
 guardar
  (atenção: k mesmo, não megas). e 8k de memória ram, se não
 me falha a
  memória.
  Quando surgiu o HD de 1MB, depois de5MB e de 10 Megas foi
 uma festa. Eu
  chamava meus amigos programadores para dar um dir e que vissem a
 velocidade
  e morressem de inveja.
  Para digitar um acento num editor de texto? era mais ou
 menos assim, você
  digitava a letra, digitava um backspace com um CTRL da
 vida, CTRL-H senão
 me
  engano, e depois o acento. O texto ficava lindíssimo na
 tela, ninguém
  entendia nada.
  Uma vez assisti uma palestra de um concorrente do Word chamado Carta
 Certa,
  e o máximo que ele permitia eram textos de 64K. Eu
 questionei o tamanho
  quando o próprio word permitia mais do que isso, e o cara
 me ridicularizou
  na platéia fazendo uma piada com o tamanho de arquivo que
 eu ia fazer, que
  nunca ia chegar a um tamanho desses e tal e tal.
  E as primeiras placas fax modem? 2K de velocidade. Era mais
 rápido pegar o
  ônibus e levar o diskete no cliente, quando você voltava
 ainda estava
  transmitindo.
  A única coisa que tenho saudade era o salário: eu ganhava
 em torno de
 4.000
  dólares na época, e como programador. Hoje muito diretor de
 informática
 não
  ganha isso.
  A gente conhecia comandos que poucos mortais sabiam o que
 significavam.
 Você
  não imagina o terror que era treinar usuários novos (hoje ainda é,
 imagine).
  Eu tive alunos que ficavam minutos olhando para o teclado
 com medo de
 pegar.
  Livros? hehehehe - só em inglês e se comprasse fora, o
 máximo que você
  encontrava na livraria era introdução aos computadores,
 desde o Univac
  até... o Univac. Depois apareceu um livro muito bom de
 dbase II (precursor
  do clipper) escrito por Laercio Cosentino, hoje por sinal dono da
 Microsiga.
  Esse foi bom, tinha enormes 60 páginas. Eu dizia: meu deus,
 quanto coisa
  para estudar, aonde chegaremos?
  Já não vou te cansar mais com tanta história de velharia,
 mas lembre,
 daqui
  a uns 20 anos (ou menos

Re: [delphi-br] erro ao clicar pela segunda vez ou abir a tela de novo!

2004-12-07 Por tôpico itamar

este erro normalmente acontece qd voce fecha o form e da um free ao chamar o
form nao existe mais na memoria
eu uso por padrao sem tiro do auto-creat  shift+ctrl+f11
e SEMPRE chamo assim

try
   frm_cliente := tform_clientes.creat(application);
   frm_cliente.showmodal;
finally
   frm_cliente.free;
end;

ou seja sempre é criado na chamada e me garante que sempre vai ser destruido

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Erika [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, December 07, 2004 10:49 AM
Subject: [delphi-br] erro ao clicar pela segunda vez ou abir a tela de novo!




Olá pessoal,

No meu sistema, quando eu clico no botão de pesquisa, por exemplo,
ele executa normalmente. Só que quando eu quero fazer outra consulta
ele dá erro:

ACCESS VIOLATION AT ADDRESS 000. READ OF ADDRESS 

Isso também acontece com algumas telas. Na primeira vez normal, mas
depois que fecho e abro de novo dá esse erro...

Alguém sabe o que pode ser?

Obrigado

Erika





-- 
 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] Fw: Porque isso acontece

2004-12-07 Por tôpico itamar

APAGAM OU NAO SE A APLICACAO DE PAU OS ARQUIVOS VAO FICAR NA ESTACAO
CAUSANDO UM P. PROBLEMA POIS OS BLOQUEIO ANTERIORES VAO PERMANECER.


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Eduardo Silva ® [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, December 07, 2004 2:10 PM
Subject: RES: [delphi-br] Fw: Porque isso acontece



É o próprio BDE que cria esses arquivos para poder trabalhar em rede. Assim
que a aplicação se encerra esses arquivos se apagam.
  -Mensagem original-
  De: info.Desenvolvimento [mailto:[EMAIL PROTECTED]
  Enviada em: terça-feira, 7 de dezembro de 2004 10:05
  Para: [EMAIL PROTECTED]
  Assunto: [delphi-br] Fw: Porque isso acontece



  - Original Message -
  From: info.Desenvolvimento [EMAIL PROTECTED]
  To: [EMAIL PROTECTED]
  Sent: Tuesday, December 07, 2004 10:39 AM
  Subject: Porque isso acontece


   Gostaria de saber porque isso acontece?
  
   Minha aplicação é desenvolvida em Delphi5, usando tabelas Paradox.
   Na instalação são criadas as pastas:
   - icmWin: -  Executável e dlls;
   - Net: para configurar o NET DIR;
   - Priv: para controlar os arquivos temp e de lock (LCK);
   - Tabela: A base de dados.
  
   O que está acontecendo?
   A máquina que está como servidor (Windows 98) está gerando o arquivo
   Pdoxusrs.lck e Paradox.lck dentro da pasta Priv e dentro da pasta Tabela
  ao
   mesmo tempo, só que na pasta Priv ele só abre os arquivos e na pasta
  tabelas
   ele fica atualizando esses arquivos, fiz um teste e constatei esse
  problema.
   Por que acontecesse isso?
   Alguem pode me ajudar?
  
  
   PAULO FERNANDES
   PORTO ALEGRE - RS
  
  



  --
   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!.



---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.789 / Virus Database: 534 - Release Date: 07/11/2004


[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

 





Re: [delphi-br] Ancestrais

2004-12-07 Por tôpico itamar

tambem colecionei muito


posso te pedir um favor

em uma das revistas do ano de 1982 tem um a figura de um diabinho sentado em
um bancoquinho na freter de um micro cp500  estilizado em cor azul.


nesta pagina logo abaixo da figura tem uma rotina em basic usando uma
reotina de compactacao de 8 para 3 bytes e de 3 para 2 byte
e as respectivas descompactacao, eu usava esta coisa para exconder valores
em folhas de pagamento e diminuir tamanho dos arquivos

so que eu perdi a bendita rotina e com toda esta onda de nostalgia bateu
SAUDADES


SE ENCONTRAR A REFERIDA ROTINA FAVOR ME CONTACTE EM PVT

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Eduardo Jedliczka [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, December 07, 2004 4:37 PM
Subject: Re: [delphi-br] Ancestrais



MicroSistemas ?? Acho que tenho uns 80 exemplares...

Mas será que o amigo lembra da revista INPUT ???

[S]

=
Eduardo Jedliczka
GeraSoft Informática
Apucarana - PR
=
  - Original Message - 
  From: Fabiano Catrinck
  To: [EMAIL PROTECTED]
  Sent: Tuesday, December 07, 2004 3:37 PM
  Subject: Re: [delphi-br] Ancestrais


  O moderador está certo, esse assunto nada tem haver com o objetivo da
lista
  e portanto deve ser banido da mesma...

  Um abraço,
  Fabiano Catrinck



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










-- 
 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] Como tirar barra de tarefa do windows ?

2004-12-07 Por tôpico itamar

var
  Jan: HWnd;
begin
  Jan:= FindWindow(Nil,'Nome_do_projeto');
  if Jan  0 then ShowWindow(Jan,SW_Hide);
end;

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: bene20032004 [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, December 07, 2004 7:24 PM
Subject: [delphi-br] Como tirar barra de tarefa do windows ?




Como faço para tirar a barra de tarefa do windows e o menu iniciar
via programação ?
Desda ja, muito obrigado !





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

2004-12-06 Por tôpico itamar

se voce usa o banco mysql nas funcoes internas do banco tem crypto e
decrypto que voce pose usar dentro da aplicacao normalmente via comand
select

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Osmar de Souza Júnior [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, December 06, 2004 9:12 AM
Subject: [delphi-br] CRIPTOGRAFIA





preciso saber se alguem conhece rotinas de criptografia, e onde
encontra-las... (menos no google, obvio, ja procurei)...

preciso criptografar e descriptografar dados...

valews...





-- 
 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] Re: [Delphi-Lista] Impressao direta na rede ???

2004-12-03 Por tôpico itamar

acessa a porta do micro diretamente assim:
  AssignFile(IMPRESSORA,'\\micro_alvo\nome_impressora');  // nome da
impressora no compartilhamento Ex: epson,  HP


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Licerio Neto [EMAIL PROTECTED]
To: delphi-br [EMAIL PROTECTED]
Cc: delphi-lista [EMAIL PROTECTED]; delphi-no-brasil
[EMAIL PROTECTED]; delphi-total
[EMAIL PROTECTED]; delphi_linhadecodigo
[EMAIL PROTECTED]; DELPHI_SOPROGRAMADORES
[EMAIL PROTECTED]; lista-delphi
[EMAIL PROTECTED]
Sent: Friday, December 03, 2004 2:58 PM
Subject: [Delphi-Lista] Impressao direta na rede ???



Estou fazendo uma impressa direta usando os comandos:
// lpt1: - Poderia ser LPT, COM1,// Servidor/impressora}
  AssignFile(IMPRESSORA,'LPT1');
  {abre a porta da impressão }
  Rewrite(IMPRESSORA);
  {envia caractere de controle para comprimir a impressão}
  Write(Impressora,#27+'x0');
  Write(Impressora,#18);

se a impressora estiver no proprio pc funcina perfeitamente mas nao
funcionou numa impressa de rede localizada em outro computador.. ela foi
instala e captura a porta corretamente.. Alguem sabe pq ???

Grato


-
Yahoo! Mail - Agora com 250MB de espaço gratuito. Abra uma conta agora!

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



Configure seu usuario: http://groups.yahoo.com/group/delphi-lista/join
*
Enviar mensagem...: [EMAIL PROTECTED]
Assinar...: [EMAIL PROTECTED]
Historico do grupo: http://www.egroups.com/messages/delphi-lista
Area de donwload...: http://groups.yahoo.com/group/delphi-lista/files/
Moderador da lista: [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] Componente ENTER para Delphi 6

2004-12-01 Por tôpico itamar

GOSTARIA DE PADIR A TODOS DA LISTA QUE ASSINEM SUAS MENSAGENS (A EXEMPLO DO
QUE EU FAÇO) POIS ISSO FACILITA A TODO O EVIO DE ALGOM EM PVT TIRANDO DA
LISTA AQUELE CHATO
EU TAMBEM QURO
ENVIA PARA MIM E O CARA NAO COLOCA O E-MAIL DELE


A GENTE AS VEZES ATE TEM BOA VONTADE MA DESANIMA PELA FALTA DE INFORMACAO

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Otavio Gasparovic do Nascimento [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, December 01, 2004 8:36 PM
Subject: RES: [delphi-br] Componente ENTER para Delphi 6



 Eu utilizo o componente DOSMOV funciona muito bem no delphi 5 acredito que
 seja compativel com o delphi 6 eu encontrei na rede se desejar posso
enviar
 em pvt.

 Otavio
 Cidreira/RS

 -Mensagem original-
 De: marcio de Souza [mailto:[EMAIL PROTECTED]
 Enviada em: quarta-feira, 1 de dezembro de 2004 20:28
 Para: Delphi br
 Assunto: [delphi-br] Componente ENTER para Delphi 6



 Algum colega sabe onde eu encontro um componente que substitua o tab pelo
 Ente de preferencia Free.

 Agradeço.

 Marcio.


 -
 Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!

 [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









 ---
 Incoming mail is certified Virus Free.
 Checked by AVG anti-virus system (http://www.grisoft.com).
 Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004

 ---
 Outgoing mail is certified Virus Free.
 Checked by AVG anti-virus system (http://www.grisoft.com).
 Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004



 -- 
  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] Componente ENTER para Delphi 6

2004-12-01 Por tôpico itamar

veja que mesmo gritando voce nao foi capaz de entrar no seu browser e cria
uma assinatura para facilitar a vida de todos, de qualquer forma desculpas a
todos que se ofenderam.


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Rodrigo Americo [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, December 01, 2004 10:55 PM
Subject: Re: [delphi-br] Componente ENTER para Delphi 6



Só não precisa gritar...


On Wed, 1 Dec 2004 22:45:28 -0200, itamar [EMAIL PROTECTED] wrote:

 GOSTARIA DE PADIR A TODOS DA LISTA QUE ASSINEM SUAS MENSAGENS (A EXEMPLO
DO
 QUE EU FAÇO) POIS ISSO FACILITA A TODO O EVIO DE ALGOM EM PVT TIRANDO DA
 LISTA AQUELE CHATO
 EU TAMBEM QURO
 ENVIA PARA MIM E O CARA NAO COLOCA O E-MAIL DELE

 A GENTE AS VEZES ATE TEM BOA VONTADE MA DESANIMA PELA FALTA DE INFORMACAO

 [EMAIL PROTECTED]
 Analista de Sistemas
 itamar roloff
 ---
 - Original Message -
 From: Otavio Gasparovic do Nascimento [EMAIL PROTECTED]
 To: [EMAIL PROTECTED]
 Sent: Wednesday, December 01, 2004 8:36 PM
 Subject: RES: [delphi-br] Componente ENTER para Delphi 6

 
  Eu utilizo o componente DOSMOV funciona muito bem no delphi 5 acredito
que
  seja compativel com o delphi 6 eu encontrei na rede se desejar posso
 enviar
  em pvt.
 
  Otavio
  Cidreira/RS
 
  -Mensagem original-
  De: marcio de Souza [mailto:[EMAIL PROTECTED]
  Enviada em: quarta-feira, 1 de dezembro de 2004 20:28
  Para: Delphi br
  Assunto: [delphi-br] Componente ENTER para Delphi 6


 
 
 
  Algum colega sabe onde eu encontro um componente que substitua o tab
pelo
  Ente de preferencia Free.
 
  Agradeço.
 
  Marcio.
 
 
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador
agora!
 
  [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
 
 
 
 
 
 
 
 
 
  ---
  Incoming mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004
 
  ---
  Outgoing mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004


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







-- 
 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: RES: [delphi-br] backup do banco mysql

2004-11-30 Por tôpico itamar

desculpas por me meter no assunto que esta interessante.
eu tambem uso mysql, nao sei como voces estao dando a carga do banco ao
iniciar o serviço
bom tem duas maneiras
1 - dentro do iniciar do windows fica o atalho  WINMYSQLADMIN.EXE
2 - dentro do iniciar do windows fica o atalho  MYSQLD-OPT.EXE
esta segunda opcao nao mostra a sinaneira e permite um parametro
interessante (--flush) no atalho
isso mantem o banco sempre descarregado ou FAZ um COMMIT transacao via
BANCO.


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Weber Luvisa [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, November 30, 2004 11:33 AM
Subject: Re: RES: [delphi-br] backup do banco mysql




Eu crie uma rotina para isso !!

// esta rotina mostra o nome de todas as tabelas..
Tabelas.Sql.Clear;
Tabelas.Sql.Add('SHOW TABLES');
Tabelas.OPen;

begin
  Tabelas.Open;
  Tabelas.First;
  while not Tabelas.Eof do
  begin
Backup.Close;
Backup.Sql.Clear;
Backup.Sql.Add('BACKUP TABLE '+Tabelas.Fields[0].Value+'
TO C:/COPIABANCO/BACKUP');
Backup.ExecSql;
Tabelas.Next;
  end;
  Close;

// a um porem.. esta rotina não salva os arquivos de indices tendo
que ser recriados.. ou copiados do diretorio padrao para outra basta
de backup..


--- Em [EMAIL PROTECTED], Otavio Gasparovic do
Nascimento [EMAIL PROTECTED] escreveu
 Grato pela ajuda

 -Mensagem original-
 De: Rafael Stoever [mailto:[EMAIL PROTECTED]
 Enviada em: terça-feira, 30 de novembro de 2004 09:13
 Para: [EMAIL PROTECTED]
 Assunto: Re: [delphi-br] backup do banco mysql



 Sei q na versão 5 tem uma forma de fazer replicação em outro banco
MySQL
 assim fazendo um backup.
 Outra é vc salvar sempre o diretorio do banco, no padrão
 \mysql\data\database


 .Rafael Stoever
 .Suporte/Desenvolvimento
 - Original Message -
 From: Otavio Gasparovic do Nascimento [EMAIL PROTECTED]
 To: [EMAIL PROTECTED]
 Sent: Monday, November 29, 2004 8:11 PM
 Subject: [delphi-br] backup do banco mysql



 Pessoal,

 Gostaria se possível uma opnião sobre backup no mysql,
 qual a melhor solução?



 PARA QUE REPETIR OS ERROS ANTIGOS QUANDO HÁ TANTOS ERROS NOVOS A
COMETER?.
 (Bertrans Russel)
 ---
 Outgoing mail is certified Virus Free.
 Checked by AVG anti-virus system (http://www.grisoft.com).
 Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004



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









 ---
 Incoming mail is certified Virus Free.
 Checked by AVG anti-virus system (http://www.grisoft.com).
 Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004

 ---
 Outgoing mail is certified Virus Free.
 Checked by AVG anti-virus system (http://www.grisoft.com).
 Version: 6.0.802 / Virus Database: 545 - Release Date: 26/11/2004





-- 
 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] Duvidas Cartão de ponto

2004-11-29 Por tôpico itamar

use sistema flip-flop ou seja pequisa a mtricula do cracha e o numero da
leitora a priveira vez - entrada a segunda vez saida e assim sucessivamente.

porque o numero da leitora?
se na portaria entrada / saida
se no refeitorio cobrança de alimentos e controle de horario de almoco
entrada / saida
se no almoxarifado valida ou nao a entrada (somente pessoas autorizadas)

isso depende das regras de cada empresa.


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: alisson_delphi [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, November 29, 2004 9:58 AM
Subject: [delphi-br] Duvidas Cartão de ponto




Eu gostaria de saber se tem como e qual os códigos usados para fazer
o seguinte...
Eu tenho um cartão de ponto e quero implementar nele o seguinte..]
Tenho um campo edit que tem a hora atual e um campo que tem a entrada
e saida e tenho uma tabela que na qual está marcado todos os horários
internamente gostaria de fazer o seguinte quando ele passar o
cartão de ponto o sistema tem que pegar a hora e dizer se eh entrada
ou saida, mais isso tem que ser internamente.. tipo passei o cartão
de ponto eu naum me preocupo em ir a lá e colocar entrada o sistema
coloca automático pois ele tem a hora.
Naum sei se entenderam. e gostaria de saber se isso eh possivel e
como eu posso fazer isso.





-- 
 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] Ejetar papel em uma impressora da rede.

2004-11-27 Por tôpico itamar

manda um salto de folha diretamente para a impressora alvo.

ex: via dos
echo  ^L  \\sua_maquina_alvo\nomo_impressora  // ^L   no dos ctrl+l
ou chr(12)
via delphi

assignfile(F,'\\sua_maquina_alvo\nomo_impressora')
rewritln(f,#12);
closefile(f);


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: 3ª ONDA Informática [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Saturday, November 27, 2004 12:27 PM
Subject: [delphi-br] Ejetar papel em uma impressora da rede.



Olá,

Consegui com um colega um código que ejeta papel numa impressora instalada
na porta paralela.
Mas não preciso ejetar 19 linhas de de papel numa impressora que está na
rede... como faço isso.
Uma porta paralela de outro computadora (claro).

Agradeço a ajuda.

Leonardo Freitag

[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

 





Re: [delphi-br] Agenda de feriados

2004-11-25 Por tôpico itamar

coloca no evento click deste seu componete um select dos seus feriado com a
clausula where = ano que estiver aparecendo no seu componente.

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Eduardo Silva ® [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, November 25, 2004 3:08 PM
Subject: [delphi-br] Agenda de feriados



Galera, baixei um programinha da internet (uma agenda de compromissos) que
nela tem um formulário de cadastros de feriados.

Nessa tela, tem um spinedit (acredito eu) com o ano, conforme vc vai
aumentando ou descendo o ano ele vai me mostrando os feriados

daquele ano, onde é exibido o dia e o mês do feriado e o nome do feriado
também, por ex:

2004

01/01 - Dia da Confraternização Universal
24/02 - Carnaval
etc

Conforme se caminha nos anos (spinedit) os dias dos feriados aleatórios vai
se alternando (carnaval, Corpus Christi, etc)

Eu gostaria de fazer um form igual a esse no meu sistema, mas não faço a
mínima idéia de como ele foi feito. Alguém pode me dar uma

mão ?

Outra coisa, ele permite excluir e incluir feriados também


 _  __  _
/ )|  |( \
   / / | Eduardo de Almeida Silva | \ \
 _( (_ |  _  * [EMAIL PROTECTED]   _  | _) )_
(((\ \)|_/ )__( \_|(/ /)))

( \_/ /\ \_/ )

 \   /  \   /

  \_/\_/

  /   /\   \


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.789 / Virus Database: 534 - Release Date: 07/11/2004


[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

 





Re: [delphi-br] Onde conseguir o componente MSOFFICECAPTION

2004-11-25 Por tôpico itamar

procura no google que tem


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Tavares - Futurize [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, November 25, 2004 4:04 PM
Subject: [delphi-br] Onde conseguir o componente MSOFFICECAPTION



Bom dia a todos,

Gostaria de saber se alguem sabe onde posso conseguir o componente
MSOFFICECAPTION.
Obrigado

tavares



-- 
 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] rfps - Executar Shell

2004-09-21 Por tôpico itamar

faca o seu scritp no linux normalemnte com seus comandos
salve o mesmo NOME_DO_ARQUIVO
de um CHMOD 666 para dar permissao de execucao
é só executar o casa sh NOME_DO_ARQUIVO

[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Ricardo Francisco de Pierre Satin [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, September 21, 2004 5:35 PM
Subject: [delphi-br] rfps - Executar Shell


Salve, to precisando executar um Shell no linux, um bom e velho
sh algumacoisa.sh

como faco isso direto da minha aplicacao?

valeu



-- 
 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] DataSet do QuickReport

2004-09-15 Por tôpico itamar
gera uma tabela temporaria, preencha os campos conforme relatorio
faca uma query para esta tabela temporaria e pronto


[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message - 
From: Eduardo Jedliczka [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Wednesday, September 15, 2004 5:18 PM
Subject: Re: [delphi-br] DataSet do QuickReport


Faz o relatório na mão

[s]

=
Eduardo Jedliczka
GeraSoft Informática
Apucarana - PR
=
  - Original Message - 
  From: er83pet04
  To: [EMAIL PROTECTED]
  Sent: Wednesday, September 15, 2004 3:45 PM
  Subject: [delphi-br] DataSet do QuickReport


  Como deve ser preenchida a propriedade DataSet do QuickReport,
  quando tenho várias queries em um relatório. Quando tenho apenas uma
  query, beleza, mas várias.
  Se colocar uma determinada query como sendo o DataSet, o resultado
  das outras não são exibidos.
  Qual a solução neste caso?

  Valeu...



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








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