Re: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?

[Williams Diaz]

Sem problemas Jimi,

não tem nada de mais defender com unhas e dentes as nossas convicções. Não 
achei que fosse grosseria da sua parte, talvez um pouquinho radical (risos), 
mas todos nós somos um pouco né?.

Acho que é por aí mesmo: a pergunta é "quanto vc quer gastar", ou pelo menos 
a primeira pergunta. :);
Também tem outra coisa.. As vezes uma base parece mais lenta do que a outra, 
mas depende da aplicação, da máquina, do cara saber configurar e fazer a 
sintonia fina (coisa que te confesso eu não sei fazer, talvez por isso goste 
tanto do mssql-instalou funcionou.).

valeu a sua opinião, espero que nosso colega tenha aproveitado alguma coisa.

abraços,

williams

*---
Williams Díaz
[EMAIL PROTECTED]
http://www.interban.com.br

- Original Message - 
From: "Jimi Roy Pugss" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 11:39 PM
Subject: Re: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?



Sem recentimentos, mas hoje mesmo, tive um papo miiito estressante a
esse respeito com outro colega (ao vivo) com relação ao interbase vc tem
toda a razao mesmo, acho que entre interbase e msde, eu até optasse pelo
msde, entre SQLServer e FIREBIRD, bom ai, eu perguntaria ao cliente
"Quanto vc quer gastar?" em termos de performance, tenho muito a dizer
quanto as duas suites (FIREBIRD e SQLServer) e por experiencia de uso
massivo de suas soluções, garanto que mesmo a engine do SQLServer ser
uma "MÃE" aos programadores, o Firebird tem surpreendido e muito as
comunidades de desenvolvedores por ai a fora, e sou MCP M$icrosoft, e
mesmo assim, conhecendo a fundo seus produtos e recomendando-os conforme
o caso, recomendo tambem o Firebird, por ter inumeras vantagens, dentre
elas ser multi-plataforma e poder atender tanto pequena, media, e grande
solução sem precisar mudar nada. No demais, peço desculpa a todos caso
tenha parecido meio "rancoroso" ou até mesmo "grosseiro".

Um [] a todos. duvidas email-me





-- 
< 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] Nome Máquina/Usuário

[Maicon Buttignon Botega]

Pessoal,

Preciso capturar o nome de usuário logado e o nome da máquina.
Já tentei com o Registry e tal, mas não da muito certo não...
O nome da máquina até retorna o correto, mas o do usuário de rede 
logado não.
Alguém saberia me ajudar a fazer isto sem usar o Registry?

Grato!

Maicon





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

 

RES: [delphi-br] Dúvida sobre um loop

[Walter Alves Chagas Junior]

Olá amigo,

Você tem que consistir os dados nos edits antes de gravá-los, principalmente
dados do tipo inteiro e flutuante que dão pau se forem gravados em formato
inválido.

veja uma dica:

> Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> clicar direto no Button!! Dá o seguinte erro: 

Para solucionar isto, no Evento OnClick do Button coloque o seguinte código:

if Edit1.Text = '' then 
   Edit1.Text := '0,00'

Isto faz com que o Valor do Edit, caso ele esteja vazio, seja-lhe atribuído
o valor 0,00 que não dá problema de gravação no banco.


E no Evento OnKeyPress do Edit, coloque o seguinte código:

 if not (Key in [#8,#9,'0'..'9',',']) then
  begin
key := #0;
setfocus;
  end; 
 
Isto impede que o usuário digite caracteres inválidos no Edit fazendo com
que ele somente aceite numeros e a virgula.

 
 []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: Andre de Souza Ferreira [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 10:17
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Dúvida sobre um loop
> 
> 
> 
> Pessoal, bom dia a todos;
>  
> Sou iniciante em programação Delphi e ká; estou eu estudando 
> e me deparei com um problema!!! Tô fazendo um programinha, 
> cujo a intensão é recolher dados de Salário da população e  
> número de Filhos.
>  
> Até aí ok!!! Coloquei no Form dois Edit's, um Botton para 
> processar a informação e um Memo, onde sairão os cálculos!!! 
>  
> Os Cálculos são estes:
>  
> Média de salários da populaçãoo, média de filhos, maior 
> salário e percentual de pessoas com salário até 100,00 reais. 
> Beleza!!!
>  
> Coloquei um while, e minha condição de saída é um salário 
> negativo. Mas não tô conseguindo prossessar o cálculo A 
> cada volta do loop, ele me trás o cálculo que o sistema 
> pede!!! O que tenho feito de errado
>  
> Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> clicar direto no Button!! Dá o seguinte erro: 
> ---
> Debugger Exception Notification
> ---
> Project Project_Ex3.exe raised exception class EConvertError 
> with message ''' is not a valid floating point value'. 
> Process stopped. Use Step or Run to continue.
> ---
> OK   Help   
> ---
>  Como faço  para evitar isso???
>  
> E a respeito do cálculo, como faço? Segue o código. Agradeço 
> se houver alguem experiente no grupo que possa me dá¡ uma 
> luz, a final, ninguém nasce sabendo!!!
>  
> procedure TForm1.ProcessarClick(Sender: TObject);
> Var
> Salario, Maior_Salario, Soma_Salario, 
> Soma_Filhos,Media_Salario, Media_Filho, Salario_Inicial, 
> Percentual: Real;
> Filhos, Cont, Conta_Sal_100: Integer;
> begin
>  Salario:= StrtoFloat (Edit1.Text);
>  Filhos:= StrtoInt (Edit2.Text);
>  While Salario < 0 do
>  Soma_Salario:=0;
>  Soma_Filhos:=0;
>  Cont:=0;
>  Conta_Sal_100:=0;
>  Salario_Inicial:=Salario;
>  Maior_Salario:=0;
>   begin
>  Soma_Salario:=Soma_Salario + Salario;
>  Soma_Filhos:=Soma_Filhos + Filhos;
>   if Salario<= 100 then
>  Conta_Sal_100:=Conta_Sal_100 + 1;
>   if Salario >= Salario_Inicial then
>  Maior_Salario:= Salario;
>  Cont:=Cont + 1;
>   end;
>   Edit1.Clear;
>   Edit2.Clear;
>   Edit1.SetFocus;
>   Media_Salario:=Soma_Salario/Cont;
>   Media_Filho:=Soma_Filhos/Cont;
>   Percentual:=(Conta_Sal_100/Cont)/100;
>   Memo1.Lines.Add('A Média de Salário da População é de 
> R$ ' + Floattostr(Media_Salario) + #13);
>   Memo1.Lines.Add('A Média de Filhos da População é de  ' 
> + Floattostr(Media_Filho) + ' Filhos' + #13);
>   Memo1.Lines.Add('O Maior de Salário da População é de 
> R$ ' + Floattostr(Maior_Salario) + #13);
>   Memo1.Lines.Add('O Percentual de pessoas que ganham menos 
> de R$ 100,00 : ' + Floattostr(Percentual) + '%' +  #13);
>   end;
>  
> 
> Att.
> André Ferreira
> Brasilsaúde Cia de Seguros
> 
> 
> 
> [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
> 
> 
> 
> 
>  
> 
> 
> 


[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

Re: [delphi-br] Delphi 6 e Fiebird 1.5

[Mario Scavoni]

Obrigado pelas ajudas.
[]'s
Mario
- Original Message - 
From: "Eduardo Galvão" <[EMAIL PROTECTED]>
To: "Lista Delphi" 
Sent: Monday, December 27, 2004 2:45 PM
Subject: Re: [delphi-br] Delphi 6 e Fiebird 1.5


>
> Olá,
>
> > Eduardo,
> > os campos do arquivo TXT estão delimitados pelo ';'.
> > dtm_Dados.tblMala.Append;
> > dtm_Dados.tblMala.ApplyUpdates;
>
> Usando append, post... vai ficar realmente lento, e cada
> vez mais lento.
>
> Ao invés, utilize o comando INSERT do sql, assim você
> vai gravar direto no banco.
>
> Ex:
>
> qry.close;
> qry.sql.text:='INSERT INTO TABELA(nome,endereco)
> VALUES ('João','Rua X')...
> qry.open;
>
> Vai ficar MUITÍSSIMO mais rápido.
>
> Saudações,
> Eduardo Paci Galvão
> Engenheiro Eletricista UFMG 1990
> www.egalvao.com.br
> MSN: [EMAIL PROTECTED]
> Skype: eduardogalvao
>
>
>
>
>
>
> -- 
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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] [OFF-TOPIC] - Cadastro de PJ

[Williams Diaz]

Tinha uma cara que vendia, mas está preso agora.. (rs).
Essa base é (teoricamente) confidencial e é crime divulgá-la.
O que se refere sanear? - tem empresas de cadastro que fazem isso 
legalmente.
A outra é você contratar alguém para acessar o site da receita e conferir um 
por um se é válido e ativo.

abraços,

williams

*---
Williams Díaz
[EMAIL PROTECTED]
http://www.interban.com.br

- Original Message - 
From: "JGodoi" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 11:23 AM
Subject: [delphi-br] [OFF-TOPIC] - Cadastro de PJ




Pessoal,

Estamos desenvolvendo um novo sistema em D7+FB e presisamos sanear o 
cadastro de Clientes Pessoa Jurídica da Empresa.  Gostaria de saber se vcs 
sabem de algum orgão ou empresa que disponibiliza ou vende um cadastro de 
PJ.

Grato,

JGodoi
[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] Que banco de dados usar? Alternativa ao Interbase?

[Jimi Roy Pugss]

TSTSTSTS, tente conectar com 15 usuarios simultaneos, e depois reveja
sua resposta!

Ou vc acha que a M$crosoft ia fazer um "SERVIDOR" de banco de dados
gratuito, que fosse tão bom quanto o pago? reveja a documentação
espertinho e depois veja a performance para mais de 5 connections, e
ainda a "licenca" de uso apenas para desenvolvedores, arrisca quem quer,
diz como foi quem ja usou, toma a decisão correta quem tem juízo..

[]'s

Em Seg, 2004-12-27 às 19:28, Williams Diaz escreveu:
> Paulo,
> 
> use o msde 2000, que é a versão free o sql server, é muito bom e mais rápido 
> que o interbase e o firebird.
> 
> abraços,
> 
> williams
> 
> *---
> Williams Díaz
> [EMAIL PROTECTED]
> http://www.interban.com.br
> 
> - Original Message - 
> From: "delphi6_2005" <[EMAIL PROTECTED]>
> To: 
> Sent: Monday, December 27, 2004 9:41 AM
> Subject: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?
> 
> 
> 
> 
> Amigos preciso de uma dica, preciso desenvolver uma aplicação
> relativamente simples e não sei qual banco utilizar, pois só conheço
> o oracle, como não preciso de muito recurso será que o interbase
> poderia servir, há alguma alternativa ao interbase?
> 
> grato pela ajuda
> 
> 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] Ícones

[Fabio Giro]

www.icone-gif.com/

Espero ter ajudado.

- Original Message -
From: "galvao_em" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 10:46 AM
Subject: [delphi-br] Ícones




Olá pessoal, estou desenvolvendo um sistema para controle de frotas, e
estou precisando de ícones para o mesmo. Se alguém tiver algum,
agradeceria.





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

 

RES: [delphi-br] String

[Diogo]

Uma função nativa da Delphi que retire tudo de uma vez só, acho que não tem,
aconselharia a usar StringReplace, ou criar uma função que faça isso.

Ex: function retira(teste : string): string;
begin
teste := trim(StringReplace(teste,'.','',[rfReplaceAll]));
teste := trim(StringReplace(teste,'/','',[rfReplaceAll]));
teste := trim(StringReplace(teste,'-','',[rfReplaceAll]));
result := teste;
end;

A função não é muito "elegante" hehehe, mas funciona.
[]s

-Mensagem original-
De: luciano [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 08:02
Para: delphi
Assunto: [delphi-br] String


Pessoal alguém sabe se existe alguma função que retire da string um ou mais
caracteres que não desejo.

Ex: String "11.111.111/-11", desta string não quero os pontos, os traços
e nem a barra.

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] Programa de Folha de Pagamento

[Neto]

Você é desenvolvedor?
Ou quer "apenas" um programa para administrar um condomínio com "apenas" 10
funcionários?

Tenta encontrar na superdownloads algum freeware. Sei que tem um monte lá.

[]'s

Neto
- Original Message -
From: "joaoguaraldo" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 8:32 PM
Subject: [delphi-br] Programa de Folha de Pagamento





Necessito para administrar um condominio com menos de 10
funcionários, de um programa para confecção de Folha de Pagamento.
Quem puder me ajudar eu agradeço.
Necessita ser freeware.
João Guaraldo








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











---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.809 / Virus Database: 551 - Release Date: 09/12/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

<*> 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] Capturar tecla digitada!!!

[Hudson]

Ola!
Estou precisando de capturar tecla digitada pelo usuario, mesmo se o soft 
estando em 2º seleção do windows..

sei que para isso tenho que buscar na saida ou entrada  do teclado

Obrigado Hudson

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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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



  Yahoo! Grupos, um serviço oferecido por: 
   
   

   
 



Links do Yahoo! Grupos

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



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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

 

Re: [delphi-br] Verificar data

[Neto]

Bem,
para que as configuracoes de data e hora sejam "padronizadas",
independentemente do SO, no seu aplicativo faça assim:

No OnCreate do form principal insira o seguinte:

ShortDateFormat := 'dd/mm/yy';
TwoDigitYearCenturyWindow := 50;

[]'s
Neto
- Original Message -
From: "Bianca Beiruth" <[EMAIL PROTECTED]>
To: 
Sent: Saturday, December 25, 2004 4:30 AM
Subject: Re: [delphi-br] Verificar data




olá, denis!
vc vai capturar essas datas dentro de querys ou no escopo do seu código?
qual o SGBD q vc usa?
EncodeDate ou DecodeDate não serviriam pra vc?

NovaData:=EncodeDate(15,2,04);

o DecodeDate é usado p/ obter o dia, mês e ano correspondente a uma data
definida
em uma variável do tipo TDate Time. nesse caso, devem ser passados como
parâmetros
um valor do tipo TDateTime, cujo valor será convertido, e três variáveis
inteiras
sem sinal, tipo Word, que representam, respectivamente, o ano, o mês e o dia
a
serem obtidos e passados por referência.

//este procedimento, por exemplo, eu uso p/ pegar a data atual do sistema,
no
escopo do meu código (essa é uma forma), mas tb pego em querys (eu uso o
oracle).
Var
  SYS_DAY, SYS_MON, SYS_YEAR:Word;
  A_DAY, A_MON, A_YEAR  :String;
begin
  DecodeDate(Date,SYS_YEAR,SYS_MON,SYS_DAY);
  Edit.Text:='';
  A_DAY:=IntToStr(SYS_DAY);
  A_MON:=IntToStr(SYS_MON);
  A_YEAR:=IntToStr(SYS_YEAR);

   If SYS_DAY<10
   then Edit.Text:='0'+A_DAY[1]+'/'
   else Edit.Text:=A_DAY+'/';

   If SYS_MON<10
   then Edit.Text:=Edit.Text+'0'+A_MON[1]+'/'
   else Edit.Text:=Edit.Text+A_MON+'/';

   Edit.Text:=Edit.Text+A_YEAR[3]+A_YEAR[4]; //p/ pegar as 2 últimas
posições
end;

e ae?

abraços,
bia.
>
>
> Colegas,
>
> Como existem n tipos de confirgurações de data , preciso fazer com
> que meu sistema aceite e interprete somente um tipo DD/MM/YY.
>
> Como fazer isso, pois tenho vários procedimentos  em que preciso
> pegar data do servidor, e data dos arquivos que irei utilizar.
>
> Alguem sabe como fazer isso ?
>
>
> Sds
>
> Denis
>
> FELIZ NATAL
>
>
>
>
>
>
>
>
> --
>> FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM !!
>
>
>
>
>
>
>
> 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!.
>
>
>
>
>
>
>
>
>
>
>
>
>






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











---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.809 / Virus Database: 551 - Release Date: 09/12/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

<*> 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 em usar o componente BusinessSkinForm

[Daguier]

Voce ja tentou usar ao procedimento Perform?
Ex: If Key=#13 Then Perform(WM_NEXTDLGCTL,0,0);
- Original Message -
From: "Marcelo Carvalho" <[EMAIL PROTECTED]>
To: ; <[EMAIL PROTECTED]>;
<[EMAIL PROTECTED]>
Sent: Sunday, December 26, 2004 1:15 PM
Subject: [delphi-br] Dúvida em usar o componente BusinessSkinForm


>
> Como faço para saltar de um campo para outro com ENTER ao invés de TAB ???
>
> Atenciosamente,
>
> Marcelo Carvalho
> [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

 

[delphi-br] Duvida com StringList

[Leandro Ferreira]

Olá Amigos da Lista,

Gostaria de tirar a seguinte duvida:

Estou tentando salvar o conteúdo de um StringList em um arquivo e 
não sei como faço, pois das formas que tentei ele está sobrescrevendo as 
linhas existentes e não inserindo novas linhas. Alguém poderia ajudar-me 
a escever este pedaço de código.

Segue abaixo parte do código que executo para salvar o conteúdo do 
stringlist, o problema é que quando chega no ultimo if ele verifica o 
conteúdo e sobrescreve o que existe no arquivo, mesmo que o conteúdo 
seja diferente do conteúdo que foi digitado no Memo. Gostaria de 
verificar se existe uma linha igual e em caso de igual ele descarta a 
linha e em caso de diferente ele pula de linha até encontrar uma linha 
em branco e quando encontrar esta linha em branco escrever a nova linha. 
Alguém sabe se é possivel?

Public
{publicas}
Lista : TStringList;

procedure TForm1.GravaArquivo;
var
   x : integer;
begin
 for x := 0 to Lista.Count - 1 do
 begin
  if lowercase(before(Lista.strings[x],'=')) = 'inbox' then  
//before é uma função que pega o conteúdo até o simbolo descrito ao 
lado('=')
  begin
 Lista.strings[x] := 'inbox='+edtDefaultInbox.Text;
  end;

  if (pos('*' , (lowercase(before(memoInbox.Lines.Strings[x], 
'='>0) or
 (pos('.' , (lowercase(before(memoInbox.Lines.Strings[x], 
'='>0) then
  begin
 if memoInbox.Lines.Strings[x] <> Lista.Strings[x] then
 begin
   Lista.Strings[x]:=memoInbox.Lines.Strings[x];
 end;
  end;

 end;//for
end;//procedure


Exemplo: O conteúdo abaixo é referente ao arquivo que preciso alterar, 
mas ele é sobrescrito pelo novo conteúdo que digito no Memo.

//////
;TESTE

inbox=c:\teste\inbox
outbox=c:\teste\outbox

*.*.*=*.*.*
*.*=*.*
*=*

1- ERRO
2- OK
3- LOG
//////

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

<*> 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] is not a valid integer value

[Neto]

Vc deve estar fazendo relacionamento entre as tables usando campos que não
são Integer. Relacione as tables usando campos tipo ID como integer not
null.

Atenciosamente

Neto
- Original Message -
From: "Josimar Guedes de Carvalho" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 2:44 PM
Subject: [delphi-br] is not a valid integer value




Boa tarde,


Caros amigos isso e urgente a muito tempo que estou passando por
esse problema já não sei como fazer mais pois já tentei de tudo ate recriar
o banco de dados que esta em interbase ,  tenho uma tabela cliente e um
outra de eventos um evento tem que ter um cliente quando vou gravar o código
do cliente na tabela de eventos da o seguinte erro "is not a valid integer
value"  alguém tem idéia de como posso fazer para resolver esse problema.
Isso tem uma certa urgência pois meu prazo já acabou.
Josimar Guedes de Carvalho
  [EMAIL PROTECTED] /
 [EMAIL PROTECTED]
   Analista de Sistemas - Equipe de DW - INEP-MEC
Tel: 55-(61)2104-9760
Cel:55-(61)9635-7272




[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











---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.809 / Virus Database: 551 - Release Date: 09/12/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

<*> 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 sobre um loop

[Neto]

Faça um tratamento de erros no seu aplicativo. No evento OnExit dos
componentes edits use a função de conversão (tipo StrToInt, etc)
exemplo:
No onexit do edit:

try
 StrToInt(edit1.text);
except
 showmessage('valor inválido');

Ok?

Neto
- Original Message -
From: "Andre de Souza Ferreira" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 11:17 AM
Subject: [delphi-br] Dúvida sobre um loop



Pessoal, bom dia a todos;

Sou iniciante em programação Delphi e ká; estou eu estudando e me deparei
com um problema!!! Tô fazendo um programinha, cujo a intensão é recolher
dados de Salário da população e  número de Filhos.

Até aí ok!!! Coloquei no Form dois Edit's, um Botton para processar a
informação e um Memo, onde sairão os cálculos!!!

Os Cálculos são estes:

Média de salários da populaçãoo, média de filhos, maior salário e percentual
de pessoas com salário até 100,00 reais. Beleza!!!

Coloquei um while, e minha condição de saída é um salário negativo. Mas não
tô conseguindo prossessar o cálculo A cada volta do loop, ele me trás o
cálculo que o sistema pede!!! O que tenho feito de errado

Mais uma pergunta: Se o usuário não digitar nada nos Edit's e clicar direto
no Button!! Dá o seguinte erro: ---
Debugger Exception Notification
---
Project Project_Ex3.exe raised exception class EConvertError with message
''' is not a valid floating point value'. Process stopped. Use Step or Run
to continue.
---
OK   Help
---
 Como faço  para evitar isso???

E a respeito do cálculo, como faço? Segue o código. Agradeço se houver
alguem experiente no grupo que possa me dá¡ uma luz, a final, ninguém nasce
sabendo!!!

procedure TForm1.ProcessarClick(Sender: TObject);
Var
Salario, Maior_Salario, Soma_Salario, Soma_Filhos,Media_Salario,
Media_Filho, Salario_Inicial, Percentual: Real;
Filhos, Cont, Conta_Sal_100: Integer;
begin
 Salario:= StrtoFloat (Edit1.Text);
 Filhos:= StrtoInt (Edit2.Text);
 While Salario < 0 do
 Soma_Salario:=0;
 Soma_Filhos:=0;
 Cont:=0;
 Conta_Sal_100:=0;
 Salario_Inicial:=Salario;
 Maior_Salario:=0;
  begin
 Soma_Salario:=Soma_Salario + Salario;
 Soma_Filhos:=Soma_Filhos + Filhos;
  if Salario<= 100 then
 Conta_Sal_100:=Conta_Sal_100 + 1;
  if Salario >= Salario_Inicial then
 Maior_Salario:= Salario;
 Cont:=Cont + 1;
  end;
  Edit1.Clear;
  Edit2.Clear;
  Edit1.SetFocus;
  Media_Salario:=Soma_Salario/Cont;
  Media_Filho:=Soma_Filhos/Cont;
  Percentual:=(Conta_Sal_100/Cont)/100;
  Memo1.Lines.Add('A Média de Salário da População é de R$ ' +
Floattostr(Media_Salario) + #13);
  Memo1.Lines.Add('A Média de Filhos da População é de  ' +
Floattostr(Media_Filho) + ' Filhos' + #13);
  Memo1.Lines.Add('O Maior de Salário da População é de R$ ' +
Floattostr(Maior_Salario) + #13);
  Memo1.Lines.Add('O Percentual de pessoas que ganham menos de R$ 100,00 : '
+ Floattostr(Percentual) + '%' +  #13);
  end;


Att.
André Ferreira
Brasilsaúde Cia de Seguros



[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











---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.809 / Virus Database: 551 - Release Date: 09/12/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

<*> 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] Que banco de dados usar? Alternativa ao Interbase?

[Jimi Roy Pugss]

Sem recentimentos, mas hoje mesmo, tive um papo miiito estressante a
esse respeito com outro colega (ao vivo) com relação ao interbase vc tem
toda a razao mesmo, acho que entre interbase e msde, eu até optasse pelo
msde, entre SQLServer e FIREBIRD, bom ai, eu perguntaria ao cliente
"Quanto vc quer gastar?" em termos de performance, tenho muito a dizer
quanto as duas suites (FIREBIRD e SQLServer) e por experiencia de uso
massivo de suas soluções, garanto que mesmo a engine do SQLServer ser
uma "MÃE" aos programadores, o Firebird tem surpreendido e muito as
comunidades de desenvolvedores por ai a fora, e sou MCP M$icrosoft, e
mesmo assim, conhecendo a fundo seus produtos e recomendando-os conforme
o caso, recomendo tambem o Firebird, por ter inumeras vantagens, dentre
elas ser multi-plataforma e poder atender tanto pequena, media, e grande
solução sem precisar mudar nada. No demais, peço desculpa a todos caso
tenha parecido meio "rancoroso" ou até mesmo "grosseiro".  

Um [] a todos. duvidas email-me


Em Seg, 2004-12-27 às 21:47, Williams D=?iso-8859-1?Q?=EDaz_?= escreveu:
> Sim,
> 
> não sei se você percebeu, mas em outro e-mail anterior eu tinha te dado a
> razão quanto a alguns questionamentos. Tudo depende da aplicação.
> 
> > TSTSTSTS, tente conectar com 15 usuarios simultaneos, e depois reveja
> > sua resposta!
> 
> É verdade que tem limitações, e são documentadas. Mas para a minha
> necessidade, ele é melhor que o interbase e não vou rever a minha resposta
> neste sentido. E releia a pergunta original do colega. "preciso desenvolver
> uma aplicação relativamente simples". Eu respondi dentro do contexto. Se ele
> tivesse dito que era para controlar o sistema de reservas da varig ou a base
> de dados da receita federal não teria nem tocado no assunto.
> 
> > gratuito, que fosse tão bom quanto o pago? reveja a documentação
> > espertinho e depois veja a performance para mais de 5 connections, e
> 
> Não entendi o de "espertinho", não há necessidade dessas coisas nesta lista.
> Alias o que menos sou é um "esperto". Tenho muito o que aprender ainda.
> Conheço a documentação do msde bastante bem, participei do fórum americano
> durante meses e lá criticamos tudo o que podiamos, mas sem dúvida ainda tenho
> muito o que aprender.
> 
> > ainda a "licenca" de uso apenas para desenvolvedores, arrisca quem >quer,
> 
> Você está enganado. A licença de uso é para usuário final também. Você está
> confundindo com a versão developer do sql, que custa baratinho, e que é
> vendida na América. Não sei se no Brasil ela é vendida também.
> 
> > diz como foi quem ja usou, toma a decisão correta quem tem juízo..
> 
> É isso aí caro colega, foi exatamente isso que fiz. Dou a minha opinião desde
> o meu ponto de vista, mas não significa que eu esteja certo. Quem quiser usar
> interbase, firebird, mysql, post, pré, oracle ou até uma árvore binária de
> busca, tem todo o direito. Assim como tenho o meu de usar MSDE, e de externar
> a minha opinião. Portanto não fique chateado comigo.
> 
> 
> abraços,
> 
> 
> williams
> [EMAIL PROTECTED]
> 
> 
-- 
 _  __
/ )|  |
   / / | Jimi Roy Pugss (41 88377350) |
 _( (_ |  _   Developer World Inc.|
(((\ \)|_/ )__|
( \_/ /
 \   / 
  \_/  
  /   / 




-- 
< 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] Máscaras de moedas

[Neto]

Olá, pessoal

quais as máscaras existentes para moeda? Estou desenvolvendo um aplicativo que 
irá trabalhar com vários tipos de moedas (dólar, real, euro etc). Uso 
componentes edits e maskedits.

Grato,

Neto

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




---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.809 / Virus Database: 551 - Release Date: 09/12/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

<*> 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] Instalar o BDE de novo

[| Eduardo Tavares |]

Ola!
Toda vez que tento abrir o BDE Administrator ele diz que nao pode 
abri-lo.Gerando um excessao.Tem como instalar somente o BDE de novo?
Thank You,
Eduardo Tavares
www.EduardoTavares.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

<*> 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] Rateio de desconto nos itens

[Felipe Pasqualotto]

Boa tarde.

Estou com a seguinte dúvida:

Possuo um campo para o Total, e um de desconto no mestre, e nos itens apenas
quant * valor. 
Ocorre o seguinte:
Dando um desconto de 10% (gravo valor), no subtotal, como faço para ratear
isso nos valores unitários via SQL?
Exe:

1  x  10,00  = 10,00
1  x  15,00  = 15,00
  ==
Sub-Total  25,00
Desconto2,50
  ==
Total  22,50


Pra ficar assim:

10,00 - 1,00
15,00 - 1,50

[]'s




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.296 / Virus Database: 265.6.5 - Release Date: 26/12/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

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

[luciano]

Obrigado, Diogo funcionou blz!!
- Original Message - 
From: "Diogo" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 10:49 AM
Subject: RES: [delphi-br] String



Uma função nativa da Delphi que retire tudo de uma vez só, acho que não tem,
aconselharia a usar StringReplace, ou criar uma função que faça isso.

Ex: function retira(teste : string): string;
begin
teste := trim(StringReplace(teste,'.','',[rfReplaceAll]));
teste := trim(StringReplace(teste,'/','',[rfReplaceAll]));
teste := trim(StringReplace(teste,'-','',[rfReplaceAll]));
result := teste;
end;

A função não é muito "elegante" hehehe, mas funciona.
[]s

-Mensagem original-
De: luciano [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 27 de dezembro de 2004 08:02
Para: delphi
Assunto: [delphi-br] String


Pessoal alguém sabe se existe alguma função que retire da string um ou mais
caracteres que não desejo.

Ex: String "11.111.111/-11", desta string não quero os pontos, os traços
e nem a barra.

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











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

 

RES: [delphi-br] Duvida com StringList

[Rubem Rocha]

Cara, pq vc simplesmente num usa o método SaveToFile() do TStringList? Consulta 
o help!
[]s

-Mensagem original-
De: Leandro Ferreira [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 15:17
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Duvida com StringList



Olá Amigos da Lista,

Gostaria de tirar a seguinte duvida:

Estou tentando salvar o conteúdo de um StringList em um arquivo e 
não sei como faço, pois das formas que tentei ele está sobrescrevendo as 
linhas existentes e não inserindo novas linhas. Alguém poderia ajudar-me 
a escever este pedaço de código.

Segue abaixo parte do código que executo para salvar o conteúdo do 
stringlist, o problema é que quando chega no ultimo if ele verifica o 
conteúdo e sobrescreve o que existe no arquivo, mesmo que o conteúdo 
seja diferente do conteúdo que foi digitado no Memo. Gostaria de 
verificar se existe uma linha igual e em caso de igual ele descarta a 
linha e em caso de diferente ele pula de linha até encontrar uma linha 
em branco e quando encontrar esta linha em branco escrever a nova linha. 
Alguém sabe se é possivel?

Public
{publicas}
Lista : TStringList;

procedure TForm1.GravaArquivo;
var
   x : integer;
begin
 for x := 0 to Lista.Count - 1 do
 begin
  if lowercase(before(Lista.strings[x],'=')) = 'inbox' then  
//before é uma função que pega o conteúdo até o simbolo descrito ao 
lado('=')
  begin
 Lista.strings[x] := 'inbox='+edtDefaultInbox.Text;
  end;

  if (pos('*' , (lowercase(before(memoInbox.Lines.Strings[x], 
'='>0) or
 (pos('.' , (lowercase(before(memoInbox.Lines.Strings[x], 
'='>0) then
  begin
 if memoInbox.Lines.Strings[x] <> Lista.Strings[x] then
 begin
   Lista.Strings[x]:=memoInbox.Lines.Strings[x];
 end;
  end;

 end;//for
end;//procedure


Exemplo: O conteúdo abaixo é referente ao arquivo que preciso alterar, 
mas ele é sobrescrito pelo novo conteúdo que digito no Memo.

//////
;TESTE

inbox=c:\teste\inbox
outbox=c:\teste\outbox

*.*.*=*.*.*
*.*=*.*
*=*

1- ERRO
2- OK
3- LOG
//////

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




 




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

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

 

RES: [delphi-br] RxLib para Delphi 6

[Rubem Rocha]

De fato. Eu, particularmente, prefiro a JEDI. É um verdadeiro canivete suíço. 
Tem até componente visual pra implementar threads.
[]s

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 14:19
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] RxLib para Delphi 6



Olha, entre usar a RX e usar a Jedi, é bem relativo.

a RX é mais leve

a suite Jedi é pesada pra qualquer maquina. Dependendo do computador e do que 
voce pretente usar, é melhor ficar na RX.

 
 
 []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: Rubem Rocha [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 14:09
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] RxLib para Delphi 6
> Prioridade: Alta
> 
> 
> 
> Use a suite(coleção) de componentes JEDI
> (http://sourceforge.net/projects/jvcl). Ela já incorpora os 
> componentes da RxLib.
> []s
> 
> -Mensagem original-
> De: Depto de Informatica [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 13:09
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] RxLib para Delphi 6
> 
> 
> 
> Caros colegas,
> 
> Alguém podería me informar onde posso baixar a RxLib e o
> tutorial para instalação para Delphi 6 ?
> 
> Obrigado,
> 
> Luiz Carlos
> 
> [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.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




 




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

<*> 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] Programa de Folha de Pagamento

[Osmar Souza]

At 20:32 27/12/2004, you wrote:

Procure no Google por Folha livre, um programa open-souce feito em Delphi.

g[], Osmar.




>Necessito para administrar um condominio com menos de 10
>funcionários, de um programa para confecção de Folha de Pagamento.
>Quem puder me ajudar eu agradeço.
>Necessita ser freeware.
>João Guaraldo
>
>
>
>
>
>
>
>
>--
>< 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] Verificar data

[Carlos Antônio Pereira]

Oi Denis, tudo bem?

Saudações Bia! Bem vinda ao grupo!
Estou indo ao Rio amanhã. Vou para o bairro de Botafogo... Bem vinda, espero 
que guanhe e nos dê experiências nesta fantástica linguagem de programação.

Denis, pelo que entendi você quer definir o formato da data que o teu 
sistema usará, independente do formato que o windows estiver usando. Se for 
isso, coloque o código abaixo no evento OnCreate do teu formulário 
principal:


  //Configura data do ambiente
  LongDateFormat := 'dd/mm/yy';
  ShortDateFormat :=  'dd/mm/yy';

Todos os formulários criados a partir do form principal, herdarão a 
configuração. Caso algum formulário não seja criado a partir do principal, é 
só fazer o mesmo, só que no formulário em questão, lembrando que isto só vai 
funcionar no ambiente de trabalho (.exe gerado pelo delphi). Se você usa 
algum banco de dados do tipo SGBD, deverá consultar a ajuda do banco. Mas, 
com certeza deve ter algum parâmetro de configuração.

  //Outras configurações e variaveis de ambiente:
  LongDateFormat := 'dd/mm/';
  ShortDateFormat :=  'dd/mm/';
  TimeAMString := '';
  TimePMString := '';
  ShortTimeFormat := 'hh:mm';
  LongTimeFormat  := 'hh:mm';

 LongDateFormat := 'dd/mm/yy';
 ShortDateFormat :=  'dd/mm/yy';
 TimeAMString := 'AM';
 TimePMString := 'PM';
 ShortTimeFormat := 'hh:mm';
 LongTimeFormat  := 'hh:mm';

Best regards
Carlos Antônio.
olá, denis!
vc vai capturar essas datas dentro de querys ou no escopo do seu código?
qual o SGBD q vc usa?
EncodeDate ou DecodeDate não serviriam pra vc?

NovaData:=EncodeDate(15,2,04);

o DecodeDate é usado p/ obter o dia, mês e ano correspondente a uma data 
definida
em uma variável do tipo TDate Time. nesse caso, devem ser passados como 
parâmetros
um valor do tipo TDateTime, cujo valor será convertido, e três variáveis 
inteiras
sem sinal, tipo Word, que representam, respectivamente, o ano, o mês e o dia 
a
serem obtidos e passados por referência.

//este procedimento, por exemplo, eu uso p/ pegar a data atual do sistema, 
no
escopo do meu código (essa é uma forma), mas tb pego em querys (eu uso o 
oracle).
Var
  SYS_DAY, SYS_MON, SYS_YEAR:Word;
  A_DAY, A_MON, A_YEAR  :String;
begin
  DecodeDate(Date,SYS_YEAR,SYS_MON,SYS_DAY);
  Edit.Text:='';
  A_DAY:=IntToStr(SYS_DAY);
  A_MON:=IntToStr(SYS_MON);
  A_YEAR:=IntToStr(SYS_YEAR);

   If SYS_DAY<10
   then Edit.Text:='0'+A_DAY[1]+'/'
   else Edit.Text:=A_DAY+'/';

   If SYS_MON<10
   then Edit.Text:=Edit.Text+'0'+A_MON[1]+'/'
   else Edit.Text:=Edit.Text+A_MON+'/';

   Edit.Text:=Edit.Text+A_YEAR[3]+A_YEAR[4]; //p/ pegar as 2 últimas 
posições
end;

e ae?

abraços,
bia.
>
>
> Colegas,
>
> Como existem n tipos de confirgurações de data , preciso fazer com
> que meu sistema aceite e interprete somente um tipo DD/MM/YY.
>
> Como fazer isso, pois tenho vários procedimentos  em que preciso
> pegar data do servidor, e data dos arquivos que irei utilizar.
>
> Alguem sabe como fazer isso ?
>
>
> Sds
>
> Denis
>
> FELIZ NATAL
>
>
>
>
>
>
>
>
> --
>> FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM !!
>
>
>
>
>
>
>
> 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!.
>
>
>
>
>
>
>
>
>
>
>
>
>






-- 
< 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] erro rtl60.bpl

[Francisco Carlos]

ola pessoal estou tendo esse tipo de erro usando
delphi 6 juntament com o zeoslib versao 5.03, alguem
sabe o q pode ser isso ?

__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 


-- 
< 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] Que banco de dados usar? Alternativa ao Interbase?

[Williams Díaz]

Sim,

não sei se você percebeu, mas em outro e-mail anterior eu tinha te dado a
razão quanto a alguns questionamentos. Tudo depende da aplicação.

> TSTSTSTS, tente conectar com 15 usuarios simultaneos, e depois reveja
> sua resposta!

É verdade que tem limitações, e são documentadas. Mas para a minha
necessidade, ele é melhor que o interbase e não vou rever a minha resposta
neste sentido. E releia a pergunta original do colega. "preciso desenvolver
uma aplicação relativamente simples". Eu respondi dentro do contexto. Se ele
tivesse dito que era para controlar o sistema de reservas da varig ou a base
de dados da receita federal não teria nem tocado no assunto.

> gratuito, que fosse tão bom quanto o pago? reveja a documentação
> espertinho e depois veja a performance para mais de 5 connections, e

Não entendi o de "espertinho", não há necessidade dessas coisas nesta lista.
Alias o que menos sou é um "esperto". Tenho muito o que aprender ainda.
Conheço a documentação do msde bastante bem, participei do fórum americano
durante meses e lá criticamos tudo o que podiamos, mas sem dúvida ainda tenho
muito o que aprender.

> ainda a "licenca" de uso apenas para desenvolvedores, arrisca quem >quer,

Você está enganado. A licença de uso é para usuário final também. Você está
confundindo com a versão developer do sql, que custa baratinho, e que é
vendida na América. Não sei se no Brasil ela é vendida também.

> diz como foi quem ja usou, toma a decisão correta quem tem juízo..

É isso aí caro colega, foi exatamente isso que fiz. Dou a minha opinião desde
o meu ponto de vista, mas não significa que eu esteja certo. Quem quiser usar
interbase, firebird, mysql, post, pré, oracle ou até uma árvore binária de
busca, tem todo o direito. Assim como tenho o meu de usar MSDE, e de externar
a minha opinião. Portanto não fique chateado comigo.


abraços,


williams
[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] Dúvida em usar o componente BusinessSkinForm

[Marcelo Carvalho]

Sim,

Mas para este componente isso naum funciona.

Atenciosamente,

Marcelo Carvalho
- Original Message - 
From: "Daguier" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 5:14 PM
Subject: Re: [delphi-br] Dúvida em usar o componente BusinessSkinForm


>
>
> Voce ja tentou usar ao procedimento Perform?
> Ex: If Key=#13 Then Perform(WM_NEXTDLGCTL,0,0);
> - Original Message -
> From: "Marcelo Carvalho" <[EMAIL PROTECTED]>
> To: ; <[EMAIL PROTECTED]>;
> <[EMAIL PROTECTED]>
> Sent: Sunday, December 26, 2004 1:15 PM
> Subject: [delphi-br] D?vida em usar o componente BusinessSkinForm
>
>
>>
>> Como fa?o para saltar de um campo para outro com ENTER ao inv?s de TAB 
>> ???
>>
>> Atenciosamente,
>>
>> Marcelo Carvalho
>> [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
>
>
>
>
>
>
>
>
> 



-- 
< 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] Que banco de dados usar? Alternativa ao Interbase?

[Paulo Santana (Terra)]

Uma outra opção que não tem sido cogitada é o PostgreSQL, que na versão 
8 está com acesso nativo pra Windows, não tendo mais a maldita 
necessidade de emulação via Cygwin, que além de robusto e com diversas 
implementações que o Oracle tem é free, não custa avaliar.




Williams Diaz wrote:

>É,
>
>o jimi tem razão. Depende muito da sua aplicação. Se for muito pesado acho 
>que você não tem como fugir do oracle mesmo. Agora se é para substituir o 
>interbase pode ficar tranquilo. Faça uns testes colocando uns 100.000 
>registros e você vai ver a performance de um e do outro. Eu já trabalhei com 
>os dois e posso te afirmar com tranquilidade que o msde é muito melhor.
>Agora se for para home pages, muitos usuários, e você precisa que seja free, 
>verifique o firebird, o mysql, ou mesmo o postgres. O que não faltam são 
>alternativas.
>
>williams
>
>*---
>Williams Díaz
>[EMAIL PROTECTED]
>http://www.interban.com.br
>
>- Original Message - 
>From: "Jimi Roy Pugss" <[EMAIL PROTECTED]>
>To: 
>Sent: Monday, December 27, 2004 6:44 PM
>Subject: Re: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?
>
>
>
>
>MSDE is an ideal solution for:
>
>  * Client applications that require an embedded database.
>  *  (Aplicações cliente que precisem de banco de dados local)
>  * Basic websites that serve up to 25 concurrent users.
>  *  (WebSites B A S I C O S com no max 25 users)
>  * New developers who are learning how to build data-driven
>applications.
>  *  (Desenvolvedores que estão apreendendo a criar aplicativos com
>SQLServer)
>This download includes all of the SQL Server 2000 SP3a updates. To learn
>more about MSDE, visit the MSDE website.
>
>
>
>
>  
>



-- 
< 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] Programa de Folha de Pagamento

[joaoguaraldo]

Necessito para administrar um condominio com menos de 10 
funcionários, de um programa para confecção de Folha de Pagamento.
Quem puder me ajudar eu agradeço. 
Necessita ser freeware.
João Guaraldo








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

[james nascimento]

Como posso criar um InstallShield BDE (Delphi 5) em disquete para instalar em 
um cliente Windows NT.
 


-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
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

<*> 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] RxLib para Delphi 6

[José Gomes]

Ai vai...

  RX Library 2.75 official conversion to Delphi 6, v1.0 (by SGB Software)
  =

TABLE OF CONTENTS
-
  Overview
  Compatibility with your older code
  History
  Installation
  Help files
  Copyright Notes


Overview

This is an official conversion of the Rx Library of components for Borland
Delphi 6.  You are hearby given permittion to distribute the contents of
this zip file as long as all copyright notices are kept in there current
state.

Rx Library is a set of components and classes for Borland Delphi and C
Builder.  Originally developed by Fedor Koshevnikov, Igor Pavluk and Serge
Korolev, it has become a widely used and respected addition to the Borland
VCL.


Compatibility with your older code
---
  - StrUtils has been renamed to rxStrUtils to avoid a naming conflict with
borlands new StrUtils module.
  - RxGrids.TInplaceEditStyle type has been converted to the Delphi 6
TEditStyle type.


History
---
20/02/2002
  First Official release of RX Library 2.75 For delphi 6.


Installation


IF YOU HAVE DELPHI 6 PROFESSIONAL OR PERSON EDITITION YOU MUST DEACTIVATE
THE CONDITIONAL DEFINE {$DEFINE DCS} IN THE RX.INC FILE BEFORE ATTEMPTING TO
COMPILE THIS LIBRARY.  FAILURE TO DO THIS COULD CAUSE THE LIBRARY TO INSTALL
INCORRECTLY.

On the File Menu select the Open command (Ctrl+ O) and browse for the Delphi
Package RXCTL6.DPK that you extracted from this archive. In the Package
window click on the compile button to
compile the package, RXCTL6.DPK.

After compiling repeat these steps for the remaining RX Library run-time
packages RXDB6.DPK, RXBDE6.DPK.

Put the compiled BPL files into a directory that is accessible through the
search PATH. After compiling RX run-time packages you must install RX
design-time packages into the IDE.

On the File Menu select the Open command (Ctrl+ O) and browse for the Delphi
Package DCLRX6.DPK that you extracted from this archive. In the Package
window click on the compile button to
compile the package and then click on the Install buttonn to register the
package in the IDE.

Repeat the above step for the remaining RX Library Design Time packages,
DCLRXDB6.DPK and DCLRXBD6.DPK.

NOTE: do not save the package sources in the Delphi IDE.

Help files
--

Help files for the Rx Library are currently provided in 2 languages ,
English and Russian.

English help file is copyright of Check frasersoft
(http://www.frasersoft.clara.net/rxhelp) 2001

Copyright Notes
---
  RX Library is a copyright of SGB Software,Fedor Kozhevnikov, Igor Pavluk
and Serge Korolev.  All rights reserved.  For Detailed licencing and
distribution instructions please navigate to www.sgbsoftware.com or consult
your help file.

---END OF FILE---

last updated - 17/01/20002



- Original Message - 
From: "Depto de Informatica" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 2:08 PM
Subject: [delphi-br] RxLib para Delphi 6



Caros colegas,

Alguém podería me informar onde posso baixar a RxLib e o tutorial para
instalação para Delphi 6 ?

Obrigado,

Luiz Carlos

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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/2004




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

<*> 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] Comunicação serial

[Daguier]

- Original Message -
From: "DVJ" <[EMAIL PROTECTED]>
To: "Grupo Delphi" 
Sent: Monday, December 27, 2004 4:08 PM
Subject: [delphi-br] Comunicação serial


>
> Olá a todos
>
> Po, to batendo a cabeça mesmo com essa leitura dos dados vindo por uma
porta serial.
> To usando o componente ComPort, jogo os dados recebidos em um listbox mas
o que
> chega é uma sequência de ^. Tenho que tratar alguma coisa
(binário, etc)?
>
> Grato
>
>
>
>
>
> ___
> Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora.
http://br.acesso.yahoo.com/ - Internet rápida e grátis
>
>
> --
> < 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] Que banco de dados usar? Alternativa ao Interbase?

[Williams Diaz]

É,

o jimi tem razão. Depende muito da sua aplicação. Se for muito pesado acho 
que você não tem como fugir do oracle mesmo. Agora se é para substituir o 
interbase pode ficar tranquilo. Faça uns testes colocando uns 100.000 
registros e você vai ver a performance de um e do outro. Eu já trabalhei com 
os dois e posso te afirmar com tranquilidade que o msde é muito melhor.
Agora se for para home pages, muitos usuários, e você precisa que seja free, 
verifique o firebird, o mysql, ou mesmo o postgres. O que não faltam são 
alternativas.

williams

*---
Williams Díaz
[EMAIL PROTECTED]
http://www.interban.com.br

- Original Message - 
From: "Jimi Roy Pugss" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 6:44 PM
Subject: Re: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?




MSDE is an ideal solution for:

  * Client applications that require an embedded database.
  *  (Aplicações cliente que precisem de banco de dados local)
  * Basic websites that serve up to 25 concurrent users.
  *  (WebSites B A S I C O S com no max 25 users)
  * New developers who are learning how to build data-driven
applications.
  *  (Desenvolvedores que estão apreendendo a criar aplicativos com
SQLServer)
This download includes all of the SQL Server 2000 SP3a updates. To learn
more about MSDE, visit the MSDE website.




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

[Rodrigo - Winsoft]

Olá galera, 

Estou com o seguinte problema:
Tenho um componente TRXDrawGrid e gostaria de inserir valores nele. Como posso 
fazer isso.

No componente TStringGrid eu faço da seguinte forma: Grid.Cells[Lin,Col] := 
'teste';

Só q no componente TRXDrawGrid eu não consigo. Se alguém puder me ajudar. 
Agradeço desde já..

Obrigado.

Rodrigo Pedroso
Winsoft Informática - (14) 3664-1586
[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

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

 

RES: [delphi-br] FastScript..Algum Santo Programador usa???

[Rubem Rocha]

É que nem o Pascal Script? Onde arranja esse daí pra avaliar/baixar?
[]s

-Mensagem original-
De: Marcelo M Florindo [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 13:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] FastScript..Algum Santo Programador usa???



Olá,

Gostaria de saber se existe alguém que use o fast script. Muito obrigado a 
todos..

Marcelo

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

<*> 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] Que banco de dados usar? Alternativa ao Interbase?

[Jimi Roy Pugss]

MSDE is an ideal solution for:

  * Client applications that require an embedded database. 
  *  (Aplicações cliente que precisem de banco de dados local)
  * Basic websites that serve up to 25 concurrent users. 
  *  (WebSites B A S I C O S com no max 25 users)
  * New developers who are learning how to build data-driven
applications. 
  *  (Desenvolvedores que estão apreendendo a criar aplicativos com
SQLServer)
This download includes all of the SQL Server 2000 SP3a updates. To learn
more about MSDE, visit the MSDE website.

PS* Uso e até recomendo o SQLServer 2000 mas francamente, parecem
traficantes oferecendo o sqlserver, o free naum custa nada, mas quando
vc quiser um "barato" mais "legal" ai meu filho, ja ta dependente da
plataforma e do TransactSQL que so pagando bem caro mesmo pra usar...

Em Seg, 2004-12-27 às 19:34, Williams Diaz escreveu:
> Artur,
> 
> aqui você tem todas as informações que precisa.
> 
> http://www.microsoft.com/sql/msde/downloads/download.asp
> 
> E aqui algumas ferramentas para msde, algumas gratuitas.
> 
> http://www.aspfaq.com/show.asp?id=2442
> 
> Qual a sua dúvida? - se puder te ajudar...
> 
> abraços,
> 
> williams
> 
> *---
> Williams Díaz
> [EMAIL PROTECTED]
> http://www.interban.com.br
> 
> - Original Message - 
> From: "Artur Rodrigo Guerra" <[EMAIL PROTECTED]>
> To: 
> Sent: Monday, December 27, 2004 1:49 PM
> Subject: RES: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?
> 
> 
> >
> > André, vc teria alguma documentação sobre o MSDE ?
> > Tenho algumas dúvidas a respeito desse cara.
> >
> > Pode mandar em private.
> >
> > Valeu !
> >
> > Artur.
> >
> > -Mensagem original-
> > De: André Argeri [mailto:[EMAIL PROTECTED]
> > Enviada em: segunda-feira, 27 de dezembro de 2004 14:52
> > Para: delphi-br@yahoogrupos.com.br
> > Assunto: Re: [delphi-br] Que banco de dados usar? Alternativa ao
> > Interbase?
> >
> >
> >
> > Eu começei a usar o MSDE, e estou gostando do desempenho dele
> >
> >
> >
> >
> > --
> > < 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
> >
> >
> >
> >
> >
> >
> >
> >
> > 
> 
-- 
 _  __
/ )|  |
   / / | Jimi Roy Pugss (41 88377350) |
 _( (_ |  _   Developer World Inc.|
(((\ \)|_/ )__|
( \_/ /
 \   / 
  \_/  
  /   / 




-- 
< 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] Que banco de dados usar? Alternativa ao Interbase?

[Williams Diaz]

Artur,

aqui você tem todas as informações que precisa.

http://www.microsoft.com/sql/msde/downloads/download.asp

E aqui algumas ferramentas para msde, algumas gratuitas.

http://www.aspfaq.com/show.asp?id=2442

Qual a sua dúvida? - se puder te ajudar...

abraços,

williams

*---
Williams Díaz
[EMAIL PROTECTED]
http://www.interban.com.br

- Original Message - 
From: "Artur Rodrigo Guerra" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 1:49 PM
Subject: RES: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?


>
> André, vc teria alguma documentação sobre o MSDE ?
> Tenho algumas dúvidas a respeito desse cara.
>
> Pode mandar em private.
>
> Valeu !
>
> Artur.
>
> -Mensagem original-
> De: André Argeri [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 14:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Que banco de dados usar? Alternativa ao
> Interbase?
>
>
>
> Eu começei a usar o MSDE, e estou gostando do desempenho dele
>
>
>
>
> --
> < 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

 

[delphi-br] Linhas no Grid

[Eduardo Buffara Junior]

Olá pessoal td bem??? 

Estou com o seguinte problematenho um grid...este grid esta ligado numa 
tabela cujo o campo texto alem de ser um pouquinho grandetem quebra de 
linhas. 
Tenho duas opções 
* Não sei como posso fazer para que o dbgrid quebre as linhas ou seja...moste 
varias linhas de um unico registro...tipo excel qd vc aumenta o espaço da 
celula 
* Pegar somente a primeira linha da string...mais tb não sei como fazer 
isso. 

Alguns colegas aqui do grupo tentaram ajudar mais infelizmente naum acharam uma 
solução

Preciso de uma solução urgente 

Ate agora obrigado 

T+

Eduardo Buffara Junior - Programador Delphi
[EMAIL PROTECTED]
(41) 9149.5756 - Paranaguá - PR

[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] Que banco de dados usar? Alternativa ao Interbase?

[Williams Diaz]

Paulo,

use o msde 2000, que é a versão free o sql server, é muito bom e mais rápido 
que o interbase e o firebird.

abraços,

williams

*---
Williams Díaz
[EMAIL PROTECTED]
http://www.interban.com.br

- Original Message - 
From: "delphi6_2005" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 9:41 AM
Subject: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?




Amigos preciso de uma dica, preciso desenvolver uma aplicação
relativamente simples e não sei qual banco utilizar, pois só conheço
o oracle, como não preciso de muito recurso será que o interbase
poderia servir, há alguma alternativa ao interbase?

grato pela ajuda

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] SQL - Campo Fone em várias tabelas

[Jimi Roy Pugss]

2 vejo 2 alternativas para vc, 
ambas utilizam union commo parte da solução:
alternativa 
A) Crie um Select mais ou menos assim:
   SELECT CLI.NOME
   ,  CLI.FONE
   ,  CAST('Cliente' AS VARCHAR(15)) AS TIPO
   ,  CAST(0 AS SMALLINT) AS ORDEM_PRIMARIA
   FROM   CLIENTE CLI
   WHERE  CLI.FONE LIKE('%'||:TextoAProcurar)
   UNION  
   SELECT FOR.NOME
   ,  FOR.FONE
   ,  CAST('Fornecedor' AS VARCHAR(15)) AS TIPO
   ,  CAST(1 AS SMALLINT) AS ORDEM_PRIMARIA
   FROM   CLIENTE
   WHERE  FOR.FONE LIKE('%'||:TextoAProcurar)
   ORDER BY 4 /* ORDEM PRIMARIA*/ , 1 /* NOME */


B) Crie uma VIEW com esse comando sem o order by e sem o where, e se vc
quiser usar procurar em mais tabelas, como por exemplo, transportadora
etc etc, basta vc adicionar no final acrescentando a sua union, e para
usa-la (a view) vc faz um 
 SELECT  FROM VIEW WHERE FONE CONTAINING :TextoAProcurar
 ORDER BY ORDEM_PRIMARIA, NOME

PS* Use o CONTAINING COMO ALTERNATIVA PARA O LIKE se assim te resolver.



Em Seg, 2004-12-27 às 01:23, A33 Tecnologia e Informática escreveu:
> Olá Amigos,
> 
> Meu problema é o seguinte:
> Tenho várias tabelas no BD contendo campo FONE. Meu cliente quer pesquisar
> pelo telefone e obter no resultado os registros das diversas tabelas. Caso
> exista um telefone com final 4140 na tabela clientes e outro na tabela
> fornecedores, ele quer que sejam mostrados no mesmo grid.
> Preciso de uma instrução SQL que resolva este problema, "preferencialmente"
> resultando algo assim:
> 
> NOMEFONE TIPO
> José Luis  3342.4140  Cliente
> ECSAM Ltd3328.4140   Fornecedor
> 
> Se for o caso, posso adicionar campos nas tabelas.
> 
> Desde já, obrigado pelo interesse!
> 
> José Luis
> 
> 
-- 
 _  __
/ )|  |
   / / | Jimi Roy Pugss (41 88377350) |
 _( (_ |  _   Developer World Inc.|
(((\ \)|_/ )__|
( \_/ /
 \   / 
  \_/  
  /   / 




-- 
< 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] Filtro (SQL)

[Rodrigo Ribeiro]

Tente usar aspas duplas antes e depois da sua string (mais as aspas
necessários do comando ADD).

Sql.Add('AND SITUACAO = '''ANDAMENTO);
- Original Message -
From: "Erika" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 4:03 PM
Subject: [delphi-br] Filtro (SQL)




Oi pessoal

Eu quero filtrar os dados de uma tabela onde o campo situação deve
ser sempre "ANDAMENTO". Estou fazendo assim:
.
.
.
Sql.Add('AND SITUACAO = ANDAMENTO');
.
.
.
mas ele não reconhece esta palavra ANDAMENTO, como devo colocar?

PS: Situação é do tipo string

Obrigado []s





--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

Links do Yahoo! Grupos













-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

 

Re: [delphi-br] Delphi 6 e Fiebird 1.5

[Eduardo Galvão]

Olá,

> Eduardo,
> os campos do arquivo TXT estão delimitados pelo ';'.
> dtm_Dados.tblMala.Append;
> dtm_Dados.tblMala.ApplyUpdates;

Usando append, post... vai ficar realmente lento, e cada
vez mais lento.

Ao invés, utilize o comando INSERT do sql, assim você
vai gravar direto no banco.

Ex:

qry.close;
qry.sql.text:='INSERT INTO TABELA(nome,endereco)
VALUES ('João','Rua X')...
qry.open;

Vai ficar MUITÍSSIMO mais rápido.

Saudações,
Eduardo Paci Galvão
Engenheiro Eletricista UFMG 1990
www.egalvao.com.br
MSN: [EMAIL PROTECTED]
Skype: eduardogalvao






-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

<*> 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] Linhas num GRID

[Eduardo Buffara Junior]

Olá pessoal td bem??? 

Estou com o seguinte problematenho um grid...este grid esta ligado numa 
tabela cujo o campo texto alem de ser um pouquinho grandetem quebra de 
linhas. 
Tenho duas opções 
* Não sei como posso fazer para que o dbgrid quebre as linhas ou seja...moste 
varias linhas de um unico registro...tipo excel qd vc aumenta o espaço da 
celula 
* Pegar somente a primeira linha da string...mais tb não sei como fazer 
isso. 

Alguns colegas aqui do grupo tentaram ajudar mais infelizmente naum acharam uma 
solução

Preciso de uma solução urgente 

Ate agora obrigado 

T+

Eduardo Buffara Junior - Programador Delphi
[EMAIL PROTECTED]
(41) 9149.5756 - Paranaguá - PR

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

[Daniel Bastos]

http://www.icone-gif.com/

esse site eu achei esses dias, mas jà to usando uns icones que tem lÃ.

eu vi tb uma coleÃÃo de icones no site www.delphi.eti.br...


Em Mon, 27 Dec 2004 12:46:14 -, galvao_em <[EMAIL PROTECTED]>  
escreveu:

>
>
> Olà pessoal, estou desenvolvendo um sistema para controle de frotas, e
> estou precisando de Ãcones para o mesmo. Se alguÃm tiver algum,
> agradeceria.
>
>
>
>
>



-- 

Daniel A. Bastos



-- 
< 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] Comunicação serial

[Adriano Gomes]

Eu uso o CommECF32. Aconteceu isso comigo qdo estava configurando a
velocidade errada de uma balança Urano q estava programando. Pode ser isso.

- Original Message -
From: "DVJ" <[EMAIL PROTECTED]>
To: "Grupo Delphi" 
Sent: Monday, December 27, 2004 4:08 PM
Subject: [delphi-br] Comunicação serial


>
> Olá a todos
>
> Po, to batendo a cabeça mesmo com essa leitura dos dados vindo por uma
porta serial.
> To usando o componente ComPort, jogo os dados recebidos em um listbox mas
o que
> chega é uma sequência de ^. Tenho que tratar alguma coisa
(binário, etc)?
>
> Grato
>
>
>
>
>
> ___
> Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora.
http://br.acesso.yahoo.com/ - Internet rápida e grátis
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.com/group/delphi-br/messages
>
> Para falar com o moderador, envie um e-mail para:
>  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
>
> --
> No virus found in this incoming message.
> Checked by AVG Anti-Virus.
> Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/2004
>
>



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

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

 

RES: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?

[Artur Rodrigo Guerra]

André, vc teria alguma documentação sobre o MSDE ?
Tenho algumas dúvidas a respeito desse cara.

Pode mandar em private.

Valeu !

Artur.

-Mensagem original-
De: André Argeri [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 27 de dezembro de 2004 14:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Que banco de dados usar? Alternativa ao
Interbase?



Eu começei a usar o MSDE, e estou gostando do desempenho dele




--
< 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] Linha num Grid...

[Eduardo Buffara Junior]

mais eu não posso...editar o conteudo do banco de dadospq em outra ocasiões 
preciso dele com as quebras

T+
  - Original Message - 
  From: Demian Lessa 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 27, 2004 5:32 PM
  Subject: Re: [delphi-br] Linha num Grid...


  Escreva um evento OnGetText para o campo e atribua o texto que gostaria 
  de exibir. Se quiser a primeira linha, ignore o resto. Se quiser exibir 
  mais coisas, limpe os CRLFs do campo e atribua o resultado ao texto.

  Demian

  Eduardo Buffara Junior wrote:
  > Olá pessoal td bem??? 
  > 
  > Estou com o seguinte problematenho um grid...este grid esta ligado numa 
tabela cujo o campo texto alem de ser um pouquinho grandetem quebra de 
linhas. 
  > Tenho duas opções 
  > * Não sei como posso fazer para que o dbgrid quebre as linhas ou 
seja...moste varias linhas de um unico registro...tipo excel qd vc aumenta o 
espaço da celula 
  > * Pegar somente a primeira linha da string...mais tb não sei como fazer 
isso. 
  > 
  > Alguns colegas aqui do grupo tentaram ajudar mais infelizmente naum acharam 
uma solução
  > 
  > Preciso de uma solução urgente 
  > 
  > Ate agora obrigado 
  > 
  > T+
  > 
  > Eduardo Buffara Junior - Programador Delphi
  > [EMAIL PROTECTED]
  > (41) 9149.5756 - Paranaguá - PR
  > 
  > [As partes desta mensagem que não continham texto foram removidas]
  > 
  > 
  > 



  -- 
  < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

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



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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

 

[delphi-br] WebServices

[hene william]

Ola amigos

tenho um webServices publicado no meu Servidor, a minha parte client esta 
implementada como abaixo.

//
uses comObj

SoapClient := CreateOleObject('MSSOAP.SoapClient'); 
SoapClient.mssoapinit( vURL );
/

O mais sinistro que isso só funciona em maquinas que contém delphi instalado, 
as maquinas client que nao contém delphi instalado da seguinte mensagem 
"Sequência de classe invalida"..

As maquinas client ja fiz upgrade, ja instalei o SOAP toolkit 2.0, ja instalei 
IE 6.0 e mesmo assim  não funciona.
Alguem sabe o que posse ser?? ou ja passaram por isso???


 

[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] Apresentação/Nova no grupo

[Jimi Roy Pugss]

Seja muito bem vinda Bianca !

Em Sáb, 2004-12-25 às 03:58, Bianca Beiruth escreveu:
> saudações a todos!
> sou nova no grupo e gostaria de me apresentar!
> meu nome é bianca e moro no rio de janeiro. trabalho com programação há 3 
> anos e há
> pouco mais de 1 ano programo em delphi (os outros foram dedicados ao VB, o 
> qual não
> lembro uma única linha de código).
> atualmente, trabalho no centro do rio em um órgão público e estou responsável 
> por
> um sistema do departamente de compras.
> espero trocar informações com todos, na medida do possível em q puder ajudar 
> e ser
> ajudada.
> vejo q há vários rapazes por aqui! alguma moça, além d mim? rsrsrs...
> um grande abraço a todos!
> bia.
> 
> 
> 
> 



-- 
< 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] Que banco de dados usar? Alternativa ao Interbase?

[Jimi Roy Pugss]

FIREBIRD my Friend, 

Talvez vc até deixe de usar Oracle

Em Seg, 2004-12-27 às 10:41, delphi6_2005 escreveu:
> Amigos preciso de uma dica, preciso desenvolver uma aplicação 
> relativamente simples e não sei qual banco utilizar, pois só conheço 
> o oracle, como não preciso de muito recurso será que o interbase 
> poderia servir, há alguma alternativa ao interbase?
> 
> grato pela ajuda
> 
> 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

<*> 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] Linha num Grid...

[Demian Lessa]

Escreva um evento OnGetText para o campo e atribua o texto que gostaria 
de exibir. Se quiser a primeira linha, ignore o resto. Se quiser exibir 
mais coisas, limpe os CRLFs do campo e atribua o resultado ao texto.

Demian

Eduardo Buffara Junior wrote:
> Olá pessoal td bem??? 
> 
> Estou com o seguinte problematenho um grid...este grid esta ligado numa 
> tabela cujo o campo texto alem de ser um pouquinho grandetem quebra de 
> linhas. 
> Tenho duas opções 
> * Não sei como posso fazer para que o dbgrid quebre as linhas ou seja...moste 
> varias linhas de um unico registro...tipo excel qd vc aumenta o espaço da 
> celula 
> * Pegar somente a primeira linha da string...mais tb não sei como fazer 
> isso. 
> 
> Alguns colegas aqui do grupo tentaram ajudar mais infelizmente naum acharam 
> uma solução
> 
> Preciso de uma solução urgente 
> 
> Ate agora obrigado 
> 
> T+
> 
> Eduardo Buffara Junior - Programador Delphi
> [EMAIL PROTECTED]
> (41) 9149.5756 - Paranaguá - PR
> 
> [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

 

RES: [delphi-br] OFF - Fast report impressão matricial

[Rildecy de Queiroz Borba]

Olha o codigo da tabela de caracteres o do brasil e 850 na epson. 

-Mensagem original-
De: Rodrigo ®¿® [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 08:34
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] OFF - Fast report impressão matricial


Bom Dia Colegas

Utilizo o FR 2.4X em um impressora matricial OKI DATA 320 ML Emulando a
EPSON, utilizo a fonte Draft 10cpi ! , S.o. Win9x e WinXp , só que os acento
e ceçedilhas saem como caracteres ASCII (quadradinho, bolinha, ) !
Alguem tem alguma idéia do que posso fazer passa arrumar isso? 


-- FB1W98D6IBX6IBEXPERT2.5 --
Muito Obrigado
®¿® rodrigo®--Rodrigo B Marcondes--Curitiba - PR--

  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/04


[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] Linha num Grid...

[Eduardo Buffara Junior]

Olá pessoal td bem??? 

Estou com o seguinte problematenho um grid...este grid esta ligado numa 
tabela cujo o campo texto alem de ser um pouquinho grandetem quebra de 
linhas. 
Tenho duas opções 
* Não sei como posso fazer para que o dbgrid quebre as linhas ou seja...moste 
varias linhas de um unico registro...tipo excel qd vc aumenta o espaço da 
celula 
* Pegar somente a primeira linha da string...mais tb não sei como fazer 
isso. 

Alguns colegas aqui do grupo tentaram ajudar mais infelizmente naum acharam uma 
solução

Preciso de uma solução urgente 

Ate agora obrigado 

T+

Eduardo Buffara Junior - Programador Delphi
[EMAIL PROTECTED]
(41) 9149.5756 - Paranaguá - PR

[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

 

[delphi-br] Migração do Delphi6 para o Delphi 7

[Adolfo Stotz]

Estou migrando de Delphi 6 para Delphi 7. A minha aplicação tem um form de 
Login com FormStyle = fsNormal, que, a partir do cadastro de usuários, carrega 
menus difenciados para cada tipo de usuário (menu000, menu001, menu002 e 
menu003), todos com FormStyle = fsMDIForm.
Pergunta numero 1: Posso ter vários MDIForm na mesma aplicação?
O menu000 (MDIForm) deve carregar diversos Form fsMDIChild, criados em tempo de 
execução, mas aparece o erro "Cannot create form. No MDI forms are currently 
active".
Pergunta numero 2: O que fiz de errado e o que fazer para corrigir ?
Grato
Adolfo

[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] Que banco de dados usar? Alternativa ao Interbase?

[André Argeri]

nesse site tem algumas informações

http://support.microsoft.com/default.aspx?scid=kb;en-us;325022

está em ingles, eu ainda não achei nenhuma documentação em portugues, e para
conectar eu estou usando o ADO.

um abraço





-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

 

[delphi-br] Erro em procedure

[Carlos]

Ola, pessoal.
To criando uma tela mdichild com a função abaixo:
procedure TfrmPrincipal.criatela(TFormulario: TFormClass;
  Formulario: TForm);
var
  found, i: Integer;
begin
  found:= -1;
  for i:=0 to Screen.FormCount -1 do
  if Screen.Forms[i] is TFormulario then
  found:= i;
  if found >= 0 then
  begin
  Screen.Forms[found].BringToFront;
  Screen.Forms[found].WindowState:= wsNormal;
  end
  else
  begin
  Formulario:= TFormulario.Create(Self);
  Formulario.Show;
  end;
end;

crio um formulario Vendas:
criatela(frmVendas, TfrmVendas);
Só que o formulário criado não fica visivel para os outros formularios, 
tipo os datamodules que são crados na abertura do sistema. Neste 
formulario de venda, tenho um currencyedit que deve ser zerado na 
inserção de um novo registro. Então, no evento onnewrecord do 
clientedataset no datamodule tá assim:
frmVenda.CuurencyEdit1.value:= 0;
Quando executo e tento inserir um novo registro, da erro de acces violation.
Passando o mause en cima de frmVenda aparece: frmVenda=nil. Então é como 
se o datamodule não tivesse enxergando o frmvenda.

Se uso desta maneira, funciona sem problemas:
procedure TfrmPrincipal.Venda1Click(Sender: TObject);
var
  found, i: Integer;
begin
  found:= -1;
  for i:=0 to Screen.FormCount -1 do
  if Screen.Forms[i] is TfrmVenda then
  found:= i;
  if found >= 0 then
  Screen.Forms[found].Show
  else
  begin
  frmVenda:= TfrmVenda.Create(Self);
  frmVenda.Show;
  end;
end;


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

<*> 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] Verificar data

[Bianca Beiruth]

olá, denis!
vc vai capturar essas datas dentro de querys ou no escopo do seu código?
qual o SGBD q vc usa?
EncodeDate ou DecodeDate não serviriam pra vc?

NovaData:=EncodeDate(15,2,04);

o DecodeDate é usado p/ obter o dia, mês e ano correspondente a uma data 
definida
em uma variável do tipo TDate Time. nesse caso, devem ser passados como 
parâmetros
um valor do tipo TDateTime, cujo valor será convertido, e três variáveis 
inteiras
sem sinal, tipo Word, que representam, respectivamente, o ano, o mês e o dia a
serem obtidos e passados por referência.

//este procedimento, por exemplo, eu uso p/ pegar a data atual do sistema, no
escopo do meu código (essa é uma forma), mas tb pego em querys (eu uso o 
oracle).
Var
  SYS_DAY, SYS_MON, SYS_YEAR:Word;
  A_DAY, A_MON, A_YEAR  :String;
begin
  DecodeDate(Date,SYS_YEAR,SYS_MON,SYS_DAY);
  Edit.Text:='';
  A_DAY:=IntToStr(SYS_DAY);
  A_MON:=IntToStr(SYS_MON);
  A_YEAR:=IntToStr(SYS_YEAR);

   If SYS_DAY<10
   then Edit.Text:='0'+A_DAY[1]+'/'
   else Edit.Text:=A_DAY+'/';

   If SYS_MON<10
   then Edit.Text:=Edit.Text+'0'+A_MON[1]+'/'
   else Edit.Text:=Edit.Text+A_MON+'/';

   Edit.Text:=Edit.Text+A_YEAR[3]+A_YEAR[4]; //p/ pegar as 2 últimas posições
end;

e ae?

abraços,
bia.
>
>
> Colegas,
>
> Como existem n tipos de confirgurações de data , preciso fazer com
> que meu sistema aceite e interprete somente um tipo DD/MM/YY.
>
> Como fazer isso, pois tenho vários procedimentos  em que preciso
> pegar data do servidor, e data dos arquivos que irei utilizar.
>
> Alguem sabe como fazer isso ?
>
>
> Sds
>
> Denis
>
> FELIZ NATAL
>
>
>
>
>
>
>
>
> --
>> FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM !!
>
>
>
>
>
>
>
> 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!.
>
>
>
>
>
>
>
>
>
>
>
>
>






-- 
< 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] Apresentação/Nova no grupo

[Bianca Beiruth]

saudações a todos!
sou nova no grupo e gostaria de me apresentar!
meu nome é bianca e moro no rio de janeiro. trabalho com programação há 3 anos 
e há
pouco mais de 1 ano programo em delphi (os outros foram dedicados ao VB, o qual 
não
lembro uma única linha de código).
atualmente, trabalho no centro do rio em um órgão público e estou responsável 
por
um sistema do departamente de compras.
espero trocar informações com todos, na medida do possível em q puder ajudar e 
ser
ajudada.
vejo q há vários rapazes por aqui! alguma moça, além d mim? rsrsrs...
um grande abraço a todos!
bia.





-- 
< 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] Nome Máquina/Usuário

[Rodrigo Americo]

Maicon,

Dê uma olhada nestas funções retiradas do DTDelphi. Acredito que
resolvam seu problema.

//Função para pegar o nome do computador
function GetComputerNetName: string;
var
  buffer: array[0..255] of char;
  size: dword;
begin
  size := 256;
  if GetComputerName(buffer, size) then
Result := buffer  else
Result := ''
end;

//Função para pegar o usuário do Windows
function GetUserFromWindows: string;
var
  UserName : string;
  UserNameLen : Dword;
begin
  UserNameLen := 255;
  SetLength(userName, UserNameLen) ;
  if GetUserName(PChar(UserName), UserNameLen) then
Result := Copy(UserName, 1, UserNameLen - 1) else
Result := 'DESCONHECIDO';
end;

Att,
-- 
Rodrigo Américo Cunha de Souza
[EMAIL PROTECTED]
ICQ# 4270625


-- 
< 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] Filtro (SQL)

[Eduardo Buffara Junior]

Vc deve colokar assim...

Sql.Add('AND SITUACAO =' + QuotedStr('ANDAMENTO');

Espero ter ajudado...

T+


Eduardo Buffara Junior - Programador Delphi
[EMAIL PROTECTED]
(41) 9149.5756 - Paranaguá - PR
  - Original Message - 
  From: Erika 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 27, 2004 4:03 PM
  Subject: [delphi-br] Filtro (SQL)



  Oi pessoal

  Eu quero filtrar os dados de uma tabela onde o campo situação deve 
  ser sempre "ANDAMENTO". Estou fazendo assim:
  .
  .
  .
  Sql.Add('AND SITUACAO = ANDAMENTO');
  .
  .
  .
  mas ele não reconhece esta palavra ANDAMENTO, como devo colocar?

  PS: Situação é do tipo string 

  Obrigado []s







[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] OFF - FR impressão matricial

[Cleyton Heusser]

rodrigo é o seguinte,, vc tem que fazer uma função para que na hora de imprimir 
ele retire a pontuação;


function LimpaAcentos(S: string): string;
var
  Acentos1, Acentos2: string;
  i, Aux: Integer;
begin
  Acentos1 := 'ÁÍÓÚÉ ÄÏÖÜË ÀÌÒÙÈ ÃÕ ÂÎÔÛÊ áíóúé äïöüë àìòùè ãõ âîôûê Ççº';
  Acentos2 := 'AIOUE AIOUE AIOUE AO AIOUE aioue aioue aioue ao aioue Cco';
  for i := 0 to Length(S) - 1 do begin
Aux := Pos(S[i], Acentos1);
if (aux > 0) then S[i] := Acentos2[Aux];
  end;
  Result := S;
end;


ai pra vc usar ela é o seguinte,, é so chamar a funcao, e passar o que vc quer 
exemplo
aqui eu utilizo o componente say..


LimpaAcentos(EmpNOMEFANTASIA.AsString)); say(li, 79, '|'); inc(li);


espero ter ajudado

Atenciosamente 


Cleyton Heusser
  Programador
  (49) 9992-3478
Plasoft - Desenv. e Planj. de Sistemas
  (49)   224-9034
 msn [EMAIL PROTECTED]
  - Original Message - 
  From: Rodrigo ®¿® 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 27, 2004 8:39 AM
  Subject: [delphi-br] OFF - FR impressão matricial


  Bom Dia Colegas

  Utilizo o FR 2.4X em um impressora matricial OKI DATA 320 ML Emulando a 
EPSON, utilizo a fonte Draft 10cpi ! , S.o. Win9x e WinXp , só que os acento e 
ceçedilhas saem como caracteres ASCII (quadradinho, bolinha, ) ! Alguem tem 
alguma idéia do que posso fazer passa arrumar isso? 


  -- FB1W98D6IBX6IBEXPERT2.5 --
  Muito Obrigado
  ®¿® rodrigo®--Rodrigo B Marcondes--Curitiba - PR--

--

  No virus found in this outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/04


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



[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] Filtro (SQL)

[eduardobuffarajr]

Vc deve colokar assim...
 
Sql.Add('AND SITUACAO =' + QuotedStr('ANDAMENTO');
 
Espero ter ajudado...
 
T+





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

 

RES: [delphi-br] Filtro (SQL)

[Artur Rodrigo Guerra]

Tente
Sql.Add('AND SITUACAO ='+quotedStr('ANDAMENTO'));
ou
Sql.Add('AND SITUACAO = "ANDAMENTO"');

Falow !

-Mensagem original-
De: Erika [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 27 de dezembro de 2004 16:03
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Filtro (SQL)




Oi pessoal

Eu quero filtrar os dados de uma tabela onde o campo situação deve
ser sempre "ANDAMENTO". Estou fazendo assim:
.
.
.
Sql.Add('AND SITUACAO = ANDAMENTO');
.
.
.
mas ele não reconhece esta palavra ANDAMENTO, como devo colocar?

PS: Situação é do tipo string

Obrigado []s





--
< 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] Comunicação serial

[DVJ]

Olá a todos

Po, to batendo a cabeça mesmo com essa leitura dos dados vindo por uma porta 
serial.
To usando o componente ComPort, jogo os dados recebidos em um listbox mas o que
chega é uma sequência de ^. Tenho que tratar alguma coisa (binário, 
etc)?

Grato





___ 
Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. 
http://br.acesso.yahoo.com/ - Internet rápida e grátis


-- 
< 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] Filtro (SQL)

[Erika]

Oi pessoal

Eu quero filtrar os dados de uma tabela onde o campo situação deve 
ser sempre "ANDAMENTO". Estou fazendo assim:
.
.
.
Sql.Add('AND SITUACAO = ANDAMENTO');
.
.
.
mas ele não reconhece esta palavra ANDAMENTO, como devo colocar?

PS: Situação é do tipo string 

Obrigado []s





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

 

RES: [delphi-br] Que banco de dados usar? Alternativa ao Interbas e?

[Walter Alves Chagas Junior]

so no MSDN mesmo
 
 
 []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: Artur Rodrigo Guerra [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 13:49
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Que banco de dados usar? Alternativa ao
> Interbase?
> 
> 
> 
> André, vc teria alguma documentação sobre o MSDE ?
> Tenho algumas dúvidas a respeito desse cara.
> 
> Pode mandar em private.
> 
> Valeu !
> 
> Artur.
> 
> -Mensagem original-
> De: André Argeri [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 14:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Que banco de dados usar? Alternativa ao
> Interbase?
> 
> 
> 
> Eu começei a usar o MSDE, e estou gostando do desempenho dele
> 
> 
> 
> 
> --
> < 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
> 
> 
> 
> 
>  
> 
> 
> 


[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

 

[delphi-br] [OFF-TOPIC] VAGA EMPREGO PROGRAMADOR DELPHI/FIREBIRD GOIÂNIA

[LabSoft]

Desculpem o OFF-TOPIC, más abri uma nova vaga de programador delphi/firebird em 
Goiânia.

Favor enviar currículum para c o n t a t o @ l a b s o f  t  n e t. c o m . 
b r

Abraço a todos.
Mateus;


[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

 

[delphi-br] Componente ImpMat

[Eduardo]

Galera, alguém trabalha com o componente impMat do Mauro Santana para
impressão em matriciais ?

Poderiam de dar uma mão ?
Eduardo de Almeida Silva
 - [EMAIL PROTECTED] -
  - [EMAIL PROTECTED] -

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.817 / Virus Database: 555 - Release Date: 15/12/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

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

 

RES: [delphi-br] RxLib para Delphi 6

[Walter Alves Chagas Junior]

Olha, entre usar a RX e usar a Jedi, é bem relativo.

a RX é mais leve

a suite Jedi é pesada pra qualquer maquina. Dependendo do computador e do
que voce pretente usar, é melhor ficar na RX.

 
 
 []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: Rubem Rocha [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 14:09
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] RxLib para Delphi 6
> Prioridade: Alta
> 
> 
> 
> Use a suite(coleção) de componentes JEDI 
> (http://sourceforge.net/projects/jvcl). Ela já incorpora os 
> componentes da RxLib.
> []s
> 
> -Mensagem original-
> De: Depto de Informatica [mailto:[EMAIL PROTECTED] 
> Enviada em: segunda-feira, 27 de dezembro de 2004 13:09
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] RxLib para Delphi 6
> 
> 
> 
> Caros colegas,
> 
> Alguém podería me informar onde posso baixar a RxLib e o 
> tutorial para instalação para Delphi 6 ?
> 
> Obrigado,
> 
> Luiz Carlos
> 
> [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.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




 




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

[Valcir José Tasquim]

Desculpe inverti, o correto é editmask
- Original Message -
From: "Leandro Molinari" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 9:56 AM
Subject: Re: [delphi-br] String


>
> Se for Delphi 7, utilize a funcao StringReplace()
>
>
> []s
>
> Leandro.
>
> - Original Message -
> From: "luciano" <[EMAIL PROTECTED]>
> To: "delphi" 
> Sent: Monday, December 27, 2004 9:01 AM
> Subject: [delphi-br] String
>
>
> >
> > Pessoal alguém sabe se existe alguma função que retire da string um ou
> > mais
> > caracteres que não desejo.
> >
> > Ex: String "11.111.111/-11", desta string não quero os pontos, os
> > traços
> > e nem a barra.
> >
> > 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
>
>
>
>
>
>
>
>
>



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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

 

Re: [delphi-br] Delphi 6 e Fiebird 1.5

[Eduardo Galvão]

Olá,

>Companheiros,
>Tento importar um arquivo texto (TXT) para uma tabela do meu banco
>contendo uma mala-direta (NOME, END, BAIRRO, etc) de aproximadamente
>50.000 registros. Acontece que demora muiito para completar a operação.
>Utilizo os componentes da guia Interbase. Firebird 1.5 embarcado. Delphi 6.
>Alguma dica? ou estou querendo um milagre?

Sem você falar COMO está importando fica difícil a gente saber... Já
importei arquivos similares, e durou apenas alguns segundos..

Manda a rotina de importação..

Saudações,
Eduardo Paci Galvão
Engenheiro Eletricista UFMG 1990
www.egalvao.com.br
MSN: [EMAIL PROTECTED]
Skype: eduardogalvao






-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

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

 

RES: [delphi-br] RxLib para Delphi 6

[Rubem Rocha]

Use a suite(coleção) de componentes JEDI 
(http://sourceforge.net/projects/jvcl). Ela já incorpora os componentes da 
RxLib.
[]s

-Mensagem original-
De: Depto de Informatica [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 13:09
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] RxLib para Delphi 6



Caros colegas,

Alguém podería me informar onde posso baixar a RxLib e o tutorial para 
instalação para Delphi 6 ?

Obrigado,

Luiz Carlos

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

<*> 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] RxLib para Delphi 6

[Depto de Informatica]

Caros colegas,

Alguém podería me informar onde posso baixar a RxLib e o tutorial para 
instalação para Delphi 6 ?

Obrigado,

Luiz Carlos

[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: RES: RES: [delphi-br] is not a valid integer value

[Nilson Chagas]

Subentende entaum, q este cliente jah esta cadastrado e posicionado quando vc 
esta inserindo este evento.
eu se fosse vc daria um 
showmodal(IBQcliente.FIELDBYNAME('CO_CLINETE').AsString), antes do post, soh 
para ver que valor tem neste campo.

Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:

A inserção e  através DBLookupComboBox mas já tentei forçar


IBQEVENTOS.FIELDBYNAME('CO_CLINETE').ASvARIANT :=
IBQcliente.FIELDBYNAME('CO_CLINETE').ASvARIANT;




-Mensagem original-
De: Nilson Chagas [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 27 de dezembro de 2004 13:30
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] is not a valid integer value


Mas como vc tah fazendo esta inserção???


Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:



Boa tarde Nilson



A estrutura e a seguinte  Tabela CLIENTE tem todos os campos necessários
e tem CO_CLIENTE que e chave primaria na tabela EVENTOS tem CO_CLIENTE que e
uma forenki os campo e do tipo INTEGER  

Tenho uma idéia, em partes:
1> Manda qual eh a estrutura
2> Como as tabelas CLIENTES e EVENTOS estaum ligadas
3> Como vc esta fazendo esta inserção

Uma observação, vc tah tentando fazer esta inserção em um GRID

[]s

Nilson Chagas

"E Jesus, respondendo, disse-lhes: Porventura não errais vós em razão de não
saberdes as Escrituras nem o poder de Deus?" Mc 12v24

Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:

Boa tarde,


Caros amigos isso e urgente a muito tempo que estou passando por
esse problema já não sei como fazer mais pois já tentei de tudo ate recriar
o banco de dados que esta em interbase ,  tenho uma tabela cliente e um
outra de eventos um evento tem que ter um cliente quando vou gravar o código
do cliente na tabela de eventos da o seguinte erro "is not a valid integer
value"  alguém tem idéia de como posso fazer para resolver esse problema.
Isso tem uma certa urgência pois meu prazo já acabou.
Josimar Guedes de Carvalho
 [EMAIL PROTECTED] /
 [EMAIL PROTECTED]
   Analista de Sistemas - Equipe de DW - INEP-MEC
Tel: 55-(61)2104-9760
Cel:55-(61)9635-7272



__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

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



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



-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do
Yahoo! 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









-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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



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

-
Links do Yahoo! Grupos

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



-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
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

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

<*> Par

[delphi-br] Ícones

[galvao_em]

Olá pessoal, estou desenvolvendo um sistema para controle de frotas, e
estou precisando de ícones para o mesmo. Se alguém tiver algum,
agradeceria.





-- 
< 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] FastScript..Algum Santo Programador usa???

[Marcelo M Florindo]

Olá,

Gostaria de saber se existe alguém que use o fast script. Muito obrigado a 
todos..

Marcelo

[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: RES: [delphi-br] is not a valid integer value

[Nilson Chagas]

Mas como vc tah fazendo esta inserção???


Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:



Boa tarde Nilson



A estrutura e a seguinte  Tabela CLIENTE tem todos os campos necessários
e tem CO_CLIENTE que e chave primaria na tabela EVENTOS tem CO_CLIENTE que e
uma forenki os campo e do tipo INTEGER  

Tenho uma idéia, em partes:
1> Manda qual eh a estrutura
2> Como as tabelas CLIENTES e EVENTOS estaum ligadas
3> Como vc esta fazendo esta inserção

Uma observação, vc tah tentando fazer esta inserção em um GRID

[]s

Nilson Chagas

"E Jesus, respondendo, disse-lhes: Porventura não errais vós em razão de não
saberdes as Escrituras nem o poder de Deus?" Mc 12v24

Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:

Boa tarde,


Caros amigos isso e urgente a muito tempo que estou passando por
esse problema já não sei como fazer mais pois já tentei de tudo ate recriar
o banco de dados que esta em interbase ,  tenho uma tabela cliente e um
outra de eventos um evento tem que ter um cliente quando vou gravar o código
do cliente na tabela de eventos da o seguinte erro "is not a valid integer
value"  alguém tem idéia de como posso fazer para resolver esse problema.
Isso tem uma certa urgência pois meu prazo já acabou.
Josimar Guedes de Carvalho
 [EMAIL PROTECTED] /
 [EMAIL PROTECTED]
   Analista de Sistemas - Equipe de DW - INEP-MEC
Tel: 55-(61)2104-9760
Cel:55-(61)9635-7272



__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

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



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



-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
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

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

 

RES: [delphi-br] is not a valid integer value

[Josimar Guedes de Carvalho]

Boa tarde Nilson



A estrutura e a seguinte  Tabela CLIENTE tem todos os campos necessários
e tem CO_CLIENTE que e chave primaria na tabela EVENTOS tem CO_CLIENTE que e
uma forenki os campo e do tipo INTEGER  

Tenho uma idéia, em partes:
1> Manda qual eh a estrutura
2> Como as tabelas CLIENTES e EVENTOS estaum ligadas
3> Como vc esta fazendo esta inserção
 
Uma observação, vc tah tentando fazer esta inserção em um GRID

[]s
 
Nilson Chagas
 
"E Jesus, respondendo, disse-lhes: Porventura não errais vós em razão de não
saberdes as Escrituras nem o poder de Deus?" Mc 12v24

Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:

Boa tarde,


Caros amigos isso e urgente a muito tempo que estou passando por
esse problema já não sei como fazer mais pois já tentei de tudo ate recriar
o banco de dados que esta em interbase ,  tenho uma tabela cliente e um
outra de eventos um evento tem que ter um cliente quando vou gravar o código
do cliente na tabela de eventos da o seguinte erro "is not a valid integer
value"  alguém tem idéia de como posso fazer para resolver esse problema.
Isso tem uma certa urgência pois meu prazo já acabou.
Josimar Guedes de Carvalho
 [EMAIL PROTECTED] /
 [EMAIL PROTECTED]
   Analista de Sistemas - Equipe de DW - INEP-MEC
Tel: 55-(61)2104-9760
Cel:55-(61)9635-7272



__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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] Como ler e gravar um MEMO em um campo BLOB

[marcelo notari de carvalho]

Como fazer para ler e gravar um memo em um campo BLOB

Marcelo Carvalho

[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] is not a valid integer value

[Nilson Chagas]

Tenho uma idéia, em partes:
1> Manda qual eh a estrutura
2> Como as tabelas CLIENTES e EVENTOS estaum ligadas
3> Como vc esta fazendo esta inserção
 
Uma observação, vc tah tentando fazer esta inserção em um GRID

[]s
 
Nilson Chagas
 
"E Jesus, respondendo, disse-lhes: Porventura não errais vós em razão de não 
saberdes as Escrituras nem o poder de Deus?" Mc 12v24

Josimar Guedes de Carvalho <[EMAIL PROTECTED]> wrote:

Boa tarde,


Caros amigos isso e urgente a muito tempo que estou passando por
esse problema já não sei como fazer mais pois já tentei de tudo ate recriar
o banco de dados que esta em interbase ,  tenho uma tabela cliente e um
outra de eventos um evento tem que ter um cliente quando vou gravar o código
do cliente na tabela de eventos da o seguinte erro "is not a valid integer
value"  alguém tem idéia de como posso fazer para resolver esse problema.
Isso tem uma certa urgência pois meu prazo já acabou.
Josimar Guedes de Carvalho
 [EMAIL PROTECTED] /
 [EMAIL PROTECTED]
   Analista de Sistemas - Equipe de DW - INEP-MEC
Tel: 55-(61)2104-9760
Cel:55-(61)9635-7272



__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

[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

 

[delphi-br] is not a valid integer value

[Josimar Guedes de Carvalho]

 
Boa tarde,
 
 
Caros amigos isso e urgente a muito tempo que estou passando por
esse problema já não sei como fazer mais pois já tentei de tudo ate recriar
o banco de dados que esta em interbase ,  tenho uma tabela cliente e um
outra de eventos um evento tem que ter um cliente quando vou gravar o código
do cliente na tabela de eventos da o seguinte erro "is not a valid integer
value"  alguém tem idéia de como posso fazer para resolver esse problema.
Isso tem uma certa urgência pois meu prazo já acabou.
Josimar Guedes de Carvalho
  [EMAIL PROTECTED] /
 [EMAIL PROTECTED]
   Analista de Sistemas - Equipe de DW - INEP-MEC
Tel: 55-(61)2104-9760
Cel:55-(61)9635-7272
 
 


[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] Que banco de dados usar? Alternativa ao Interbase?

[André Argeri]

Eu começei a usar o MSDE, e estou gostando do desempenho dele




-- 
< 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] instalação componentes com vários programadores

[Vanius Roberto Bittencourt]

Pessoal,

Como vocês fazem para instalar componentes numa empresa com vários
programadores: vocês copiam os componentes localmente para o c: ou
todos programadores compartilham os mesmos através da rede?

-- 
Atenciosamente,
 
Vanius Roberto Bittencourt


-- 
< 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] Que banco de dados usar? Alternativa ao Interbase?

[delphi6_2005]

Amigos preciso de uma dica, preciso desenvolver uma aplicação 
relativamente simples e não sei qual banco utilizar, pois só conheço 
o oracle, como não preciso de muito recurso será que o interbase 
poderia servir, há alguma alternativa ao interbase?

grato pela ajuda

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

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

 

RES: [delphi-br] [OFF-TOPIC] VAGA EMPREGO PROGRAMADOR DELPHI/FIREBIRD GOIÂNIA

[Walter Alves Chagas Junior]

Mateus,

Poste esta mensagem tambem na lista delphi-empregos

[EMAIL PROTECTED]

 
 
 []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: LabSoft [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 08:20
> Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED];
> [EMAIL PROTECTED]
> Assunto: [delphi-br] [OFF-TOPIC] VAGA EMPREGO PROGRAMADOR
> DELPHI/FIREBIRD GOIÂNIA
> 
> 
> 
> Desculpem o OFF-TOPIC, más abri uma nova vaga de programador 
> delphi/firebird em Goiânia.
> 
> Favor enviar currículum para c o n t a t o @ l a b s o f  
> t  n e t. c o m . b r
> 
> Abraço a todos.
> Mateus;
> 
> 
> [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
> 
> 
> 
> 
>  
> 
> 
> 


[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] Delphi 6 e Fiebird 1.5

[Maciel Listas]

Acho q oq vc poderia fazer era dar o applyupdates após uns 1000 ou mais
registros, tb vai ajudar um pouco, outra coisa q acho q deve aumentar
consideravelmente a performance eh vc criar um procedure pra inserir os
dados, acho q fica mais rapido.

Maciel



-- 
< 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] Que banco de dados usar? Alternativa ao Interbase?

[Weigly]

MySQL

- Original Message - 
From: "marcelo notari de carvalho" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 9:09 AM
Subject: Re: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?



A ÚNICA OPÇÃO POSSIVEL 


FIREBIRD, FIREBIRD, FIREBIRD, FIREBIRD 


E SE VOCÊ AINDA FICA COM ALGUMA DUVIDA


FIREBIRD, FIREBIRD, FIREBIRD, FIREBIRD 


risos

Marcelo Carvalho


-Mensagem original-
De:delphi6_2005  <[EMAIL PROTECTED]>
Enviada em: 27/12/2004 10:41:34
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?



Amigos preciso de uma dica, preciso desenvolver uma aplicação
relativamente simples e não sei qual banco utilizar, pois só conheço
o oracle, como não preciso de muito recurso será que o interbase
poderia servir, há alguma alternativa ao interbase?

grato pela ajuda

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










[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] Que banco de dados usar? Alternativa ao Interbase?

[marcelo notari de carvalho]

A ÚNICA OPÇÃO POSSIVEL 


FIREBIRD, FIREBIRD, FIREBIRD, FIREBIRD 


E SE VOCÊ AINDA FICA COM ALGUMA DUVIDA


FIREBIRD, FIREBIRD, FIREBIRD, FIREBIRD 


risos

Marcelo Carvalho


-Mensagem original-
De:delphi6_2005  <[EMAIL PROTECTED]>
Enviada em: 27/12/2004 10:41:34
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Que banco de dados usar? Alternativa ao Interbase?



Amigos preciso de uma dica, preciso desenvolver uma aplicação 
relativamente simples e não sei qual banco utilizar, pois só conheço 
o oracle, como não preciso de muito recurso será que o interbase 
poderia servir, há alguma alternativa ao interbase?

grato pela ajuda

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




 





[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] Delphi 6 e Fiebird 1.5

[Mario Scavoni]

Eduardo,
os campos do arquivo TXT estão delimitados pelo ';'.

begin
  AssignFile ( arq, 'C:\ARQUIVO.TXT' );
  Reset( arq );
  ReadLn( arq, linha );
  dtm_Dados.tblMala.Open;
  while not Eof ( arq ) do
begin
dtm_Dados.tblMala.Append;
PosSep := Pos(';',Linha);
dtm_Dados.tblMala.FieldByName('POSTO').AsString :=
Copy(Linha,1,PosSep-1);
...
dtm_Dados.tblMala.ApplyUpdates;
ReadLn ( arq, linha );
end;
  CloseFile ( arq );
end;

- Original Message - 
From: "Eduardo Galvão" <[EMAIL PROTECTED]>
To: "Lista Delphi" 
Sent: Monday, December 27, 2004 12:05 PM
Subject: Re: [delphi-br] Delphi 6 e Fiebird 1.5


>
> Olá,
>
> >Companheiros,
> >Tento importar um arquivo texto (TXT) para uma tabela do meu banco
> >contendo uma mala-direta (NOME, END, BAIRRO, etc) de aproximadamente
> >50.000 registros. Acontece que demora muiito para completar a
operação.
> >Utilizo os componentes da guia Interbase. Firebird 1.5 embarcado. Delphi
6.
> >Alguma dica? ou estou querendo um milagre?
>
> Sem você falar COMO está importando fica difícil a gente saber... Já
> importei arquivos similares, e durou apenas alguns segundos..
>
> Manda a rotina de importação..
>
> Saudações,
> Eduardo Paci Galvão
> Engenheiro Eletricista UFMG 1990
> www.egalvao.com.br
> MSN: [EMAIL PROTECTED]
> Skype: eduardogalvao
>
>
>
>
>
>
> -- 
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

 

[delphi-br] [OFF-TOPIC] - Cadastro de PJ

[JGodoi]

Pessoal,

Estamos desenvolvendo um novo sistema em D7+FB e presisamos sanear o cadastro 
de Clientes Pessoa Jurídica da Empresa.  Gostaria de saber se vcs sabem de 
algum orgão ou empresa que disponibiliza ou vende um cadastro de PJ.

Grato,

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

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

[Andre - Informática]

usa esta função:

Function TFrmVivo.tiramasc(edt: string): string;

const masc : array[1..6] of string=('/', '.', ',','-','(',')');
var i,j,k :integer;
aux : string;
begin
  aux:='';
  for i:=1 to length(edt) do
   begin
k:=0;
for j:=1 to 6 do
 if (edt[i]=masc[j]) then
  begin
   k:=k+1;
   break;
  end;
if k=0 then
 aux:=aux + edt[i];
   end;
   Result := Trim(aux);
end;

usa ela assim
stringsemmasc:= tiramasc(string);
  - Original Message - 
  From: Diogo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 27, 2004 10:49 AM
  Subject: RES: [delphi-br] String


  Uma função nativa da Delphi que retire tudo de uma vez só, acho que não tem,
  aconselharia a usar StringReplace, ou criar uma função que faça isso.

  Ex: function retira(teste : string): string;
  begin
  teste := trim(StringReplace(teste,'.','',[rfReplaceAll]));
  teste := trim(StringReplace(teste,'/','',[rfReplaceAll]));
  teste := trim(StringReplace(teste,'-','',[rfReplaceAll]));
  result := teste;
  end;

  A função não é muito "elegante" hehehe, mas funciona.
  []s

  -Mensagem original-
  De: luciano [mailto:[EMAIL PROTECTED] 
  Enviada em: segunda-feira, 27 de dezembro de 2004 08:02
  Para: delphi
  Assunto: [delphi-br] String


  Pessoal alguém sabe se existe alguma função que retire da string um ou mais
  caracteres que não desejo.

  Ex: String "11.111.111/-11", desta string não quero os pontos, os traços
  e nem a barra.

  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]



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.298 / Virus Database: 265.6.5 - Release Date: 26/12/2004


  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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

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

[luciano]

É Delphi 5, não há compatível nesta versão?

- Original Message - 
From: "Leandro Molinari" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 9:56 AM
Subject: Re: [delphi-br] String



Se for Delphi 7, utilize a funcao StringReplace()


[]s

Leandro.

- Original Message - 
From: "luciano" <[EMAIL PROTECTED]>
To: "delphi" 
Sent: Monday, December 27, 2004 9:01 AM
Subject: [delphi-br] String


>
> Pessoal alguém sabe se existe alguma função que retire da string um ou
> mais
> caracteres que não desejo.
>
> Ex: String "11.111.111/-11", desta string não quero os pontos, os
> traços
> e nem a barra.
>
> 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











-- 
< 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: Bold for Delphi

[Walter Alves Chagas Junior]

Eu acho que esse assunto poderia ser discutido aqui na lista mesmo, 
pois iteressa a todos nós. Que tal abrirmos uma Thread a respeito de 
Bold?


[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
ICQ: 6057450
MSN: [EMAIL PROTECTED]


--- Em delphi-br@yahoogrupos.com.br, "Weigly" <[EMAIL PROTECTED]> escreveu
> Alguém aqui da lista que já trabalhou com o Bold poderia comentar 
sua 
> experiência em PVT !





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

 

RES: [delphi-br] Dúvida sobre um loop

[Andre de Souza Ferreira]

Não, tá calculando fora! Dá uma olhadinha na procedure abaixo!
 
> > procedure TForm1.ProcessarClick(Sender: TObject);
> > Var
> > Salario, Maior_Salario, Soma_Salario, 
> > Soma_Filhos,Media_Salario, Media_Filho, Salario_Inicial, 
> > Percentual: Real;
> > Filhos, Cont, Conta_Sal_100: Integer;
> > begin
> >  Salario:= StrtoFloat (Edit1.Text);
> >  Filhos:= StrtoInt (Edit2.Text);
> >  While Salario < 0 do
> >  Soma_Salario:=0;
> >  Soma_Filhos:=0;
> >  Cont:=0;
> >  Conta_Sal_100:=0;
> >  Salario_Inicial:=Salario;
> >  Maior_Salario:=0;
> >   begin
> >  Soma_Salario:=Soma_Salario + Salario;
> >  Soma_Filhos:=Soma_Filhos + Filhos;
> >   if Salario<= 100 then
> >  Conta_Sal_100:=Conta_Sal_100 + 1;
> >   if Salario >= Salario_Inicial then
> >  Maior_Salario:= Salario;
> >  Cont:=Cont + 1;
> >   end;
> >   Edit1.Clear;
> >   Edit2.Clear;
> >   Edit1.SetFocus;
> >   Media_Salario:=Soma_Salario/Cont;
> >   Media_Filho:=Soma_Filhos/Cont;
> >   Percentual:=(Conta_Sal_100/Cont)/100;
> >   Memo1.Lines.Add('A Média de Salário da População é de 
> > R$ ' + Floattostr(Media_Salario) + #13);
> >   Memo1.Lines.Add('A Média de Filhos da População é de  ' 
> > + Floattostr(Media_Filho) + ' Filhos' + #13);
> >   Memo1.Lines.Add('O Maior de Salário da População é de 
> > R$ ' + Floattostr(Maior_Salario) + #13);
> >   Memo1.Lines.Add('O Percentual de pessoas que ganham menos 
> > de R$ 100,00 : ' + Floattostr(Percentual) + '%' +  #13);
> >   end;

 

Att. 
André Ferreira 
Brasilsaúde Cia de Seguros 

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 27 de dezembro de 2004 11:42
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] Dúvida sobre um loop


Aí tem que ver a lógica do seu projeto. Ce deve tar pondo pra calcular
dentro do Loop.



[]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: Andre de Souza Ferreira [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 11:33
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Dúvida sobre um loop
> 
> 
> 
> Há Walter, esqueci de te perguntar, porque que a cada volta 
> no loop ele me trás os cálculos? O que eu queria era enquanto 
> o programa estivesse captando dados, o memo só entraria em 
> ação quando eu entrasse com um salário negativo! Aí sim o 
> memo  entraria em ação com cálculo final tudo certinho! Sabe 
> me dizer? Um abraço.
>  
> 
> Att. 
> André Ferreira 
> Brasilsaúde Cia de Seguros 
> 
> -Mensagem original-
> De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 10:37
> Para: 'delphi-br@yahoogrupos.com.br'
> Assunto: RES: [delphi-br] Dúvida sobre um loop
> 
> 
> Olá amigo,
> 
> Você tem que consistir os dados nos edits antes de gravá-los, 
> principalmente
> dados do tipo inteiro e flutuante que dão pau se forem 
> gravados em formato
> inválido.
> 
> veja uma dica:
> 
> > Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> > clicar direto no Button!! Dá o seguinte erro: 
> 
> Para solucionar isto, no Evento OnClick do Button coloque o 
> seguinte código:
> 
> if Edit1.Text = '' then 
>Edit1.Text := '0,00'
> 
> Isto faz com que o Valor do Edit, caso ele esteja vazio, 
> seja-lhe atribuído
> o valor 0,00 que não dá problema de gravação no banco.
> 
> 
> E no Evento OnKeyPress do Edit, coloque o seguinte código:
> 
> if not (Key in [#8,#9,'0'..'9',',']) then
>   begin
> key := #0;
> setfocus;
>   end; 
> 
> Isto impede que o usuário digite caracteres inválidos no Edit 
> fazendo com
> que ele somente aceite numeros e a virgula.
> 
> 
> []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: Andre de Souza Ferreira [mailto:[EMAIL PROTECTED]
> > Enviada em: segunda-feira, 27 de dezembro de 2004 10:17
> > Para: delphi-br@yahoogrupos.com.br
> > Assunto: [delphi-br] Dúvida sobre um loop
> > 
> > 
> > 
> > Pessoal, bom dia a todos;
> >  
> > Sou iniciante em programação Delphi e ká; estou eu estudando 
> > e me deparei com um problema!!! Tô fazendo um programinha, 
> > cujo a intensão é recolher dados de Salário da população e  
> > número de Filhos.
> >  
> > Até aí ok!!! Coloquei no Form dois Edit's, um Botton para 
> > processar a informação e um Memo, onde sairão os cálculos!!! 
> >  
> > Os Cálculos são estes:
> >  
> > Média de salários da populaçãoo, média de filhos, maior 
> > salário e percentual de pessoas com salário até 100,00 reais. 
> > Beleza!!!
> >  
> > Coloquei um while, e minha condição de saída é um salário 
> > negativo. Mas não tô conseguindo prossessar o cálculo A 
> > cada volta do loop,

RES: [delphi-br] Dúvida sobre um loop

[Walter Alves Chagas Junior]

Aí tem que ver a lógica do seu projeto. Ce deve tar pondo pra calcular
dentro do Loop.

 
 
 []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: Andre de Souza Ferreira [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 11:33
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Dúvida sobre um loop
> 
> 
> 
> Há Walter, esqueci de te perguntar, porque que a cada volta 
> no loop ele me trás os cálculos? O que eu queria era enquanto 
> o programa estivesse captando dados, o memo só entraria em 
> ação quando eu entrasse com um salário negativo! Aí sim o 
> memo  entraria em ação com cálculo final tudo certinho! Sabe 
> me dizer? Um abraço.
>  
> 
> Att. 
> André Ferreira 
> Brasilsaúde Cia de Seguros 
> 
> -Mensagem original-
> De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 10:37
> Para: 'delphi-br@yahoogrupos.com.br'
> Assunto: RES: [delphi-br] Dúvida sobre um loop
> 
> 
> Olá amigo,
> 
> Você tem que consistir os dados nos edits antes de gravá-los, 
> principalmente
> dados do tipo inteiro e flutuante que dão pau se forem 
> gravados em formato
> inválido.
> 
> veja uma dica:
> 
> > Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> > clicar direto no Button!! Dá o seguinte erro: 
> 
> Para solucionar isto, no Evento OnClick do Button coloque o 
> seguinte código:
> 
> if Edit1.Text = '' then 
>Edit1.Text := '0,00'
> 
> Isto faz com que o Valor do Edit, caso ele esteja vazio, 
> seja-lhe atribuído
> o valor 0,00 que não dá problema de gravação no banco.
> 
> 
> E no Evento OnKeyPress do Edit, coloque o seguinte código:
> 
> if not (Key in [#8,#9,'0'..'9',',']) then
>   begin
> key := #0;
> setfocus;
>   end; 
> 
> Isto impede que o usuário digite caracteres inválidos no Edit 
> fazendo com
> que ele somente aceite numeros e a virgula.
> 
> 
> []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: Andre de Souza Ferreira [mailto:[EMAIL PROTECTED]
> > Enviada em: segunda-feira, 27 de dezembro de 2004 10:17
> > Para: delphi-br@yahoogrupos.com.br
> > Assunto: [delphi-br] Dúvida sobre um loop
> > 
> > 
> > 
> > Pessoal, bom dia a todos;
> >  
> > Sou iniciante em programação Delphi e ká; estou eu estudando 
> > e me deparei com um problema!!! Tô fazendo um programinha, 
> > cujo a intensão é recolher dados de Salário da população e  
> > número de Filhos.
> >  
> > Até aí ok!!! Coloquei no Form dois Edit's, um Botton para 
> > processar a informação e um Memo, onde sairão os cálculos!!! 
> >  
> > Os Cálculos são estes:
> >  
> > Média de salários da populaçãoo, média de filhos, maior 
> > salário e percentual de pessoas com salário até 100,00 reais. 
> > Beleza!!!
> >  
> > Coloquei um while, e minha condição de saída é um salário 
> > negativo. Mas não tô conseguindo prossessar o cálculo A 
> > cada volta do loop, ele me trás o cálculo que o sistema 
> > pede!!! O que tenho feito de errado
> >  
> > Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> > clicar direto no Button!! Dá o seguinte erro: 
> > ---
> > Debugger Exception Notification
> > ---
> > Project Project_Ex3.exe raised exception class EConvertError 
> > with message ''' is not a valid floating point value'. 
> > Process stopped. Use Step or Run to continue.
> > ---
> > OK   Help   
> > ---
> >  Como faço  para evitar isso???
> >  
> > E a respeito do cálculo, como faço? Segue o código. Agradeço 
> > se houver alguem experiente no grupo que possa me dá¡ uma 
> > luz, a final, ninguém nasce sabendo!!!
> >  
> > procedure TForm1.ProcessarClick(Sender: TObject);
> > Var
> > Salario, Maior_Salario, Soma_Salario, 
> > Soma_Filhos,Media_Salario, Media_Filho, Salario_Inicial, 
> > Percentual: Real;
> > Filhos, Cont, Conta_Sal_100: Integer;
> > begin
> >  Salario:= StrtoFloat (Edit1.Text);
> >  Filhos:= StrtoInt (Edit2.Text);
> >  While Salario < 0 do
> >  Soma_Salario:=0;
> >  Soma_Filhos:=0;
> >  Cont:=0;
> >  Conta_Sal_100:=0;
> >  Salario_Inicial:=Salario;
> >  Maior_Salario:=0;
> >   begin
> >  Soma_Salario:=Soma_Salario + Salario;
> >  Soma_Filhos:=Soma_Filhos + Filhos;
> >   if Salario<= 100 then
> >  Conta_Sal_100:=Conta_Sal_100 + 1;
> >   if Salario >= Salario_Inicial then
> >  Maior_Salario:= Salario;
> >  Cont:=Cont + 1;
> >   end;
> >   Edit1.Clear;
> >   Edit2.Clear;
> >   Edit1.SetFocus;
> >   Media_Salario:=Soma_Salario/Cont;
> >   Media_Filho:=Soma_Filhos/Cont;
> >   Percentual:=(Conta_Sal_100/Cont)/100;
> >   Memo1.Lines.Add('A Méd

RES: [delphi-br] Dúvida sobre um loop

[Andre de Souza Ferreira]

Há Walter, esqueci de te perguntar, porque que a cada volta no loop ele me trás 
os cálculos? O que eu queria era enquanto o programa estivesse captando dados, 
o memo só entraria em ação quando eu entrasse com um salário negativo! Aí sim o 
memo  entraria em ação com cálculo final tudo certinho! Sabe me dizer? Um 
abraço.
 

Att. 
André Ferreira 
Brasilsaúde Cia de Seguros 

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 27 de dezembro de 2004 10:37
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] Dúvida sobre um loop


Olá amigo,

Você tem que consistir os dados nos edits antes de gravá-los, principalmente
dados do tipo inteiro e flutuante que dão pau se forem gravados em formato
inválido.

veja uma dica:

> Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> clicar direto no Button!! Dá o seguinte erro: 

Para solucionar isto, no Evento OnClick do Button coloque o seguinte código:

if Edit1.Text = '' then 
   Edit1.Text := '0,00'

Isto faz com que o Valor do Edit, caso ele esteja vazio, seja-lhe atribuído
o valor 0,00 que não dá problema de gravação no banco.


E no Evento OnKeyPress do Edit, coloque o seguinte código:

if not (Key in [#8,#9,'0'..'9',',']) then
  begin
key := #0;
setfocus;
  end; 

Isto impede que o usuário digite caracteres inválidos no Edit fazendo com
que ele somente aceite numeros e a virgula.


[]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: Andre de Souza Ferreira [mailto:[EMAIL PROTECTED]
> Enviada em: segunda-feira, 27 de dezembro de 2004 10:17
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Dúvida sobre um loop
> 
> 
> 
> Pessoal, bom dia a todos;
>  
> Sou iniciante em programação Delphi e ká; estou eu estudando 
> e me deparei com um problema!!! Tô fazendo um programinha, 
> cujo a intensão é recolher dados de Salário da população e  
> número de Filhos.
>  
> Até aí ok!!! Coloquei no Form dois Edit's, um Botton para 
> processar a informação e um Memo, onde sairão os cálculos!!! 
>  
> Os Cálculos são estes:
>  
> Média de salários da populaçãoo, média de filhos, maior 
> salário e percentual de pessoas com salário até 100,00 reais. 
> Beleza!!!
>  
> Coloquei um while, e minha condição de saída é um salário 
> negativo. Mas não tô conseguindo prossessar o cálculo A 
> cada volta do loop, ele me trás o cálculo que o sistema 
> pede!!! O que tenho feito de errado
>  
> Mais uma pergunta: Se o usuário não digitar nada nos Edit's e 
> clicar direto no Button!! Dá o seguinte erro: 
> ---
> Debugger Exception Notification
> ---
> Project Project_Ex3.exe raised exception class EConvertError 
> with message ''' is not a valid floating point value'. 
> Process stopped. Use Step or Run to continue.
> ---
> OK   Help   
> ---
>  Como faço  para evitar isso???
>  
> E a respeito do cálculo, como faço? Segue o código. Agradeço 
> se houver alguem experiente no grupo que possa me dá¡ uma 
> luz, a final, ninguém nasce sabendo!!!
>  
> procedure TForm1.ProcessarClick(Sender: TObject);
> Var
> Salario, Maior_Salario, Soma_Salario, 
> Soma_Filhos,Media_Salario, Media_Filho, Salario_Inicial, 
> Percentual: Real;
> Filhos, Cont, Conta_Sal_100: Integer;
> begin
>  Salario:= StrtoFloat (Edit1.Text);
>  Filhos:= StrtoInt (Edit2.Text);
>  While Salario < 0 do
>  Soma_Salario:=0;
>  Soma_Filhos:=0;
>  Cont:=0;
>  Conta_Sal_100:=0;
>  Salario_Inicial:=Salario;
>  Maior_Salario:=0;
>   begin
>  Soma_Salario:=Soma_Salario + Salario;
>  Soma_Filhos:=Soma_Filhos + Filhos;
>   if Salario<= 100 then
>  Conta_Sal_100:=Conta_Sal_100 + 1;
>   if Salario >= Salario_Inicial then
>  Maior_Salario:= Salario;
>  Cont:=Cont + 1;
>   end;
>   Edit1.Clear;
>   Edit2.Clear;
>   Edit1.SetFocus;
>   Media_Salario:=Soma_Salario/Cont;
>   Media_Filho:=Soma_Filhos/Cont;
>   Percentual:=(Conta_Sal_100/Cont)/100;
>   Memo1.Lines.Add('A Média de Salário da População é de 
> R$ ' + Floattostr(Media_Salario) + #13);
>   Memo1.Lines.Add('A Média de Filhos da População é de  ' 
> + Floattostr(Media_Filho) + ' Filhos' + #13);
>   Memo1.Lines.Add('O Maior de Salário da População é de 
> R$ ' + Floattostr(Maior_Salario) + #13);
>   Memo1.Lines.Add('O Percentual de pessoas que ganham menos 
> de R$ 100,00 : ' + Floattostr(Percentual) + '%' +  #13);
>   end;
>  
> 
> Att.
> André Ferreira
> Brasilsaúde Cia de Seguros
> 
> 
> 
> [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-m

RES: [delphi-br] Delphi 6 e Fiebird 1.5

[Artur Rodrigo Guerra]

Salve Mario !
Cara, eu tive uma vez algo parecido e importei de um arquivo txt uma base de
aproximadamente 100.000 registros.

Levou, realmente um tempo considerável, e tive alguns problemas como o seu.
Uma coisa que ferrava na importação, era que, alguns registros possuiam ou
algum caracter ilegal na colunação, ou estavam disposicionados.

Fiz um programa para corrigir tudo isso, só assim a importação veio na boa.

Dá uma olhada nisso ...

E bom Ano Novo !!!

Artur.

-Mensagem original-
De: Mario Scavoni [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 27 de janeiro de 2005 11:02
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Delphi 6 e Fiebird 1.5



Companheiros,
Tento importar um arquivo texto (TXT) para uma tabela do meu banco
contendo uma mala-direta (NOME, END, BAIRRO, etc) de aproximadamente
50.000 registros. Acontece que demora muiito para completar a operação.

Utilizo os componentes da guia Interbase. Firebird 1.5 embarcado. Delphi 6.

Alguma dica? ou estou querendo um milagre?

[]'s
Mario





[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] ENC: Alguém utiliza o TmsnPopUp ?

[Douglas - CPD]

Douglas - CPD
SISTEMAS - Torres
(   Ramal 225
*   [EMAIL PROTECTED]
*   [EMAIL PROTECTED]




  -Mensagem original-
  De: Douglas - CPD [mailto:[EMAIL PROTECTED]
  Enviada em: segunda-feira, 27 de dezembro de 2004 11:03
  Para: Delphi - grupos; Delphi-Br; [EMAIL PROTECTED] Com. Br;
Delphi-No-Brasil; Delphi-Total; Lista-Delphi
  Assunto: Alguém utiliza o TmsnPopUp ?








--

  Douglas - CPD
  SISTEMAS - Torres
  (   Ramal 225
  *   [EMAIL PROTECTED]
  *   [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

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

[luciano]

Valeu, André funcionou, muito obrigado.
- Original Message - 
From: "André Argeri" <[EMAIL PROTECTED]>
To: 
Sent: Monday, December 27, 2004 11:55 AM
Subject: Re: [delphi-br] String



criei essa função que retira todos os caracteres que não forem números,
barras e outros. o resultado da função retorna uma string

function tform1.F_Retira( str: String ): String;
var i: byte;
aux:string;
begin
aux:=str;
result:='';

for i:=0 to length(str) do
begin
if (aux[i] ='0')or(aux[i] ='1')or(aux[i] ='2')or(aux[i]
='3')or(aux[i] ='4')or(aux[i] ='5')or(aux[i] ='6')or(aux[i] ='7')or(aux[i]
='8')or(aux[i] ='9') then
result:=result + aux[i];
end;
end;

espero que te ajude

um abraço




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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] Problema com procedure

[A33 Tecnologia e Informática]

Tchê, não vou responder a tua pergunta, mas ta ai uma dica de como criar (se 
preciso) os forms de forma otimizada:

 if not assigned(frmCadCli) then
  frmCadCli := TfrmCadCli.Create(self);
 with frmCadCli do Begin
  Show;
  // Aqui vc pode colocar outras instruções
  // a serem executadas após a abertura do
  // form, tipo mudar a página de um PageControl
 end;

Você poderia implementar assim:

procedure TfrmPrincipal.criatela(TFormulario: TFormClass;
  Formulario: TForm);
begin

 if not assigned(Formulario) then
  Formulario := TFormulario.Create(self);
 with Formulario do begin
  Show;
  BringToFront;
 end;
end;

Fica ai a dica.

Abraço,

José Luis
  - Original Message - 
  From: Carlos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Sunday, December 26, 2004 7:16 PM
  Subject: [delphi-br] Problema com procedure


  Ola, pessoal.
  Minha situação é a seguinte: Para criar uma tela uso o seguinte:
  /procedure TfrmPrincipal.Funcionrios1Click(Sender: TObject);
  var
found, i: Integer;
  begin
found:= -1;
for i:=0 to Screen.FormCount -1 do
if Screen.Forms[i] is TfrmCadFuncionarios then
found:= i;
if found >= 0 then
Screen.Forms[found].Show
else
begin
frmCadFuncionarios:= TfrmCadFuncionarios.Create(Self);
frmCadFuncionarios.Show;
end;
  /Se a tela está aberta, coloco o foco nela, senão crio e abro.
  Criei a procedure abaixo para automatizar o processo:
  /procedure TfrmPrincipal.criatela(TFormulario: TFormClass;
Formulario: TForm);
  var
found, i: Integer;
  begin
found:= -1;
for i:=0 to Screen.FormCount -1 do
if Screen.Forms[i] is TFormulario then
found:= i;
if found >= 0 then
Screen.Forms[found].Show
else
begin
Formulario:= TFormulario.Create(Self);
Formulario.Show;
end;
  end;/
  Agora chamo desta maneira:
  /criatela(TfrmCadFuncionarios, frmCadFuncionarios);
  /Só que está acontecendo algo estranho: tenho um dm com os componentes 
  sqldataset, datasetprovider e clientdataset. Quando vou criar um novo 
  registro, dexei no frmcadfuncionários um currencyedit que deve ser 0 
  (zero):
  /procedure TDMATC.cds_cadfuncNewRecord(DataSet: TDataSet);
  begin
  frmcadfuncionarios.CurrencyEdit1.Value:= 0;/
  Só que ele retorna dizendo que houve acces violation. To verificando e 
  ele diz que/
  //frmcadfuncionarios.CurrencyEdit1.Value:= 0; 
  (//frmcadfuncionarios.CurrencyEdit1 inacessible value)./
  O que pode estar errado? Declarei a criatela na seção public do form 
  principal que chama as outras telas e os form criados são mdichild.

--

  No virus found in this outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.298 / Virus Database: 265.6.5 - Release Date: 26/12/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: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

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



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



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >

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

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

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

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

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