Re: [delphi-br] Firebird - Ajuda Messenger

2005-03-18 Por tôpico Rogério Fernando Neves

boa tarde cristiano,
 
nao só respondo como te convido para estudar junto comigo, via e-mail e ou 
messenger, para melhor aproveitamento.
 
qual seu msn? eu tenho um contato la que o cara é especialista em firebird. vc 
vai aproveitar.
falow


Cristiano Rodrigo Gomes <[EMAIL PROTECTED]> wrote:

Olá pessoal acabei de baixar o firebird, escolhi a versão super server.

Preciso de alma solidária que se disponha a me ajudar a criar um pequeno 
cadastro de bancos, com código e nome do banco, só isso, sabendo fazer isso 
depois eu me viro com os outros cadastros.

Já tenho esse cadastro criado, porém utilizando o paradox ou "piradox" como 
já me disseram, não sei se dá para aproveitar.

Essa ajuda poderia ser pelo messenger...

Posso estar escrevendo isso inutilmente, mas estou pelo menos tentando

No aguardo de uma pessoa que esteja disposta a ajudar um iniciante em delphi 
e firebird...

Cristiano.

Obs. Vou enviar esta mensagem até conseguir alguém que se disponha a me 
ajudar... pois coloque na cabeça que vou passar meus programas para 
delphi..

_
MSN Messenger: converse com os seus amigos online. 
http://messenger.msn.com.br



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

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

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

Links do Yahoo! Grupos









__
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

 





RES: [delphi-br] RES: RES: FWD: Developers slam Microsoft's Visual Basic plan

2005-03-18 Por tôpico News byKohl

Hehe, não me esquecerei de te indicar, se for o caso, mas também tenho
soluções Delphi/Win32. Só que nossas solução não executarão nos exemplos que
o Walter citou, como 486, Windows 3.11, etc. Veja: a pequena locadora de
filmes do meu bairro residencial tem um Pentium 500 MHz com 256 RAM (roda
.Net tranquilo); a farmácia da esquina (também pequena), tem um Athlon 1.7
com 512 RAM (também roda tranqüilo). E olha que eles estão longe do meu
perfil de cliente.

Ou seja, se até os pequeninos da esquina tem máquinas no mínimo descentes,
um cliente que me apresente um parque do tipo que o Walter citou não passa
da primeira visita (se houver a primeira), pois não tenho soluções para
isto. Aí eu indico amigos meus que ainda trabalham com Clipper, Cobol,
etc...

-Mensagem original-
De: Josir [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 18 de março de 2005 12:06
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] RES: RES: FWD: Developers slam Microsoft's Visual Basic
plan


Olá Walter e Luis. Acho que fica claro aqui com o comentário do Luis que 
existem vários tipos de clientes, cada um com a sua especificidade. São 
realidades distintas: As empresas que decidiram não investir + em 
Hardware e tentam trabalhar com o parque que eles tem e as que seguem as 
especificações da consultoria sem se preocupar com o custo do hardware. 
Entretanto, estas empresas se preocupam com o custo total do projeto: 
hardware, licenças e consultoria. Vc há de convir, Luis, que o custo 
total é computado e a partir deste valor se calcula o ROI (Return of 
Investment). Se o ROI é positivo, o projeto é iniciado caso contrário 
abortado. Assim, pode ter casos que o ROI de um projeto .Net negativo 
dependendo do número de usuários. E se for um projeto Client/Server 
Win32, o ROI será positivo e o projeto será feito.

Até mesmo nos EUA, existe essa preocupação pelo que foi visto na artigo que
enviei originalmente. Existe um mercado de SMB (Small and Medium Businesses)
que não veem retorno na compra de novas máquinas. Não é questão do cliente
ser tacanho ou sovina. Ele pode estar cheio do dinheiro mas pode ter certeza
que ele vai fazer o ROI meu amigo!!!

É óbvio que tem casos (como eu vi essa semana na Marinha) em que os 
caras não querem saber, eles fazem em .Net porque é moda, ou porque 
algum gerente está ganhando bola, ou porque os desenvolvedores querem 
aprimorar seu currículo às custas da Viúva. Não são eles que pagam, é o 
contribuinte... Agora mesmo que o ROI seja positivo para ambos os casos, 
imagine um projeto .Net onde seja necessário comprar 10 máquinas (a 
R$2.500,00 cada uma já contando a licença do XP). Se vc for adicionar o 
TCO (Total Cost of Ownership) para instalar os outros softwares que o 
usuário costuma utilizar dá um total em média de R$3.000,00. Agora 
lembre que estes R$30.000 poderiam estar indo para o bolso da sua 
empresa ao invés de ser utilizado na compra de Hardware e Licenças. Eu 
já ganhei duas concorrências, uma competindo com .Net e outra com Java 
devido a isso: a solução dos caras era mais cara pois precisava de um 
tremendo servidor Web enquanto a minha aproveitava o processamento das 
estações em um bom e velho estilo Client/Server. Para finalizar: se vc 
tiver que clientes que não queiram fazer upgrade de máquina Luiz, passe 
para mim que eu tenho ótimas soluções em Delphi/Win32 para eles e para 
mim ;) Bom fim de semana a todos! Josir  Estimadamente, 75 a 80% do 
parque tecnológico do mercado, não compoe de maquinas ultima geração ou, 
no mínimo, os Pentium III da vida. Muita empresa por aí ainda tá 
(pasmem!) de 486 ou Pentium MMX (Não é dificil você achar lugar com isto 
não). E é aí que a porca torce o rabo! Em muitos destes lugares, não 
consta em seus cronogramas e planilhas de custos, atualizações de 
máquinas e de redes. Muita gente ainda trabalha com DOS, muito lugar aí 
ainda tá no Windows 3.11 e, alguns mais avançados, se arriscaram no 
Windows 95... Ora, quem quer desenvolver uma plataforma inovadora, tem 
que pensar nisto também. Tem que fazer uma coisa que tenha viabilidade 
mínima pra rodar em maquinas já ultrapassadas e em redes precárias. Faz 
parte. Você tem que jogar é o jogo do mercado e fazer seu produto 
interagir com as limitações e as demandas dele e não tentar impor o seu 
produto enfiando goéla abaixo das empresas o ônus da migração. Não é 
assim que a banda toca! Uma das grandes virtudes do Linux, é ele rodar 
até em 386 sem demosntrar que ele tá sentindo a limitação da maquina.

>> -Mensagem original-
>> De: Informática [mailto:[EMAIL PROTECTED]
>> Enviada em: quinta-feira, 17 de março de 2005 13:57
>> Para: delphi-br@yahoogrupos.com.br
>> Assunto: Re: RES: [delphi-br] FWD: Developers slam Microsoft's Visual
>> Basic plan
>> 
>> 
>> 
>> 
>> Tambem ja baixei ese programinha e não resolveu meu problema.
>>  
>> []'s
>>  
>> Edinho
>> 
>> News byKohl <[EMAIL PROTECTED]> wrote:
>> 
>> Grande Walter, sou suspeito de falar pois como você sabe, so

Re: [delphi-br] Intraweb vs Apache

2005-03-18 Por tôpico Rondinelle Lima Bispo

meu apache é Win32, nao estou usando o linux




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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Intraweb vs Apache

2005-03-18 Por tôpico Giovani - Terra

Dá um chmod 777 na pasta onde fica o arquivo...
  - Original Message - 
  From: Rondinelle Lima Bispo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 18, 2005 6:29 PM
  Subject: Re: [delphi-br] Intraweb vs Apache


  eu uso o Apache
  eu ja gerei .so coloquei na pasta modules, mas ta dando esse erro



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

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

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



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


--
  Links do Yahoo! Grupos

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




--


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

  --

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


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



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

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

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

<*> 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] Intraweb vs Apache

2005-03-18 Por tôpico Rondinelle Lima Bispo

eu uso o Apache
eu ja gerei .so coloquei na pasta modules, mas ta dando esse erro



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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Intraweb vs Apache

2005-03-18 Por tôpico CPD \(Borborema-Imperial Transportes Ltda\)

Eu não entendi, seu servidor www é Apache ou i iis ?, porque se for Apache
vc tem que gerar um .so e carregar ele como modulo, quem trabalha com .dll é
o iis o Apache é .so

Alexandre C Souza

- Original Message - 
From: "Rondinelle Lima Bispo" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 5:35 PM
Subject: Re: [delphi-br] Intraweb vs Apache


>
> ele retorna o segunte erro
> quando tento entrar na minha aplicacao da o erro segunte, o q eu faço?
> http://localhost/isapi/lista.dll
>
> Forbidden
> You don't have permission to access /isapi/lista.dll on this server.
>
>
> --
--
> 
>
> Apache/2.0.53 (Win32) Server at localhost Port 80
>
>
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.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.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005
>
>



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005



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

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

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

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

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

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

 





RES: [delphi-br] Intraweb vs Apache

2005-03-18 Por tôpico Otávio Barreto

Ai que esta o problema vc não pode rodar uma dll no apache vc tem que
converte pra dso e configurar o Apache para executar o modulo
automaticamente.

Sem mais,

=
Otávio Barreto de Melo
Programador
Tel: +55 21 3159-2381
Cel: +55 21 8879-5021
MSN: [EMAIL PROTECTED]
ICQ: 33276
Skype: otavioscool
=


-Mensagem original-
De: Rondinelle Lima Bispo [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 18 de março de 2005 17:36
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Intraweb vs Apache



ele retorna o segunte erro
quando tento entrar na minha aplicacao da o erro segunte, o q eu faço?
http://localhost/isapi/lista.dll

Forbidden
You don't have permission to access /isapi/lista.dll on this server.






Apache/2.0.53 (Win32) Server at localhost Port 80




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

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.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: Off: Aquisição FR

2005-03-18 Por tôpico DVJ


--- DVJ <[EMAIL PROTECTED]> wrote:
> Ola a todos
> 
> Po, to tentando comprar o Fast report mas não to recebendo as informações em 
> tempo
> hábil das duas empresas que comercializam no Brasil(uma semana pra 
> responderem 3
> emails). 
> Alguém já comprou esse componente? E como foi a aquisição?
> 
> Grato
> Dirceu
> 
> __
> Converse com seus amigos em tempo real com o Yahoo! Messenger 
> http://br.download.yahoo.com/messenger/ 
> 

__
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] Crystal no Delphi 2005 só para .NET?

2005-03-18 Por tôpico DVJ

Sim.

--- Alessandro Fernandes <[EMAIL PROTECTED]> wrote:
> 
> Pessoal, confirmem isso por favor.
>  
> O Crystal que vem com o Delphi 2005 é só para projetos .NET?
>  
> Obrigado.
>  
> _
> Alessandro Cunha Fernandes 
> SoftTI - Software e Consultoria e TI. 
> [EMAIL PROTECTED] 
> Fone/Fax: +55 24 2458-4538 
> 
>  
> 
> 
> [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
> 
> 
> 
> 
>  
> 
> 
> 
> 

__
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

 





[delphi-br] Off: Aquisição Fast reports

2005-03-18 Por tôpico DVJ

Ola a todos

Po, to tentando comprar o Fast report mas não to recebendo as informações em 
tempo
hábil das duas empresas que comercializam no Brasil(uma semana pra responderem 3
emails). 
Alguém já comprou esse componente? E como foi a aquisição?

Grato
Dirceu

__
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

 





RES: [delphi-br] Intraweb vs Apache

2005-03-18 Por tôpico Walter Alves Chagas Junior

Olha no IIS, as permissões da pasta. Tem que ser executar scripts e leitura

 
 
 []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: Rondinelle Lima Bispo [mailto:[EMAIL PROTECTED]
> Enviada em: sexta-feira, 18 de março de 2005 17:36
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Intraweb vs Apache
> 
> 
> 
> ele retorna o segunte erro
> quando tento entrar na minha aplicacao da o erro segunte, o q eu faço?
> http://localhost/isapi/lista.dll
> 
> Forbidden
> You don't have permission to access /isapi/lista.dll on this server.
> 
> 
> --
> --
> 
> 
> Apache/2.0.53 (Win32) Server at localhost Port 80
> 
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.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] Intraweb vs Apache

2005-03-18 Por tôpico Rondinelle Lima Bispo

ele retorna o segunte erro
quando tento entrar na minha aplicacao da o erro segunte, o q eu faço?
http://localhost/isapi/lista.dll

Forbidden
You don't have permission to access /isapi/lista.dll on this server.





Apache/2.0.53 (Win32) Server at localhost Port 80




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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Crystal no Delphi 2005 só para .NET?

2005-03-18 Por tôpico Alessandro Fernandes

Pessoal, confirmem isso por favor.
 
O Crystal que vem com o Delphi 2005 é só para projetos .NET?
 
Obrigado.
 
_
Alessandro Cunha Fernandes 
SoftTI - Software e Consultoria e TI. 
[EMAIL PROTECTED] 
Fone/Fax: +55 24 2458-4538 

 


[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] Encriptador / Decriptador

2005-03-18 Por tôpico Claudio H.Binaghi

Bom Tarde!

Segue um código simples:

Você deve ao gravar encriptar o conteúdo do campo, com uma função simples de
criptografia, exemplo:
(esta função Encripta e Desencripta dependendo do valor da Boolean Codifica)

function Tansforma(sTexto:String; bCodifica: Boolean; iChave:
Integer):String;
var I: Integer;
sTextoEncriptado:  String;
Begin
  sTextoEncriptado := '';
  if bCodifica then
for I := 1 to Length(sTexto) do
  sTextoEncriptado := Char(Ord(sTexto[I])+iChave) + sTextoEncriptado
  else
for I := 1 to Length(sTexto) do
  sTextoEncriptado:=Char(Ord(sTexto[I])- iChave )+sTextoEncriptado;
  Result := sTextoEncriptado;
end;

Dever ser usada assim:

Valor_encriptado:= Tansforma(Texto,True,66);
Valor_desencriptado:= Tansforma(Texto,False,66);

Depois você grava normalmente no seu banco;

Qualquer necessidade fale.

Boa sorte.

Claudio H.Binaghi
[EMAIL PROTECTED]
Fone: (011) 3289.3525 / 3289.0075


- Original Message - 
From: "Mauro Pena" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 4:52 PM
Subject: [delphi-br] Encriptador / Decriptador



Alguem tem alguma boa rotina de encriptar e decriptar pra me enviar??


Obrigado.



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

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

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

Links do Yahoo! Grupos











-- 
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005



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

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

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

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

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

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

 





[delphi-br] Encriptador / Decriptador

2005-03-18 Por tôpico Mauro Pena

Alguem tem alguma boa rotina de encriptar e decriptar pra me enviar??


Obrigado.



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

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

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

<*> 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] DOT NET

2005-03-18 Por tôpico jose.eduardo

Pessoal, alguém poderia me mandar qualquer material sobre dot net, ou me 
informar um site onde eu possa estar recolhendo algum material.
GRato.



[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] Mostrar em primeiro plano um formulário

2005-03-18 Por tôpico Cristina Orthmann

  Pessoal,

Preciso saber como faço com que um formulário apareça em 
primeiro plano, na frente de qualquer software que esteja aberto, este 
formulário irá aparecer quando o usuário passar um cartão de código de 
barras em um leitor, então o software detecta a passagem e mostra o 
formulário com os dados da pessoa que passou o cartão.

Tentei usar "SetForegroundWindow(findwindow(nil,'Cartao'));" mas 
ele somente mostra o cartão em primeiro plano se o meu aplicativo 
estiver com a janela aberta.


-- 

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



[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] Firebird - Ajuda Messenger

2005-03-18 Por tôpico Cristiano Rodrigo Gomes

Então Romario, como faço para ver aquele exemplo que vc mensionou fb_brasil, 
eu primeiro crio o banco de dados e depois abro aquele arquivo brasil.spl., 
é isso?

Cristiano

>From: "Romario (Listas)" <[EMAIL PROTECTED]>
>To: Cristiano Rodrigo Gomes <[EMAIL PROTECTED]>
>Subject: Re: [delphi-br] Firebird - Ajuda Messenger
>Date: Fri, 18 Mar 2005 15:42:34 -0300
>
>Só será preciso criar os índices para campos que não são chave primária. Os 
>demais você cria manualmente clicando na aba INDICE.
>
>Eu prefiro montar um script de criação das tabelas (com criação de chaves 
>primárias, estrangeiras, índices e triggers) e rodar através do IBExpert 
>(como explico no passo à passo que te enviei).
>
>P.S.: Procure fazer as perguntas na lista. Dessa forma, não só eu poderei 
>estar ajudando como outros também poderão estar aprendendo.
>
>Sds,
>
>Romario
>
>
>
>
>Cristiano Rodrigo Gomes escreveu:
>>E os índices, é necessário criá-los normalmente?
>>
>>Se for como eu faço?
>>
>>Cristiano
>>
>>Vc tem msn?
>>se puder adicioná-lo
>

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



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

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

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

<*> 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]SOLUCAO: Copiar Chart para Image

2005-03-18 Por tôpico Leandro

Já consegui.

fiz o seguinte:

  image1.height := chart1.height;
  image1.width  := chart1.width;

image1.Canvas.CopyRect(Image1.ClientRect,chart1.DelphiCanvas,chart1.GetRecta
ngle);

obrigado,

Leandro

- Original Message - 
From: "Leandro" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 3:08 PM
Subject: [delphi-br] Copiar Chart para Image


>
> Pessoal,
>
> Como faço para copiar um grafico que está
> sendo mostrado no TChart para um TImage?
>
> Obrigado,
>
> Leandro
>
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.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] Mostrar em primeiro plano um formulário

2005-03-18 Por tôpico Cristina Orthmann

Pessoal,

Preciso saber como faço com que um formulário apareça em 
primeiro plano, na frente de qualquer software que esteja aberto, este 
formulário irá aparecer quando o usuário passar um cartão de código de 
barras em um leitor, então o software detecta a passagem e mostra o 
formulário com os dados da pessoa que passou o cartão.

Tentei usar "SetForegroundWindow(findwindow(nil,'Cartao'));" mas 
ele somente mostra o cartão em primeiro plano se o meu aplicativo 
estiver com a janela aberta.


-- 

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



[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] Formulario Demora Abrir

2005-03-18 Por tôpico giuvany

 

 

Boa Tarde a todos

 

Estou com problemas com os Formulários que possuem Quick_report,

 

Seguinte,

 

Uso Delphi 7 Banco De Dados ORACLE 9

 

Quando vou para abrir os Formulário que Possuem o Quick report Isto Demora a
Abrir ,

 

E acho que são eles que estão fazendo minha aplicação  demorar a abrir
quando chamado apartir do .Exe que está no servidor Linux!

 

Tenho meu Datamodule e já coloquei todas as Query que ligam a este
formulário como active =false;

 

Alguém sabe me dá uma informação a respeito disto?

 

Como faço para minha aplicação voar?

 

 

 

Desde já Agradeço a todos

 

 

 

 

 



[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] Formulario Quick Demora Abrir

2005-03-18 Por tôpico giuvany

Boa Tarde a todos

Estou com problemas com os Formulários que possuem Quick_report,

Seguinte,

Uso Delphi 7 Banco De Dados ORACLE 9

Quando vou para abrir os Formulário que Possuem o Quick report Isto Demora a
Abrir ,

E acho que são eles que estão fazendo minha aplicação  demorar a abrir
quando chamado apartir do .Exe que está no servidor Linux!

Tenho meu Datamodule e já coloquei todas as Query que ligam a este
formulário como active =false;

Alguém sabe me dá uma informação a respeito disto?

Como faço para minha aplicação voar?

 

Desde já Agradeço a todos

 

 



[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] Firebird - Ajuda Messenger

2005-03-18 Por tôpico Cristiano Rodrigo Gomes

E os índices, é necessário criá-los normalmente?

Se for como eu faço?

Cristiano

Vc tem msn?
se puder adicioná-lo

>From: "Romario (Listas)" <[EMAIL PROTECTED]>
>To: Cristiano Rodrigo Gomes <[EMAIL PROTECTED]>
>Subject: Re: [delphi-br] Firebird - Ajuda Messenger
>Date: Fri, 18 Mar 2005 15:26:14 -0300
>
>Basta clicar com o botão direito em cima de "Tables" (do lado esquerdo) e 
>escolher a opção New Table. A partir daí, é só entrar com o nome, o tipo e 
>o tamanho dos campos.
>
>Sds,
>
>Romario
>
>
>
>Cristiano Rodrigo Gomes escreveu:
>>Então Romario consegui fazer quase tudo isso, agora só falta eu criar a 
>>tabela, não entendi direito a respeiro do script, é a forma mais fácil de 
>>criar a tabela ou posso criar da forma padrão, e como fazer para criar?
>>
>>Se puder me ajudar
>>
>>Cristiano.
>

_
MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



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

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

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

<*> 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 por exclusão.

2005-03-18 Por tôpico Romario (Listas)

Eu faria assim:

+--+   +--+   +--+
|  Associado   |   | Recebimento  |   | Anuidade |
+--+   +--+   +--+
| Codigo   |-->| Cd Associado |<--| Codigo   |
| Matricula|   | Cd Anuidade  |   | Ano  |
| Nome |   +--+   | Valor|
| AnoFiliacao  |  +--+
+--+


Select A.Matricula, A.Nome
   From Associados A Left Outer Join Recebimento R
on (A.Codigo = R.Codigo)
  Where A.AnoFiliacao >= :AnoInformado
  Group By A.Matricula, A.Nome
  Order By A.Matricula, A.Nome


P.S.: Confere aí porque fiz correndo e não testei.

Sds,

Romario



velhavirgem escreveu:
> 
> Prezados, Boa Tarde,
> 
> Estou tentando fazer uma SQL por exclusão e não estou conseguindo, vou
> explicar a seguir, caso alguém tenha alguma sugestão a mesma será

> muito bem vinda.
> 
> Os campos marcados com -> são os campos da tabela.
> 
> Tenho 3 tabelas:
> "associados.db"->[matricula, nome, ano_filiacao]
> "recebimentos.db"->[matricula, nome, valor, ano, quitado]
> "valor.db"->[ano, valor].
> 
> A tabela "associados.db" tem os nomes dos sócios que precisam efetuar
> pagamentos e o ano de filiacao (ano_filiacao é usado para saber à
> partir de qual ano o associado começou a ter que pagar a anuidade.
> Ex.: ano_filiacao = '2003'; o associado precisa pagar 2003, 2004 e
> 2005 os valores obtidos da tabela "valor.db").
> 
> A tabela "recebimentos.db" possui a matricula do associado que está
> devendo(quitado = 'N') ou que já pagou(quitado = 'S').
> 
> A tabela "valor" só tem o ano e o valor a ser cobrado no ano.
> 
> O que eu preciso fazer é o seguinte: selecionar todos os associados
> que NÃO efetuaram o pagamento; ou seja os associados que tem na tabela
> "recebimentos" o campo (quitado = 'N') ou que não existam na tabela
> "recebimentos". O sql descobriria que o associado não está na tabela
> "recebimentos" e pegaria o valor vindo da tabela "valor.db" se o
> associado existir na tabela de recebimento pega o valor vindo da
> tabela "recebimento", agrupando por ANO em ambos os casos.
> 
> A tabela "recebimentos" não possui os débitos de todos os associados,
> possui apenas alguns débitos referentes ao parcelamento do valor total
> e débitos já pagos.
> 
> Já pensei em gerar débitos para todos os associados, mas isso geraria
> um lixo muito grande na tabela já que somente uns 60% dos sócios
> (aproximadamente 15.000) efetuam os pagamentos corretamente e os
> valores a serem cobrados começam no ano de 1995.
> 
> Atualmente estou usando uma tabela temporária que demora cerca de 10
> minutos para gerar todos os dados.
> 
> Como ficaria uma sql que faria esta busca!? Estou completamente sem idéia.
> 
> Atenciosamente,
>  Rodrigo de Aquino
>  aquinos.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] Copiar Chart para Image

2005-03-18 Por tôpico Leandro

Pessoal,

Como faço para copiar um grafico que está
sendo mostrado no TChart para um TImage?

Obrigado,

Leandro



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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Urgente

2005-03-18 Por tôpico Info Desenvolvimento

Pessoal. Tenho na minha máquina o Delphi 5, mas fiz um upgrade para o Delphi 7 
só que começou a gerar alguns erros e desinstalei os dois e reinstalei somente 
o Delphi 5. Agora o que está acontecendo é que em vez de estar o ícone do 
delphi 5 nas minhas aplicações está o ícone do delphi 7. Já passei limpador de 
registro (RegClean) além do mais esse programa apaga todos os registros antigos.
Deletei todas as pastas que o delphi cria.
O que devo fazer novamente?

PAULO



[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] Mensagens Traduzidas do D7.

2005-03-18 Por tôpico Rodrigo de Moura

Pessoal,

Como alterar as mensagens do D7 pelo Translation Tools Options no menu Tools?
Ou essa tradução é somente com a substituição dos arquivos Consts e DbConsts da 
vida?
Muito obrigado.

Atenciosamente,

Rodrigo de Moura
[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

 





[delphi-br] Delphi+MySql

2005-03-18 Por tôpico Renato


Prezados Companaheiros,

Estou usando a versão 4.1.8 do mysql com d7+bde,
E minha dúvida é a seguinte:
A partir de que versão e mysql suporta transaçãoe como faço para 
executá-la no mysql.

Grato 

Renato Fonseca






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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Dbexpress PostgreSQL

2005-03-18 Por tôpico Emerson - CPD

exite algum driver free para acessar o PostgreSQL,
via dbexpress ?



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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] SQL por exclusão.

2005-03-18 Por tôpico velhavirgem


Prezados, Boa Tarde,

Estou tentando fazer uma SQL por exclusão e não estou conseguindo, vou
explicar a seguir, caso alguém tenha alguma sugestão a mesma será
muito bem vinda.

Os campos marcados com -> são os campos da tabela.

Tenho 3 tabelas:
"associados.db"->[matricula, nome, ano_filiacao]
"recebimentos.db"->[matricula, nome, valor, ano, quitado]
"valor.db"->[ano, valor].

A tabela "associados.db" tem os nomes dos sócios que precisam efetuar
pagamentos e o ano de filiacao (ano_filiacao é usado para saber à
partir de qual ano o associado começou a ter que pagar a anuidade.
Ex.: ano_filiacao = '2003'; o associado precisa pagar 2003, 2004 e
2005 os valores obtidos da tabela "valor.db").

A tabela "recebimentos.db" possui a matricula do associado que está
devendo(quitado = 'N') ou que já pagou(quitado = 'S').

A tabela "valor" só tem o ano e o valor a ser cobrado no ano.

O que eu preciso fazer é o seguinte: selecionar todos os associados
que NÃO efetuaram o pagamento; ou seja os associados que tem na tabela
"recebimentos" o campo (quitado = 'N') ou que não existam na tabela
"recebimentos". O sql descobriria que o associado não está na tabela
"recebimentos" e pegaria o valor vindo da tabela "valor.db" se o
associado existir na tabela de recebimento pega o valor vindo da
tabela "recebimento", agrupando por ANO em ambos os casos.

A tabela "recebimentos" não possui os débitos de todos os associados,
possui apenas alguns débitos referentes ao parcelamento do valor total
e débitos já pagos.

Já pensei em gerar débitos para todos os associados, mas isso geraria
um lixo muito grande na tabela já que somente uns 60% dos sócios
(aproximadamente 15.000) efetuam os pagamentos corretamente e os
valores a serem cobrados começam no ano de 1995.

Atualmente estou usando uma tabela temporária que demora cerca de 10
minutos para gerar todos os dados.

Como ficaria uma sql que faria esta busca!? Estou completamente sem idéia.

Atenciosamente,
 Rodrigo de Aquino
 aquinos.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

 





Re: [delphi-br] Dúvida

2005-03-18 Por tôpico Misako Kadowaki

É só vc acrescentar "DateUtils" (sem as aspas) na cláusula uses.

Info Desenvolvimento wrote:

>Pessoal, estou usando delphi 5 e quer usar essa função, erro
>
>function IDADEATUAL(BirthDate: TDateTime; ReferenceDate: TDateTime = 0): 
>Integer;
>begin
>  if ReferenceDate = 0 then
>Result := Trunc(YearSpan(Date, 
> DataModulo.IRMA.FieldByName('DTNASC').AsDateTime))
>  else
>Result := Trunc(YearSpan(ReferenceDate, 
> DataModulo.IRMA.FieldByName('DTNASC').AsDateTime));
>end;
>
>ERRO: [Error] URel_FxEtaria.pas(141): Undeclared identifier: 'YearSpan'
>
>
>
>
>
>[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] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico plucaslazaro

Meu amigo, estive em situacao semelhante, eu fiz assim, veja se serve pra vc.

Se melhorar alguma coisa me envie tambem.

Estou comecando agora trabalhar com Delphi.


Paulo



{}
{   I M P R E S S O R AA  R  G  O  XR  A  B  B  I  T
 }
{}
   A_CreatePrn(1, 'ppla.txt'); // Inicia Operacao da Impressora
   A_Set_Darkness(12); // Seta funcao de Intensidade da impressao

  Form_Aguarde.Show;
  Form_Aguarde.Refresh;

  Table2.First;

   While not Table2.EOF do
begin
  if Table2Nome.Value <> '' then
begin
  PrecoVenda:='';
  PrecoAtacado:='';
  CodigoBarras:='';

  Barras:=Table2Codigo.Value;
  BarrasMenor:=Table2Codigo.Value;
  while Length(Barras) < 13 do Barras:='0'+Barras;
  CodigoBarras:=Barras;

  PrecoVenda:=FormatFloat('###,##0.00',Table2Venda.Value);
  PrecoAtacado:=FormatFloat('###,##0.00',Table2Atacado.Value);
  QtdEtiq:=Table2Qtdade.Value;

  if (Table2ImpAtacado.Value = 'X') and (Table2ImpVenda.Value = 
'X') then
begin
  A_Prn_Text(5, 80, 1, 9, 4, 1, 1, 'n', 2, 
pchar(Copy(Table2Nome.Value,1,40)));  //  nome do produto
  A_Prn_Text(118, 45, 1, 3, 5, 2, 1, 'n', 2, pchar('ATACADO 
R$'));
  A_Prn_Text(273, 45, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoAtacado,1,6)));  //  Preco Atacado
  A_Prn_Text(118, 15, 1, 3, 5, 2, 1, 'n', 2, pchar('VAREJO  
R$'));
  A_Prn_Text(273, 15, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoVenda,1,6)));  //  Preco Varejo

  if Length(BarrasMenor) < 10 then
begin
   :=BarrasMenor;
   A_Prn_Barcode(1,10,1,'A',2,3,30,'C',0,Pchar());
//  Imprime Codigo Barras
end
  else
 begin
   :=Copy(CodigoBarras,1,Length(CodigoBarras)-1);
   A_Prn_Barcode(1,10,1,'F',2,1,20,'n',0,Pchar());
//  Imprime Codigo Barras
 end;
end
  else
 begin
   A_Prn_Text(5, 80, 1, 9, 4, 1, 1, 'n', 2, 
pchar(Copy(Table2Nome.Value,1,40)));  //  nome do produto
   A_Prn_Text(130, 30, 1, 3, 5, 2, 1, 'n', 2, pchar('R$'));
   A_Prn_Text(175, 30, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoVenda,1,6)));  //  Preco Varejo

   if Length(BarrasMenor) < 10 then
  begin
:=BarrasMenor;
A_Prn_Barcode(1,15,1,'A',2,3,30,'C',0,Pchar());
//  Imprime Codigo Barras
  end
   else
  begin
:=Copy(CodigoBarras,1,Length(CodigoBarras)-1);
A_Prn_Barcode(1,15,1,'F',2,1,20,'n',0,Pchar());
//  Imprime Codigo Barras
  end;
 end;

 A_Print_Out(1, 1, QtdEtiq, 1);   //  Qtade de etiquetas

 Table2.Next;
end
  else
 Table2.Next;
 end;


 Form_Aguarde.Close;
 A_ClosePrn;

 end;



[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] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico plucaslazaro

Meu amigo, estive em situacao semelhante, eu fiz assim, veja se serve pra vc.

Se melhorar alguma coisa me envie tambem.

Estou comecando agora trabalhar com Delphi.


Paulo



{}
{   I M P R E S S O R AA  R  G  O  XR  A  B  B  I  T
 }
{}
   A_CreatePrn(1, 'ppla.txt'); // Inicia Operacao da Impressora
   A_Set_Darkness(12); // Seta funcao de Intensidade da impressao

  Form_Aguarde.Show;
  Form_Aguarde.Refresh;

  Table2.First;

   While not Table2.EOF do
begin
  if Table2Nome.Value <> '' then
begin
  PrecoVenda:='';
  PrecoAtacado:='';
  CodigoBarras:='';

  Barras:=Table2Codigo.Value;
  BarrasMenor:=Table2Codigo.Value;
  while Length(Barras) < 13 do Barras:='0'+Barras;
  CodigoBarras:=Barras;

  PrecoVenda:=FormatFloat('###,##0.00',Table2Venda.Value);
  PrecoAtacado:=FormatFloat('###,##0.00',Table2Atacado.Value);
  QtdEtiq:=Table2Qtdade.Value;

  if (Table2ImpAtacado.Value = 'X') and (Table2ImpVenda.Value = 
'X') then
begin
  A_Prn_Text(5, 80, 1, 9, 4, 1, 1, 'n', 2, 
pchar(Copy(Table2Nome.Value,1,40)));  //  nome do produto
  A_Prn_Text(118, 45, 1, 3, 5, 2, 1, 'n', 2, pchar('ATACADO 
R$'));
  A_Prn_Text(273, 45, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoAtacado,1,6)));  //  Preco Atacado
  A_Prn_Text(118, 15, 1, 3, 5, 2, 1, 'n', 2, pchar('VAREJO  
R$'));
  A_Prn_Text(273, 15, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoVenda,1,6)));  //  Preco Varejo

  if Length(BarrasMenor) < 10 then
begin
   :=BarrasMenor;
   A_Prn_Barcode(1,10,1,'A',2,3,30,'C',0,Pchar());
//  Imprime Codigo Barras
end
  else
 begin
   :=Copy(CodigoBarras,1,Length(CodigoBarras)-1);
   A_Prn_Barcode(1,10,1,'F',2,1,20,'n',0,Pchar());
//  Imprime Codigo Barras
 end;
end
  else
 begin
   A_Prn_Text(5, 80, 1, 9, 4, 1, 1, 'n', 2, 
pchar(Copy(Table2Nome.Value,1,40)));  //  nome do produto
   A_Prn_Text(130, 30, 1, 3, 5, 2, 1, 'n', 2, pchar('R$'));
   A_Prn_Text(175, 30, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoVenda,1,6)));  //  Preco Varejo

   if Length(BarrasMenor) < 10 then
  begin
:=BarrasMenor;
A_Prn_Barcode(1,15,1,'A',2,3,30,'C',0,Pchar());
//  Imprime Codigo Barras
  end
   else
  begin
:=Copy(CodigoBarras,1,Length(CodigoBarras)-1);
A_Prn_Barcode(1,15,1,'F',2,1,20,'n',0,Pchar());
//  Imprime Codigo Barras
  end;
 end;

 A_Print_Out(1, 1, QtdEtiq, 1);   //  Qtade de etiquetas

 Table2.Next;
end
  else
 Table2.Next;
 end;


 Form_Aguarde.Close;
 A_ClosePrn;

 end;

  - Original Message - 
  From: jmourajr2000 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 18, 2005 11:56 AM
  Subject: Re: RES: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA



  Caros amigos, bom dia!

  Quero antes de tudo, agradecer imensamente a ajuda e preoucupação que
  me foi dispensada, pelo apaga fogo que surgiu. 
  Estou finalizando o aplicativo com as sugestões que vocês me passaram
  e acredito que em pouco tempo estará finalizado e informarei, com
  certeza, o sucesso desta pequena e urgente impreitada.

  Espero um dia poder retribuir a essa preciosa ajuda.

  Um grande abraço a todos e Muito OBRIGADO.

  José de Moura Reis Jr.










  --- Em delphi-br@yahoogrupos.com.br, "Rildecy de Queiroz Borba"
  <[EMAIL PROTECTED]> escreveu
  > Amigo este código abaixo é o que uso para gerar a etiqueta, veja se
  ele pode
  > lhe ajudar.
  > // inicio
  > 
  > AssignFile(lst,'LPT1');
  > Rewrite(lst) ;
  > LcLinha := Chr(2) + 'qA';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'c';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'KI503';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'O0220';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'f220';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'KW0797';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2)

Re: RES: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico plucaslazaro

Meu amigo, estive em situacao semelhante, eu fiz assim, veja se serve pra vc.

Se melhorar alguma coisa me envie tambem.

Estou comecando agora trabalhar com Delphi.


Paulo



{}
{   I M P R E S S O R AA  R  G  O  XR  A  B  B  I  T
 }
{}
   A_CreatePrn(1, 'ppla.txt'); // Inicia Operacao da Impressora
   A_Set_Darkness(12); // Seta funcao de Intensidade da impressao

  Form_Aguarde.Show;
  Form_Aguarde.Refresh;

  Table2.First;

   While not Table2.EOF do
begin
  if Table2Nome.Value <> '' then
begin
  PrecoVenda:='';
  PrecoAtacado:='';
  CodigoBarras:='';

  Barras:=Table2Codigo.Value;
  BarrasMenor:=Table2Codigo.Value;
  while Length(Barras) < 13 do Barras:='0'+Barras;
  CodigoBarras:=Barras;

  PrecoVenda:=FormatFloat('###,##0.00',Table2Venda.Value);
  PrecoAtacado:=FormatFloat('###,##0.00',Table2Atacado.Value);
  QtdEtiq:=Table2Qtdade.Value;

  if (Table2ImpAtacado.Value = 'X') and (Table2ImpVenda.Value = 
'X') then
begin
  A_Prn_Text(5, 80, 1, 9, 4, 1, 1, 'n', 2, 
pchar(Copy(Table2Nome.Value,1,40)));  //  nome do produto
  A_Prn_Text(118, 45, 1, 3, 5, 2, 1, 'n', 2, pchar('ATACADO 
R$'));
  A_Prn_Text(273, 45, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoAtacado,1,6)));  //  Preco Atacado
  A_Prn_Text(118, 15, 1, 3, 5, 2, 1, 'n', 2, pchar('VAREJO  
R$'));
  A_Prn_Text(273, 15, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoVenda,1,6)));  //  Preco Varejo

  if Length(BarrasMenor) < 10 then
begin
   :=BarrasMenor;
   A_Prn_Barcode(1,10,1,'A',2,3,30,'C',0,Pchar());
//  Imprime Codigo Barras
end
  else
 begin
   :=Copy(CodigoBarras,1,Length(CodigoBarras)-1);
   A_Prn_Barcode(1,10,1,'F',2,1,20,'n',0,Pchar());
//  Imprime Codigo Barras
 end;
end
  else
 begin
   A_Prn_Text(5, 80, 1, 9, 4, 1, 1, 'n', 2, 
pchar(Copy(Table2Nome.Value,1,40)));  //  nome do produto
   A_Prn_Text(130, 30, 1, 3, 5, 2, 1, 'n', 2, pchar('R$'));
   A_Prn_Text(175, 30, 1, 4, 5, 2, 1, 'n', 2, 
pchar(Copy(PrecoVenda,1,6)));  //  Preco Varejo

   if Length(BarrasMenor) < 10 then
  begin
:=BarrasMenor;
A_Prn_Barcode(1,15,1,'A',2,3,30,'C',0,Pchar());
//  Imprime Codigo Barras
  end
   else
  begin
:=Copy(CodigoBarras,1,Length(CodigoBarras)-1);
A_Prn_Barcode(1,15,1,'F',2,1,20,'n',0,Pchar());
//  Imprime Codigo Barras
  end;
 end;

 A_Print_Out(1, 1, QtdEtiq, 1);   //  Qtade de etiquetas

 Table2.Next;
end
  else
 Table2.Next;
 end;


 Form_Aguarde.Close;
 A_ClosePrn;

 end;

  - Original Message - 
  From: jmourajr2000 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 18, 2005 11:56 AM
  Subject: Re: RES: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA



  Caros amigos, bom dia!

  Quero antes de tudo, agradecer imensamente a ajuda e preoucupação que
  me foi dispensada, pelo apaga fogo que surgiu. 
  Estou finalizando o aplicativo com as sugestões que vocês me passaram
  e acredito que em pouco tempo estará finalizado e informarei, com
  certeza, o sucesso desta pequena e urgente impreitada.

  Espero um dia poder retribuir a essa preciosa ajuda.

  Um grande abraço a todos e Muito OBRIGADO.

  José de Moura Reis Jr.










  --- Em delphi-br@yahoogrupos.com.br, "Rildecy de Queiroz Borba"
  <[EMAIL PROTECTED]> escreveu
  > Amigo este código abaixo é o que uso para gerar a etiqueta, veja se
  ele pode
  > lhe ajudar.
  > // inicio
  > 
  > AssignFile(lst,'LPT1');
  > Rewrite(lst) ;
  > LcLinha := Chr(2) + 'qA';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'c';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'KI503';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'O0220';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'f220';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2) + 'KW0797';
  > WriteLn(lst, lcLinha );
  > LcLinha := Chr(2)

Re: [delphi-br] Calculo com Horas

2005-03-18 Por tôpico Adriano Montagna

Valeu.

- Original Message - 
From: "Andre - Yahoo" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 12:04 PM
Subject: Re: [delphi-br] Calculo com Horas



converta as horas para float e faça a divisão...
TimetoFloat(12:00:00) / timetofloat(00:30:00) = 2

 André Luis da Silveira

  Desenvolvedor

  Latícinios Morrinhos Ind Com Ltda


  - Original Message - 
  From: Adriano Montagna
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, March 18, 2005 11:50 AM
  Subject: Re: [delphi-br] Calculo com Horas


  Sim, uma hora / 2 é igual a 30 minutos.

  Mas, o que preciso saber é quantas UNIDADES de TEMPO tem
  ou seja 01:00:00 / 00:30:00 = 2



  - Original Message - 
  From: "jrjuniore" <[EMAIL PROTECTED]>
  To: 
  Sent: Friday, March 18, 2005 11:39 AM
  Subject: RES: [delphi-br] Calculo com Horas



  Mas uma horas / 2  não é igual a trinta minutos ??

  No entanto, para vc fazer calculo com horas vc deverá transformá-las em
  horas centesimais e depois voltá-las a horas decimais !!

  -Mensagem original-
  De: Adriano Montagna [mailto:[EMAIL PROTECTED]
  Enviada em: sexta-feira, 18 de março de 2005 11:33
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Calculo com Horas


  PessoALL


  Preciso fazer um calculo assim:

  Hora inicial - Hora Final / intervalo

  Bem, eu faço a subtração e ok. se a hora inicial é 5 e a final é 6 tenho 1
  hora dai vou dividir 1 h pelo intervalo que é de 30 minutos o resultado
  deveria ser 2 mas, retorna Zero.
  O que faço?

  Obrigado.


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



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

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

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

  Links do Yahoo! Grupos











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

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.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:







--
  Links do Yahoo! Grupos

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

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

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



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



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

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

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

Links do Yahoo! Grupos











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

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

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

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

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

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

 





[delphi-br] Duvida em Excel

2005-03-18 Por tôpico Adalberto Sousa Monteiro

Boa tarde a todos,
Estou com o seguinte problema e gostaria de saber se alguem poderia me ajudar.

Tenho essa planilha em excel (em anexo) e tenho que desenvolver um sistema de 
vendas, vou faze-lo em delphi, porem preciso alimentar essa planilha.

O problema é o seguinte, dentro das planilhas, existem algumas 'abas', preciso 
conseguir localizar do meu sistema os produtos e a aba certa na planilha.

No sistema tera todo um cadastro desses produtos, sera gerado pedido e tudo 
mais, mas tem que alimentar tambem essa planilha.

Exemplo:
Pedido do sistema

ProdutoTabela Descontro
4300420% + 10%
4319320% + 5%
4321220% + 15%
4326620% + 15%

Precisaria alimentar na planilha as abas "PEDIDO" e "TCB,MOTIONS" esses 
produtos, e alimentar suas respectivas colunas como quantidade, tabela de 
desconto, valor.
Como posso conseguir localizar o produto dentro de uma planilha ? Com N linhas 
e N Colunas ?


[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] Calculo com Horas

2005-03-18 Por tôpico Rodrigo Villaverde

Transforme tudo para minutos.
Com a Hora total e a Hora base unidade tempo é só dividir hora atual por
hora base. O resultado é a quantidade de unidades de tempo

60 / 30 = 2


-Original Message-
From: Adriano Montagna [mailto:[EMAIL PROTECTED] 
Sent: sexta-feira, 18 de março de 2005 11:51
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Calculo com Horas


Sim, uma hora / 2 é igual a 30 minutos.

Mas, o que preciso saber é quantas UNIDADES de TEMPO tem
ou seja 01:00:00 / 00:30:00 = 2



- Original Message - 
From: "jrjuniore" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 11:39 AM
Subject: RES: [delphi-br] Calculo com Horas



Mas uma horas / 2  não é igual a trinta minutos ??

No entanto, para vc fazer calculo com horas vc deverá transformá-las em
horas centesimais e depois voltá-las a horas decimais !!

-Mensagem original-
De: Adriano Montagna [mailto:[EMAIL PROTECTED]
Enviada em: sexta-feira, 18 de março de 2005 11:33
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Calculo com Horas


PessoALL


Preciso fazer um calculo assim:

Hora inicial - Hora Final / intervalo

Bem, eu faço a subtração e ok. se a hora inicial é 5 e a final é 6 tenho
1
hora dai vou dividir 1 h pelo intervalo que é de 30 minutos o resultado
deveria ser 2 mas, retorna Zero.
O que faço?

Obrigado.


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



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

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

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

Links do Yahoo! Grupos











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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Calculo com Horas

2005-03-18 Por tôpico Andre - Yahoo

converta as horas para float e faça a divisão...
TimetoFloat(12:00:00) / timetofloat(00:30:00) = 2

 André Luis da Silveira

  Desenvolvedor

  Latícinios Morrinhos Ind Com Ltda
 

  - Original Message - 
  From: Adriano Montagna 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 18, 2005 11:50 AM
  Subject: Re: [delphi-br] Calculo com Horas


  Sim, uma hora / 2 é igual a 30 minutos.

  Mas, o que preciso saber é quantas UNIDADES de TEMPO tem
  ou seja 01:00:00 / 00:30:00 = 2



  - Original Message - 
  From: "jrjuniore" <[EMAIL PROTECTED]>
  To: 
  Sent: Friday, March 18, 2005 11:39 AM
  Subject: RES: [delphi-br] Calculo com Horas



  Mas uma horas / 2  não é igual a trinta minutos ??

  No entanto, para vc fazer calculo com horas vc deverá transformá-las em
  horas centesimais e depois voltá-las a horas decimais !!

  -Mensagem original-
  De: Adriano Montagna [mailto:[EMAIL PROTECTED]
  Enviada em: sexta-feira, 18 de março de 2005 11:33
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Calculo com Horas


  PessoALL


  Preciso fazer um calculo assim:

  Hora inicial - Hora Final / intervalo

  Bem, eu faço a subtração e ok. se a hora inicial é 5 e a final é 6 tenho 1
  hora dai vou dividir 1 h pelo intervalo que é de 30 minutos o resultado
  deveria ser 2 mas, retorna Zero.
  O que faço?

  Obrigado.


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



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

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

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

  Links do Yahoo! Grupos











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

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.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: 
 
 
  
 
   


--
  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] RES: RES: FWD: Developers slam Microsoft's Visual Basic plan

2005-03-18 Por tôpico Josir

Olá Walter e Luis. Acho que fica claro aqui com o comentário do Luis que 
existem vários tipos de clientes, cada um com a sua especificidade. São 
realidades distintas: As empresas que decidiram não investir + em 
Hardware e tentam trabalhar com o parque que eles tem e as que seguem as 
especificações da consultoria sem se preocupar com o custo do hardware. 
Entretanto, estas empresas se preocupam com o custo total do projeto: 
hardware, licenças e consultoria. Vc há de convir, Luis, que o custo 
total é computado e a partir deste valor se calcula o ROI (Return of 
Investment). Se o ROI é positivo, o projeto é iniciado caso contrário 
abortado. Assim, pode ter casos que o ROI de um projeto .Net negativo 
dependendo do número de usuários. E se for um projeto Client/Server 
Win32, o ROI será positivo e o projeto será feito.

Até mesmo nos EUA, existe essa preocupação pelo que foi visto na artigo que 
enviei originalmente. Existe um mercado de SMB (Small and Medium Businesses) 
que não veem retorno na compra de novas máquinas. Não é questão do cliente ser 
tacanho ou sovina. Ele pode estar cheio do dinheiro mas pode ter certeza que 
ele vai fazer o ROI meu amigo!!!

É óbvio que tem casos (como eu vi essa semana na Marinha) em que os 
caras não querem saber, eles fazem em .Net porque é moda, ou porque 
algum gerente está ganhando bola, ou porque os desenvolvedores querem 
aprimorar seu currículo às custas da Viúva. Não são eles que pagam, é o 
contribuinte... Agora mesmo que o ROI seja positivo para ambos os casos, 
imagine um projeto .Net onde seja necessário comprar 10 máquinas (a 
R$2.500,00 cada uma já contando a licença do XP). Se vc for adicionar o 
TCO (Total Cost of Ownership) para instalar os outros softwares que o 
usuário costuma utilizar dá um total em média de R$3.000,00. Agora 
lembre que estes R$30.000 poderiam estar indo para o bolso da sua 
empresa ao invés de ser utilizado na compra de Hardware e Licenças. Eu 
já ganhei duas concorrências, uma competindo com .Net e outra com Java 
devido a isso: a solução dos caras era mais cara pois precisava de um 
tremendo servidor Web enquanto a minha aproveitava o processamento das 
estações em um bom e velho estilo Client/Server. Para finalizar: se vc 
tiver que clientes que não queiram fazer upgrade de máquina Luiz, passe 
para mim que eu tenho ótimas soluções em Delphi/Win32 para eles e para 
mim ;) Bom fim de semana a todos! Josir  Estimadamente, 75 a 80% do 
parque tecnológico do mercado, não compoe de maquinas ultima geração ou, 
no mínimo, os Pentium III da vida. Muita empresa por aí ainda tá 
(pasmem!) de 486 ou Pentium MMX (Não é dificil você achar lugar com isto 
não). E é aí que a porca torce o rabo! Em muitos destes lugares, não 
consta em seus cronogramas e planilhas de custos, atualizações de 
máquinas e de redes. Muita gente ainda trabalha com DOS, muito lugar aí 
ainda tá no Windows 3.11 e, alguns mais avançados, se arriscaram no 
Windows 95... Ora, quem quer desenvolver uma plataforma inovadora, tem 
que pensar nisto também. Tem que fazer uma coisa que tenha viabilidade 
mínima pra rodar em maquinas já ultrapassadas e em redes precárias. Faz 
parte. Você tem que jogar é o jogo do mercado e fazer seu produto 
interagir com as limitações e as demandas dele e não tentar impor o seu 
produto enfiando goéla abaixo das empresas o ônus da migração. Não é 
assim que a banda toca! Uma das grandes virtudes do Linux, é ele rodar 
até em 386 sem demosntrar que ele tá sentindo a limitação da maquina.

>> -Mensagem original-
>> De: Informática [mailto:[EMAIL PROTECTED]
>> Enviada em: quinta-feira, 17 de março de 2005 13:57
>> Para: delphi-br@yahoogrupos.com.br
>> Assunto: Re: RES: [delphi-br] FWD: Developers slam Microsoft's Visual
>> Basic plan
>> 
>> 
>> 
>> 
>> Tambem ja baixei ese programinha e não resolveu meu problema.
>>  
>> []'s
>>  
>> Edinho
>> 
>> News byKohl <[EMAIL PROTECTED]> wrote:
>> 
>> Grande Walter, sou suspeito de falar pois como você sabe, sou fã de
>> carteirinha da .Net e desprezo o Java (por experiência 
>> própria). O .Net
>> Framework SDK (a plataforma de desenvolvimento), não é pesada 
>> (muito mais leve que Java), certas IDE's que a utilizam é que são. 
>> Exemplo: o Visual Studio .Net 2003 é muito mais leve que o Delphi 2005. 
>> Já o .Net
>> Framework Redistributable (o "runtime" da .Net) não é nada 
>> pesado e roda tranquilo, inclusive em Windows 98. Agora, é claro que 
>> estamos falando de máquinas com um mínimo de descência, se for pra rodar em 
>> Pentium 100 ou algo assim (que ainda tem muito por aí), realmente não vai 
>> rolar... 
>> 
>> Mas aí, pelo menos no meu caso, eu especifico as 
>> configurações mínimas de
>> equipamento em que o sistema deve rodar, se o cliente não 
>> aceitar, problema
>> dele. E se ele quiser implantar assim mesmo e depois encher o 
>> saco porque
>> está lerdo, é simples: dispenso o cliente (os deste tipo é 
>> melhor deixar pra
>> concorrência).
>


[As partes dest

Re: RES: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico jmourajr2000


Caros amigos, bom dia!

Quero antes de tudo, agradecer imensamente a ajuda e preoucupação que
me foi dispensada, pelo apaga fogo que surgiu. 
Estou finalizando o aplicativo com as sugestões que vocês me passaram
e acredito que em pouco tempo estará finalizado e informarei, com
certeza, o sucesso desta pequena e urgente impreitada.

Espero um dia poder retribuir a essa preciosa ajuda.

Um grande abraço a todos e Muito OBRIGADO.

José de Moura Reis Jr.










--- Em delphi-br@yahoogrupos.com.br, "Rildecy de Queiroz Borba"
<[EMAIL PROTECTED]> escreveu
> Amigo este código abaixo é o que uso para gerar a etiqueta, veja se
ele pode
> lhe ajudar.
> // inicio
> 
> AssignFile(lst,'LPT1');
> Rewrite(lst) ;
> LcLinha := Chr(2) + 'qA';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'c';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'KI503';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'O0220';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'f220';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'KW0797';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'KI7' + chr(2);
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'V0';
> WriteLn(lst, lcLinha );
> LcLinha := Chr(2) + 'L';
> WriteLn(lst, lcLinha );
> LcLinha := 'H12';
> WriteLn(lst, lcLinha );
> LcLinha := 'PC';
> WriteLn(lst, lcLinha );
> LcLinha := 'A2';
> WriteLn(lst, lcLinha );
> LcLinha := 'D11';
> WriteLn(lst, lcLinha );
> LcLinha := '14112240111' + Trim( EdtNomeProduto.Text );
// nome
> do produto
> WriteLn(lst, lcLinha );
> LcLinha := '42110770038' + Trim( EdtLinha01.Text ); //
1º linha
> lateral com o nome "supermercado"
> WriteLn(lst, lcLinha );
> LcLinha := '42110960068' + Trim( EdtLinha02.Text );// 2º
linha
> lateral com o nome "PREÇO BAIXO" aqui eu coloco o nome do supermercao
> WriteLn(lst, lcLinha );
> LcLinha := '16110740090R$ ' + Trim( EdtPreco.Text ); //
já ta
> dizendo preco da mercadoria;
> WriteLn(lst, lcLinha );
> LcLinha := '12111470599COD.: ' + Trim(
EdtCodInterno.Text ); //
> codigo interno da mercadoria
> WriteLn(lst, lcLinha );
> LcLinha := '1F3303300710572' + Trim( EdtEan13.Text ); codigo
ean13
> WriteLn(lst, lcLinha );
> LcLinha := Chr(94) + '01';
> WriteLn(lst, lcLinha );
> LcLinha := 'Q0001';
> WriteLn(lst, lcLinha );
> LcLinha := 'E';
> WriteLn(lst, lcLinha );
> closefile(lst) ; 
> // fim
> 
> -Mensagem original-
> De: ArbSis [mailto:[EMAIL PROTECTED] 
> Enviada em: sexta-feira, 18 de março de 2005 09:04
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA
> 
> 
> No cd  que vem junto com a argox tem um exemplo em delphi e varios
exemplos
> em ppla no modo texto mesmo, ai vc ve qual vc acha melhor, o exemplo em
> delphi faz uso de dll
> 
> jmourajr2000 escreveu:
> 
> >
> > Caros amigos, boa noite!
> >
> > Surgiu-me inesperadamente uma solicitação de desenvolvimento de um 
> > aplicativo para a impressão de codigo de barras.
> > O cliente comprou uma impressora Argox Rabbit 214 e me pede em
carater 
> > emergencial(para amanhã a tarde 18/03) o tal aplicativo para
impressão 
> > dos codigos.
> > Como nunca desenvolvi nada para Argox pois sei que, após algumas 
> > pesquisas, a mesma utiliza uma linguagem PPLA(algo como comandos em 
> > MS-DOS pelo que entendi), não faço ideia por onde começar.
> > O cliente me trará a impressora ainda hoje(22:00hs) , para que eu 
> > possa fazer tal rotina e testar, pois ele a utilizará no final de 
> > semana e deverá fazer sua entrega de produtos com os devidos codigos 
> > na proxima segunda e terça-feira.
> > Perguntas:
> > 1) Disponho de um componente chamado NS-Barras será que ele pode me 
> > auxiliar para tal? (impressão gerenciada pelo Windows + Quickreport)
> > 2) Como programo em PPLA em Delphi?
> > 3) Ou é melhor sair correndo? :)
> > 4) Esta impressora suporta comandos desenvolvidos em 32bits?
> >
> > Quem puder me dar uma luz eu ficarei imensamente grato.
> >
> > Utilizo Delphi3 + Paradox
> >
> > Grato pela atenção de todos.
> >
> > Abraços.
> >
> > José de Moura
> >
> >
> >
> >
> >
> >
> >
> > --
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> > Para ver as mensagens antigas, acesse:
> > http://br.groups.yahoo.com/group/delphi-br/messages
> >
> > Para falar com o moderador, envie um e-mail para:
> > [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> >
> >
> >
> > *Yahoo! Grupos, um serviço oferecido por:* 
> >  > /D=brclubs/S=2137111264:HM/EXP=193545/A=2191897/R=0/SIG=10vqa2grn/
> > *http://br.diversao.yahoo.com/>
> >
> > 

Re: [delphi-br] Pesquisa Gerador Relatório

2005-03-18 Por tôpico Romario (Listas)

Você mesmo pode entrar na página do Yahoo (Grupo Delphi-br) e criar uma 
Enquete.

O link para a página de enquete é:

http://br.groups.yahoo.com/group/delphi-br/polls

Basta clicar no link "Criar Enquete" e iniciar a sua.

Sds,

Romario



Via Digital - Luciano H. Ribeiro escreveu:
> Olá
> 
> Para não "carregar" demais o conteúdo da lista com mensagens, gostaria de
> propor aos moderadores uma pesquisa:
> 
> "Qual o gerador de relatórios você usa em seus aplicativos?"
> 
> É que estou cheio do QuickReport, e estamos procurando avaliar outras
> alternativas, mesmo que pagas, como: Report Builder, Fast Report, etc.
> 
> Obrigado.
> 
> Luciano Hoffmaister Ribeiro



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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Dúvida

2005-03-18 Por tôpico Info Desenvolvimento

Pessoal, estou usando delphi 5 e quer usar essa função, erro

function IDADEATUAL(BirthDate: TDateTime; ReferenceDate: TDateTime = 0): 
Integer;
begin
  if ReferenceDate = 0 then
Result := Trunc(YearSpan(Date, 
DataModulo.IRMA.FieldByName('DTNASC').AsDateTime))
  else
Result := Trunc(YearSpan(ReferenceDate, 
DataModulo.IRMA.FieldByName('DTNASC').AsDateTime));
end;

ERRO: [Error] URel_FxEtaria.pas(141): Undeclared identifier: 'YearSpan'





[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] Calculo com Horas

2005-03-18 Por tôpico Adriano Montagna

Sim, uma hora / 2 é igual a 30 minutos.

Mas, o que preciso saber é quantas UNIDADES de TEMPO tem
ou seja 01:00:00 / 00:30:00 = 2



- Original Message - 
From: "jrjuniore" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 11:39 AM
Subject: RES: [delphi-br] Calculo com Horas



Mas uma horas / 2  não é igual a trinta minutos ??

No entanto, para vc fazer calculo com horas vc deverá transformá-las em
horas centesimais e depois voltá-las a horas decimais !!

-Mensagem original-
De: Adriano Montagna [mailto:[EMAIL PROTECTED]
Enviada em: sexta-feira, 18 de março de 2005 11:33
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Calculo com Horas


PessoALL


Preciso fazer um calculo assim:

Hora inicial - Hora Final / intervalo

Bem, eu faço a subtração e ok. se a hora inicial é 5 e a final é 6 tenho 1
hora dai vou dividir 1 h pelo intervalo que é de 30 minutos o resultado
deveria ser 2 mas, retorna Zero.
O que faço?

Obrigado.


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



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

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

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

Links do Yahoo! Grupos











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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Calculo com Horas

2005-03-18 Por tôpico jrjuniore

Mas uma horas / 2  não é igual a trinta minutos ??

No entanto, para vc fazer calculo com horas vc deverá transformá-las em
horas centesimais e depois voltá-las a horas decimais !! 

-Mensagem original-
De: Adriano Montagna [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 18 de março de 2005 11:33
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Calculo com Horas


PessoALL


Preciso fazer um calculo assim:

Hora inicial - Hora Final / intervalo

Bem, eu faço a subtração e ok. se a hora inicial é 5 e a final é 6 tenho 1
hora dai vou dividir 1 h pelo intervalo que é de 30 minutos o resultado
deveria ser 2 mas, retorna Zero. 
O que faço?

Obrigado.


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



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

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

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




 






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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Pesquisa Gerador Relatório

2005-03-18 Por tôpico Via Digital - Luciano H. Ribeiro

Olá

Para não "carregar" demais o conteúdo da lista com mensagens, gostaria de
propor aos moderadores uma pesquisa:

"Qual o gerador de relatórios você usa em seus aplicativos?"

É que estou cheio do QuickReport, e estamos procurando avaliar outras
alternativas, mesmo que pagas, como: Report Builder, Fast Report, etc.

Obrigado.






Via Digital Ltda. -  http://www.viadigital.inf.br
Luciano Hoffmaister Ribeiro
Software: desenvolvimento e suporte
[EMAIL PROTECTED]
Fone: (51) 542 4425


[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] Calculo com Horas

2005-03-18 Por tôpico Adriano Montagna

PessoALL


Preciso fazer um calculo assim:

Hora inicial - Hora Final / intervalo

Bem, eu faço a subtração e ok. se a hora inicial é 5 e a final é 6 tenho 1 hora
dai vou dividir 1 h pelo intervalo que é de 30 minutos
o resultado deveria ser 2
mas, retorna Zero. 
O que faço?

Obrigado.


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



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

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

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

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

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

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

 





Re: [delphi-br] Intraweb vs Apache

2005-03-18 Por tôpico CPD \(Borborema-Imperial Transportes Ltda\)

Qual o problema que está acontecendo, eu utilizo o Apache 1.3.33 e está
funcionando tudo bem.

Alexandre C Souza

- Original Message - 
From: "Rondinelle Lima Bispo" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 10:53 AM
Subject: [delphi-br] Intraweb vs Apache


>
> Saudaçoes amigos,
>
> fiz minha primeira aplicação em intraweb, os testes no IIS do
Rwindows..deu
> tudo certosó que agora tow pegando uma surra no apachenão consgi
> ainda por minha aplicaco pra rodar nelealguem ai pode me ajudar ?
>
>
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.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.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005
>
>



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005



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

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

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

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

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

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

 





[delphi-br] Intraweb vs Apache

2005-03-18 Por tôpico Rondinelle Lima Bispo

Saudaçoes amigos,

fiz minha primeira aplicação em intraweb, os testes no IIS do Rwindows..deu
tudo certosó que agora tow pegando uma surra no apachenão consgi
ainda por minha aplicaco pra rodar nelealguem ai pode me ajudar ?




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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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: Excel + Como faço pra ler um arquivo do excel?

2005-03-18 Por tôpico Gabriel Moricz


Pessoal..

Já resolvi, de qquer forma muito Obrigado..

Eu usei o ADOConnect, se alguem tbm tiver essa duvida mail-me...

Abraço a todos..


Obrigado..




-- Em delphi-br@yahoogrupos.com.br, "Gabriel Moricz" <[EMAIL PROTECTED]> 
escreveu
> 
> Ola..
> 
> Então galera, to precisando ler um arquivo excel, lendo os dados e 
> preenchendo tbm ao mmo tempo...
> 
> Alguem tem uma ideia de como posso fazer isso???
> 
> 
> Valew...
> 
> Gabriel Moricz





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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Problemas com SQL + DbLookupCombo

2005-03-18 Por tôpico Giovani - Terra

Bom..
Eu to com outro problema agora :/

Eu estou tendo que mostrar um dado em um Form cujos campos são derivados de uma 
tabela... Até aí tudo ok.
O problema é que tenho que colocar um DbLookupCombo para mostrar um dado que 
está em outra tabela, linkado com o código da primeira...
Como eu posso fazer isso? Quer dizer, na hora de gravar vou ter que gravar na 
segunda tabela, até aí ok, mas o foda é na hora de passar os registros, como eu 
faço pra mostrar o registro que está na segunda tabela em relação à primeira? 
Alguém entendeu? ahehehehh :)

Tipo.. no OnDataChange, eu posso fazer o que?
Já coloquei 2 queries, uma só pra gravar (RequestLive = True), e a outra só de 
pesquisa... Só que quando passo os registros, não me mostra o resultado :/

Alguém já teve alguma experiência nisso?

Agradecido

Giovani

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

2005-03-18 Por tôpico Gabriel Ferrarini

Desconsiderem essa mensagem. Já descobri qual era o problema. Era um 
propriedade que que criei com o mesmo nome da variável venda. Não sei porque o 
Delphi atribuiu o valor à uma e na hora de eu buscar, pegou de outra.

Flw.
  - Original Message - 
  From: Gabriel Ferrarini 
  To: Delphi-BR 
  Sent: Friday, March 18, 2005 9:44 AM
  Subject: [delphi-br] Classes


  Olá a todos.
  Estou com um problema em minhas classes e gostaria de saber o que pode estar 
acontecendo.

  Seguinte:

  Tenho a seguinte hierarquia.

  TSuperClasse = class
function NovoID: integer; virtual;
  end;

  TVendaBasica = class(TSuperClasse);

  TPreVenda = class(TVendaBasica);

  Antes, minha classe TPreVenda era herdade diretamente de TSuperClasse e a 
funlção NovoID retornava certinho o próximo número. Quando inseri TVendaBasica 
entre elas, a função ainda é executada mas o result não chega até o ponto onde 
quero que é mais ou menos assim:

  with PreVenda do
begin
  Venda := NovoID;
  Query.ParamByName('VENDA').AsInteger := Venda;
  .
  .
  .
  .
  Salvar;
end;

  O valor que chega até à variável Venda é 0. Já tentei na classe TVendaBasica 
colocar a função com override na declaração, herdando a anterior na 
implementação mas também não deu certo.

  Só para constar, meu códio do NovoID é:

  QueryPesq.SQL.Clear;
  QueryPesq.SQL.Add('select max(VENDA as NOVO_ID from PREVENDA');
  QueryPesq.Open;
  result := QueryPesq.FieldByName('NOVO_ID').AsInteger + 1;

  Quando a função passa aqui, o valor do result É o correto.

  O que pode ser?

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



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

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

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



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

   


--
  Links do Yahoo! Grupos

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



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



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

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

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
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] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico Rildecy de Queiroz Borba

Amigo este código abaixo é o que uso para gerar a etiqueta, veja se ele pode
lhe ajudar.
// inicio

AssignFile(lst,'LPT1');
Rewrite(lst) ;
LcLinha := Chr(2) + 'qA';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'c';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'KI503';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'O0220';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'f220';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'KW0797';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'KI7' + chr(2);
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'V0';
WriteLn(lst, lcLinha );
LcLinha := Chr(2) + 'L';
WriteLn(lst, lcLinha );
LcLinha := 'H12';
WriteLn(lst, lcLinha );
LcLinha := 'PC';
WriteLn(lst, lcLinha );
LcLinha := 'A2';
WriteLn(lst, lcLinha );
LcLinha := 'D11';
WriteLn(lst, lcLinha );
LcLinha := '14112240111' + Trim( EdtNomeProduto.Text ); // nome
do produto
WriteLn(lst, lcLinha );
LcLinha := '42110770038' + Trim( EdtLinha01.Text ); // 1º linha
lateral com o nome "supermercado"
WriteLn(lst, lcLinha );
LcLinha := '42110960068' + Trim( EdtLinha02.Text );// 2º linha
lateral com o nome "PREÇO BAIXO" aqui eu coloco o nome do supermercao
WriteLn(lst, lcLinha );
LcLinha := '16110740090R$ ' + Trim( EdtPreco.Text ); // já ta
dizendo preco da mercadoria;
WriteLn(lst, lcLinha );
LcLinha := '12111470599COD.: ' + Trim( EdtCodInterno.Text ); //
codigo interno da mercadoria
WriteLn(lst, lcLinha );
LcLinha := '1F3303300710572' + Trim( EdtEan13.Text ); codigo ean13
WriteLn(lst, lcLinha );
LcLinha := Chr(94) + '01';
WriteLn(lst, lcLinha );
LcLinha := 'Q0001';
WriteLn(lst, lcLinha );
LcLinha := 'E';
WriteLn(lst, lcLinha );
closefile(lst) ; 
// fim

-Mensagem original-
De: ArbSis [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 18 de março de 2005 09:04
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA


No cd  que vem junto com a argox tem um exemplo em delphi e varios exemplos
em ppla no modo texto mesmo, ai vc ve qual vc acha melhor, o exemplo em
delphi faz uso de dll

jmourajr2000 escreveu:

>
> Caros amigos, boa noite!
>
> Surgiu-me inesperadamente uma solicitação de desenvolvimento de um 
> aplicativo para a impressão de codigo de barras.
> O cliente comprou uma impressora Argox Rabbit 214 e me pede em carater 
> emergencial(para amanhã a tarde 18/03) o tal aplicativo para impressão 
> dos codigos.
> Como nunca desenvolvi nada para Argox pois sei que, após algumas 
> pesquisas, a mesma utiliza uma linguagem PPLA(algo como comandos em 
> MS-DOS pelo que entendi), não faço ideia por onde começar.
> O cliente me trará a impressora ainda hoje(22:00hs) , para que eu 
> possa fazer tal rotina e testar, pois ele a utilizará no final de 
> semana e deverá fazer sua entrega de produtos com os devidos codigos 
> na proxima segunda e terça-feira.
> Perguntas:
> 1) Disponho de um componente chamado NS-Barras será que ele pode me 
> auxiliar para tal? (impressão gerenciada pelo Windows + Quickreport)
> 2) Como programo em PPLA em Delphi?
> 3) Ou é melhor sair correndo? :)
> 4) Esta impressora suporta comandos desenvolvidos em 32bits?
>
> Quem puder me dar uma luz eu ficarei imensamente grato.
>
> Utilizo Delphi3 + Paradox
>
> Grato pela atenção de todos.
>
> Abraços.
>
> José de Moura
>
>
>
>
>
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
>
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
>
>
> *Yahoo! Grupos, um serviço oferecido por:* 
>  /D=brclubs/S=2137111264:HM/EXP=193545/A=2191897/R=0/SIG=10vqa2grn/
> *http://br.diversao.yahoo.com/>
>
>  /D=brclubs/S=2137111264:HM/EXP=193545/A=2191897/R=1/SIG=10vqa2grn/
> *http://br.diversao.yahoo.com/>
>   
>
>
> --
> --
> *Links do Yahoo! Grupos*
>
> * Para visitar o site do seu grupo na web, acesse:
>   http://br.groups.yahoo.com/group/delphi-br/
>
> * Para sair deste grupo, envie um e-mail para:
>   [EMAIL PROTECTED]
>   
> 
>
> * 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/gr

RES: RES: [delphi-br] FWD: Developers slam Microsoft's Visual Basic plan

2005-03-18 Por tôpico News byKohl

Eu sei perfeitamente disto tudo, Walter, o que você não entendeu (e que
deixei claro no post), é que eu defino a configuração mínima que meu sistema
necessita, tanto de hardware, software e de conhecimento do usuário final,
se o cliente não quiser (ou não puder) se atualizar, eu simplesmente deixo
ele pra concorrência ! Clientes deste tipo eu me recuso a ter, simplesmente
não quero ! E se me procurarem, eu recuso, como já fiz nem sei quantas
vezes.

Como dia a OI, Simples Assim :-)


Luiz Kohl
www.byKohl.com
MSN: [EMAIL PROTECTED]
Skype: byKohl
Celular: 27-8115-5692
Vitória - ES - Brazil
 

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED] 
Enviada em: sexta-feira, 18 de março de 2005 09:04
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: RES: [delphi-br] FWD: Developers slam Microsoft's Visual Basic
plan


Luiz, você tem que entender uma coisa:

Estimadamente, 75 a 80% do parque tecnológico do mercado, não compoe de
maquinas ultima geração ou, no mínimo, os Pentium III da vida. Muita empresa
por aí ainda tá (pasmem!) de 486 ou Pentium MMX (Não é dificil você achar
lugar com isto não). E é aí que a porca torce o rabo! Em muitos destes
lugares, não consta em seus cronogramas e planilhas de custos, atualizações
de máquinas e de redes. Muita gente ainda trabalha com DOS, muito lugar aí
ainda tá no Windows 3.11 e, alguns mais avançados, se arriscaram no Windows
95... 

Ora, quem quer desenvolver uma plataforma inovadora, tem que pensar nisto
também. Tem que fazer uma coisa que tenha viabilidade mínima pra rodar em
maquinas já ultrapassadas e em redes precárias. Faz parte. Você tem que
jogar é o jogo do mercado e fazer seu produto interagir com as limitações e
as demandas dele e não tentar impor o seu produto enfiando goéla abaixo das
empresas o ônus da migração. Não é assim que a banda toca! 

Uma das grandes virtudes do Linux, é ele rodar até em 386 sem demosntrar que
ele tá sentindo a limitação da maquina.

 
 
 []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: Informática [mailto:[EMAIL PROTECTED] Enviada em: 
> quinta-feira, 17 de março de 2005 13:57
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: RES: [delphi-br] FWD: Developers slam Microsoft's Visual 
> Basic plan
> 
> 
> 
> 
> Tambem ja baixei ese programinha e não resolveu meu problema.
>  
> []'s
>  
> Edinho
> 
> News byKohl <[EMAIL PROTECTED]> wrote:
> 
> Grande Walter, sou suspeito de falar pois como você sabe, sou fã de 
> carteirinha da .Net e desprezo o Java (por experiência própria). O 
> .Net Framework SDK (a plataforma de desenvolvimento), não é pesada 
> (muito mais leve que Java), certas IDE's que a utilizam é que são.
> Exemplo: o Visual
> Studio .Net 2003 é muito mais leve que o Delphi 2005. Já o .Net 
> Framework Redistributable (o "runtime" da .Net) não é nada pesado e 
> roda tranquilo, inclusive em Windows 98. Agora, é claro que estamos 
> falando de máquinas com um mínimo de descência, se for pra rodar em 
> Pentium 100 ou algo assim (que ainda tem muito por aí), realmente não 
> vai rolar...
> 
> Mas aí, pelo menos no meu caso, eu especifico as configurações mínimas 
> de equipamento em que o sistema deve rodar, se o cliente não aceitar, 
> problema dele. E se ele quiser implantar assim mesmo e depois encher o 
> saco porque está lerdo, é simples: dispenso o cliente (os deste tipo é 
> melhor deixar pra concorrência).
> 
> Luiz Kohl
> www.byKohl.com
> MSN: [EMAIL PROTECTED]
> Skype: byKohl
> Celular: 27-8115-5692
> Vitória - ES - Brazil
> 
> 
> -Mensagem original-
> De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED] 
> Enviada em: quinta-feira, 17 de março de 2005 09:39
> Para: 'delphi-br@yahoogrupos.com.br'
> Assunto: RES: [delphi-br] FWD: Developers slam Microsoft's Visual 
> Basic plan
> 
> 
> O que eu acho que este texto é totalmente fundamentado. O dotNET aínda 
> é uma plataforma nova, infelizmente pesada e que demanda máquinas mais 
> potentes.
> Isto é uma demanda em um contexto totalmente adverso, onde empresas 
> não estão dispostas a investir alto, trocar, da noite para o dia, 
> sistemas já consolidados e estáveis, maquinas e dar novos treinamentos 
> aos seus profissinoais do desenvolvimento. Ou seja, o dotNET começa a 
> encontrar um grande gargalo à sua evolução e disseminação, o que 
> obrigará a Microsoft a rever este projeto visando torná-lo mais leve, 
> mas compatível com as plataformas anteriores permitindo migrações 
> menos traumáticas e tudo mais.
> 
> É como eu sempre digo a respeito do novo framework da
> Microsoft: Ainda tem
> muita agua pra passar debaixo desta ponte. Faz-se, e fez-se muito auê 
> ainda em cima disto, os mais exaltados chegaram até a pregarem o fim 
> do Java e tudo mais. Cartolas de TI sairam por aí começando a oferecer 
> soluções em .NET sem sequer saber do que se tratava. Ma

[delphi-br] Ajustar tamanho no QuickRep

2005-03-18 Por tôpico Christian Balz

Ola Pessoal,

 

Em uma DetailBand tenho um QRMemo1 com a propriedade AutoStretch = True, e
dependendo do volume de informação que este campo receba, ele vai se ajustar
automaticamente fazendo com que a DetailBand receba valores de altura
(Height) diferentes. Necessito que antes de visualizar o relatório a
aplicação verifique qual é a maior altura de todos os registros impressos
(DetailBand) e então, pegue este valor e defina-o igualmente para todos os
registros, sendo assim, a minha DetailBand teria em todos as linhas a mesma
altura.

 

Alguém tem alguma sugestão de como posso fazer isso? Qual evento utilizar?

 

[]’s

Christian Balz



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

2005-03-18 Por tôpico Gabriel Ferrarini

Olá a todos.
Estou com um problema em minhas classes e gostaria de saber o que pode estar 
acontecendo.

Seguinte:

Tenho a seguinte hierarquia.

TSuperClasse = class
  function NovoID: integer; virtual;
end;

TVendaBasica = class(TSuperClasse);

TPreVenda = class(TVendaBasica);

Antes, minha classe TPreVenda era herdade diretamente de TSuperClasse e a 
funlção NovoID retornava certinho o próximo número. Quando inseri TVendaBasica 
entre elas, a função ainda é executada mas o result não chega até o ponto onde 
quero que é mais ou menos assim:

with PreVenda do
  begin
Venda := NovoID;
Query.ParamByName('VENDA').AsInteger := Venda;
.
.
.
.
Salvar;
  end;

O valor que chega até à variável Venda é 0. Já tentei na classe TVendaBasica 
colocar a função com override na declaração, herdando a anterior na 
implementação mas também não deu certo.

Só para constar, meu códio do NovoID é:

QueryPesq.SQL.Clear;
QueryPesq.SQL.Add('select max(VENDA as NOVO_ID from PREVENDA');
QueryPesq.Open;
result := QueryPesq.FieldByName('NOVO_ID').AsInteger + 1;

Quando a função passa aqui, o valor do result É o correto.

O que pode ser?

[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] Ajustar tamanho no QuickReport

2005-03-18 Por tôpico Christian Balz

Ola Pessoal,

 

Em uma DetailBand tenho um QRMemo1 com a propriedade AutoStretch = True, e
dependendo do volume de informação que este campo receba, ele vai se ajustar
automaticamente fazendo com que a DetailBand receba valores de altura
(Height) diferentes. Necessito que antes de visualizar o relatório a
aplicação verifique qual é a maior altura de todos os registros impressos
(DetailBand) e então, pegue este valor e defina-o igualmente para todos os
registros, sendo assim, a minha DetailBand teria em todos as linhas a mesma
altura.

 

Alguém tem alguma sugestão de como posso fazer isso? Qual evento utilizar?

 

[]’s

Christian Balz



[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] Problemas com SQL

2005-03-18 Por tôpico Giovani - Terra

Obrigado Cícero :)

Vou dar uma olhada agora mesmo :P

[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] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico ArbSis

No cd  que vem junto com a argox tem um exemplo em delphi e varios 
exemplos em ppla no modo texto mesmo, ai vc ve qual vc acha melhor, o 
exemplo em delphi faz uso de dll

jmourajr2000 escreveu:

>
> Caros amigos, boa noite!
>
> Surgiu-me inesperadamente uma solicitação de desenvolvimento de um
> aplicativo para a impressão de codigo de barras.
> O cliente comprou uma impressora Argox Rabbit 214 e me pede em
> carater emergencial(para amanhã a tarde 18/03) o tal aplicativo para
> impressão dos codigos.
> Como nunca desenvolvi nada para Argox pois sei que, após algumas
> pesquisas, a mesma utiliza uma linguagem PPLA(algo como comandos em
> MS-DOS pelo que entendi), não faço ideia por onde começar.
> O cliente me trará a impressora ainda hoje(22:00hs) , para que eu
> possa fazer tal rotina e testar, pois ele a utilizará no final de
> semana e deverá fazer sua entrega de produtos com os devidos codigos
> na proxima segunda e terça-feira.
> Perguntas:
> 1) Disponho de um componente chamado NS-Barras será que ele pode me
> auxiliar para tal? (impressão gerenciada pelo Windows + Quickreport)
> 2) Como programo em PPLA em Delphi?
> 3) Ou é melhor sair correndo? :)
> 4) Esta impressora suporta comandos desenvolvidos em 32bits?
>
> Quem puder me dar uma luz eu ficarei imensamente grato.
>
> Utilizo Delphi3 + Paradox
>
> Grato pela atenção de todos.
>
> Abraços.
>
> José de Moura
>
>
>
>
>
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
>
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
>
>
> *Yahoo! Grupos, um serviço oferecido por:*
> 
>  
>
> 
>  
>   
>
>
> 
> *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

 





RES: RES: [delphi-br] FWD: Developers slam Microsoft's Visual Bas ic plan

2005-03-18 Por tôpico Walter Alves Chagas Junior

Luiz, você tem que entender uma coisa:

Estimadamente, 75 a 80% do parque tecnológico do mercado, não compoe de
maquinas ultima geração ou, no mínimo, os Pentium III da vida. Muita empresa
por aí ainda tá (pasmem!) de 486 ou Pentium MMX (Não é dificil você achar
lugar com isto não). E é aí que a porca torce o rabo! Em muitos destes
lugares, não consta em seus cronogramas e planilhas de custos, atualizações
de máquinas e de redes. Muita gente ainda trabalha com DOS, muito lugar aí
ainda tá no Windows 3.11 e, alguns mais avançados, se arriscaram no Windows
95... 

Ora, quem quer desenvolver uma plataforma inovadora, tem que pensar nisto
também. Tem que fazer uma coisa que tenha viabilidade mínima pra rodar em
maquinas já ultrapassadas e em redes precárias. Faz parte. Você tem que
jogar é o jogo do mercado e fazer seu produto interagir com as limitações e
as demandas dele e não tentar impor o seu produto enfiando goéla abaixo das
empresas o ônus da migração. Não é assim que a banda toca! 

Uma das grandes virtudes do Linux, é ele rodar até em 386 sem demosntrar que
ele tá sentindo a limitação da maquina.

 
 
 []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: Informática [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 17 de março de 2005 13:57
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: RES: [delphi-br] FWD: Developers slam Microsoft's Visual
> Basic plan
> 
> 
> 
> 
> Tambem ja baixei ese programinha e não resolveu meu problema.
>  
> []'s
>  
> Edinho
> 
> News byKohl <[EMAIL PROTECTED]> wrote:
> 
> Grande Walter, sou suspeito de falar pois como você sabe, sou fã de
> carteirinha da .Net e desprezo o Java (por experiência 
> própria). O .Net
> Framework SDK (a plataforma de desenvolvimento), não é pesada 
> (muito mais
> leve que Java), certas IDE's que a utilizam é que são. 
> Exemplo: o Visual
> Studio .Net 2003 é muito mais leve que o Delphi 2005. Já o .Net
> Framework Redistributable (o "runtime" da .Net) não é nada 
> pesado e roda
> tranquilo, inclusive em Windows 98. Agora, é claro que 
> estamos falando de
> máquinas com um mínimo de descência, se for pra rodar em 
> Pentium 100 ou algo
> assim (que ainda tem muito por aí), realmente não vai rolar... 
> 
> Mas aí, pelo menos no meu caso, eu especifico as 
> configurações mínimas de
> equipamento em que o sistema deve rodar, se o cliente não 
> aceitar, problema
> dele. E se ele quiser implantar assim mesmo e depois encher o 
> saco porque
> está lerdo, é simples: dispenso o cliente (os deste tipo é 
> melhor deixar pra
> concorrência).
> 
> Luiz Kohl
> www.byKohl.com
> MSN: [EMAIL PROTECTED]
> Skype: byKohl
> Celular: 27-8115-5692
> Vitória - ES - Brazil
> 
> 
> -Mensagem original-
> De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED] 
> Enviada em: quinta-feira, 17 de março de 2005 09:39
> Para: 'delphi-br@yahoogrupos.com.br'
> Assunto: RES: [delphi-br] FWD: Developers slam Microsoft's 
> Visual Basic plan
> 
> 
> O que eu acho que este texto é totalmente fundamentado. O 
> dotNET aínda é uma
> plataforma nova, infelizmente pesada e que demanda máquinas 
> mais potentes.
> Isto é uma demanda em um contexto totalmente adverso, onde 
> empresas não
> estão dispostas a investir alto, trocar, da noite para o dia, 
> sistemas já
> consolidados e estáveis, maquinas e dar novos treinamentos aos seus
> profissinoais do desenvolvimento. Ou seja, o dotNET começa a 
> encontrar um
> grande gargalo à sua evolução e disseminação, o que obrigará 
> a Microsoft a
> rever este projeto visando torná-lo mais leve, mas compatível com as
> plataformas anteriores permitindo migrações menos traumáticas 
> e tudo mais.
> 
> É como eu sempre digo a respeito do novo framework da 
> Microsoft: Ainda tem
> muita agua pra passar debaixo desta ponte. Faz-se, e fez-se 
> muito auê ainda
> em cima disto, os mais exaltados chegaram até a pregarem o 
> fim do Java e
> tudo mais. Cartolas de TI sairam por aí começando a oferecer 
> soluções em
> .NET sem sequer saber do que se tratava. Mas o fato, é que 
> nos dias de hoje,
> a ficha caiu e todo mundo tá vendo que o dotNET ainda tem muito o que
> melhorar e evoluir para que ele caia na graça do mercado. Já 
> não tem mais
> ninguem saindo correndo por aí pra comprar máquinas possantes 
> pra rodar o
> Framework. Neguim comprando Visual Studio ou Delphi pirata 
> pra virar noite
> estudando e tentando aprender em um dia a programar em dotNET e no dia
> seguinte começar um árduo trabalho de migração de seus 
> projetos, já prontos
> e consolidados, para rodarem na nova plataforma.
> 
> Hoje percebeu-se que muito daquilo que se falava lá pelo anos 
> 2000, era
> muito mais máquina publicitária da Microsoft do que verdades..
> 
> 
> []s
> 
> Walter Alves Chagas Junior
> Projeto e desenvolvimento
> Telemont Engenharia de telecomunicações [EMAIL PROTECTED]

Re: Re: [delphi-br] Erro ReconcileError

2005-03-18 Por tôpico Bruno Lichot - Micrologos

Pessoal, o form de reconciliação de erro e somente para elucidar o
funcionamento de concorrencia no uso de ClientDataSet desconectados do
banco.
Em minhas aplicações funciona perfeitamente, pos o q faço e mapear a
exception de modificação de registro e aprsentar para o usuário o q esta no
banco e o q ele esta tentando alterar...e passo para a responsa dele decidir
o q fazer... é simples e funciona. Vc não precisa usar a tela de
reconciliação e acho ate q naum deveria.

Estou as ordens para o q for preciso.

[]´s
Bruno Lichot
Gerente de Novas Tecnologias - Micrologos
Equipe ClubeDelphi DevMedia

www.micrologos.com.br - www.clubedelphi.net -
www.delphirio.assespro-rj.org.br
- Original Message -
From: "Wenceslau Miranda" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 18, 2005 12:58 AM
Subject: Re: Re: [delphi-br] Erro ReconcileError



Olá Thiago,

Fiz o que você me recomendou e estou tendo o seguinte problema, vou lhe
contar o que fiz passo a passo e o que aconteceu, talvez você possa me
ajudar:

1 - Abri duas instâncias de meu programa
2 - Coloquei ambas em modo de alteração no mesmo registro
3 - Fiz alterações diferente no nome do cliente em cada instância
4 - Confirmei a primeira e tudo ocorreu bem
5 - Confirmei a 2ª e me foi aberto a tela de reconciliação de erro;
6 - Marquei a opção de correção no Form de reconciliação, ou
sejateoricamente deveria assumir esse valor no banoc de dados
7 - Não deu erro nenhum, mas ao atualizar o banco (cds.open / close),
somente a primeira atualização foi efetuada
8 - Fechei uma das instãncias (a primeira a dar o update) e tentei alterar
novamente (lembre que agora não existe concorrencia e o cds está aberto)
9 - Novamente me abre o Form de conciliação e na mensagem de erro vem o
seguinte: Table unknown
clientes
At line 1, column 20.

Nem sei mais o que fazer, mesmo escolhendo a ação a executar como skip ou
correct me parece que sempre ocorre a cancel.

Se alguém teve problema semelhante ou tenha um exemplo funcionando com o
ReconcilieError por favor me ajude.



  - Original Message -
  From: Francisco Thiago
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, March 17, 2005 5:39 PM
  Subject: [Norton AntiSpam] Re: [delphi-br] Erro ReconcileError


  Primeiro: Com o ClientDataSet, você não controla a transação... Quem
  controla é ele mesmo. Se você está fazendo o controle transacional, está
  fazendo atoa.

  Segundo: Verifique como está a propriedade ProviderFlags dos campos do teu
  SQLDataSet. Verifique se a chave primária está marcada pfInKey. Se não
  estiver, marque. Para gerar os SQL de atualizações, o DataSetProvider se
  basea na configuração desta propriedade... Logo, pfInWhere, significa que
  aquele campo entrará no Where do update, por exemplo, e assim por diante.

  Terceiro: Adicione um formulário ReconcileError na sua aplicação e faça o
  tratamento deste evento. Esta é a única forma de saber se ouve algum erro.
  Outra forma alternativa, seria comparar o valor retornado pela
  ApplyUpdates.. se for diferente de zero, é que houve algum erro (acho que
é
  isso mesmo :D)

  Testa e depois fala para gente como ficou okay?

  Boa sorte

  Francisco Thiago de Almeida
  Enter&Plug Informática
  Divisão: Desenvolvimento e Banco de dados
  MSN: [EMAIL PROTECTED]
  Skype: enterplug_thiago

  - Original Message -
  From: "Wenceslau Miranda" <[EMAIL PROTECTED]>
  To: ; <[EMAIL PROTECTED]>;
  <[EMAIL PROTECTED]>
  Sent: Thursday, March 17, 2005 5:28 PM
  Subject: [delphi-br] Erro ReconcileError



  Olá Pessoal,

  Estou tendo dificuldades para tratar acesso concorrente de dados (2
usuários
  alterando o mesmo registro).

  Estou utilizando D7+DBX+Firebird, e utilizo o conjunto
  SQLDataSet+DataSetProvider+ClientDataSet.
  O problema acontece se dois usuários estão visualizando um mesmo registro
  (pois os registros estão em cache devido o uso do CLIENTDATASET) e um
  usuário altera o registro e dá um ApplyUpdate e depois o outro usuário
  altera o registro e ao tentar dar o applyupdates está me retornando o
  seguinte erro:
  RECORD NOT FOUND OR CHANGED BY ANOTHER USER

  Então o registro não é alterado.

  Já tentei utilizar o ReconcileError mas não obtive sucesso. O problema é
que
  ele não gera a exceção do bloco TRY EXCEPT END, ele dá o commit
normalmente
  mesmo com a mensagem, mas não grava o registro.

  Por favor galera me ajudem que já não sei mais oq fazer.


  -
  Yahoo! Mail - Com 250MB de espaço.  Abra sua conta!

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

[delphi-br] Excel + Como faço pra ler um arquivo do excel?

2005-03-18 Por tôpico Gabriel Moricz


Ola..

Então galera, to precisando ler um arquivo excel, lendo os dados e 
preenchendo tbm ao mmo tempo...

Alguem tem uma ideia de como posso fazer isso???


Valew...

Gabriel Moricz





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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Delphi 7 X Crystal

2005-03-18 Por tôpico frcjf


Ola pessoal

Tenho o crystal 8.5, e tinha um componente(cr85vcl.exe) para 
trabalhar com ele e funciona legal. Mas agora que estou com o Delphi 
7 não consigo instalar, mas lá indica que é para Delphi 6/7. Alguém 
já passou por este problema, ou conhece algum site onde possa baixar..

grato 

Flávio





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

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

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

<*> 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] Problemas com SQL

2005-03-18 Por tôpico Cícero

Primeiro voce tera que ter o campo descrição na tabela de categoria

select a.*, b.* from principal A inner join categoria b on a.categoria =
b.Idcategoria e tal e tal.

traduzindo: pegue todos da primeira tabela e todos da segunda tabela usando
a descricao daqueles que está contida na segunda tabela.

quando for usar , pegue b.descricao



-Mensagem original-
De: Giovani - Terra [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 17 de março de 2005 21:56
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Problemas com SQL



Galera.. é o seguinte :)

Eu tenho 2 tabelas, com os seguintes campos:

Categoria
Id_CategoriaDescriçãoCategoria_Pai

Dentro dessa tabela, pode a Categoria_Pai ser representada por um
Id_Categoria já cadastrado, por exemplo:

1AutomóveisNull
2Som  1(*A categoria pai é Automóveis*)

Ok.. Continuando..

Tenho uma outra tabela, que tem o Id_Categoria dentro dela, e não tem o
campo Descrição...

Id_Businessbla blabla Id_Categoriablablabla

Como eu faço um SQL pra juntar as duas??

O problema não é tanto juntar. Eu tenho que mostrar a Descrição em um Form,
cujos campos derivam de uma terceira tabela (tabela Business), que não tem o
campo Id_Categoria.. ou seja, tenho que mostrar em um DbLookupCombo a
descrição da categoria, e em um outro a descrição da categoria pai (se
existir)...
To ficando louco...
Esse DbLookupCombo não vai gravar na tabela Business, e sim na tabela
Business_Cat, que é a segunda que eu coloquei...

Coisa meio doida, né?

Alguém tem idéia de como eu poderia fazer pra preencher esse DbLookupCombo?

Obrigado

Giovani
  --

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


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



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

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

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

Links do Yahoo! Grupos










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

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

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

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

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

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

 





[delphi-br] Perda dos Database URGENTE

2005-03-18 Por tôpico Felipe Pasqualotto

Bom dia, o negócio é critico

Possuo dois Databases o IBDB1 e o IBDB2 no Dados (DM) e depois possuo outros
DMs onde faço referência ao Dados, e o que está acontecendo é o seguinte:
Os IBDataSet que possues em sua propriedade Database := Dados.IBDB1 ele
guarda certo, mas os que possuem atabase := Dados.IBDB2, ao fechar o form ou
o projeto e abrir novamente ele fica vazio...

Alguem já passou por isso

Abraço
Felipe


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005
 




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

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

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

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

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

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

 





RES: [delphi-br] Problemas com campo DATE, Oracle e Delphi

2005-03-18 Por tôpico Cícero

Gente boa,,, tem alguma apostila de instalação do oracle para me arrumar?
Fiz o download do oracle mas não consegui instalar no win2000


-Mensagem original-
De: Alexandre Paganato [mailto:[EMAIL PROTECTED]
Enviada em: sexta-feira, 18 de março de 2005 08:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Problemas com campo DATE, Oracle e Delphi



Salve a todos.
Sou iniciante com o Oracle e peço a ajuda de alguém com mais experiência.
Estou acessando o Oracle com Zeros Lib, fazendo os comandos de
insert/update/delete através do zUpdateSQL.
Tudo correto com a conexão, porém ao tentar inserir um registro onde tem
campo DATE, esta apresentando erro.
Passo a string de insert assim:
insert into usuarios (usu_codigo, usu_nome, usu_data)
values(:usu_codigo, :usu_nome, :usu_data)

Estou usando o componente "TDBDateEdit" para coletar a data, e o resto
como descrevi antes.

Mensagem de erro: "o literal não corresponde a string de formato.".

O erro parece ser com a conversão da data, já fiz tudo que eu conheço e
nada.

Att.,
___
[],
Alexandre Paganato
An. de Sistemas Jr.
Gerencia de Desenvolvimento - EMDEC
mail: [EMAIL PROTECTED]
[EMAIL PROTECTED]
msn: [EMAIL PROTECTED]


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

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

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

Links do Yahoo! Grupos









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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] OFFTOPIC - Dúvida com sql

2005-03-18 Por tôpico Cícero

Se usar sempre as referencias a,b quando usar o campo,,no meu caso não dá
problema não
where a.campo1 = b.campo35 (da certinho)

-Mensagem original-
De: Maurício Chiarato Vaglieri [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 17 de março de 2005 08:34
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] OFFTOPIC - Dúvida com sql




Moacir,

   A sua tática de dar um "A.*, B.*" creio eu que não vá funcionar, pois
existem campos com os mesmos nomes nas duas tabelas. Na minha opinião você
deveria descrever quais campos quer individualmente.

Abraços,

Mauricio
  - Original Message -
  From: Prisma Sistemas - Moacir
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, March 17, 2005 7:32 AM
  Subject: Re: [delphi-br] OFFTOPIC - Dúvida com sql


  Eduardo,

  Select A.*,B.* from TABELA_A  A
  left join TABELA_B B on (A.ANO=B.ANO and A.SEM=B.SEM and A.TIPO=B.TIPO)
  where blablabla
  order by bla bla bla

  [ ]´s
  Moacir


  Eduardo Galvão escreveu:

  >Pessoal,
  >
  >Uma tabela (A) possui como chave primária
  >os campos ANO,SEM,TIPO.
  >
  >Uma outra (B) possui os campos ANO,SEM,TIPO e mais outros campos.
  >
  >Eu preciso saber quais os registros da tabela (A) não
  >existem na (B).
  >
  >Exemplo: Se (A) possui o registro 2005,1,'A',
  >e nenhum registro em (B) possui estes campos,
  >então eu devo imprimir (A).
  >
  >Alguma dica?
  >
  >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.308 / Virus Database: 266.7.2 - Release Date: 11/03/2005
  >
  >
  >[As partes desta mensagem que não continham texto foram removidas]
  >
  >
  >
  >
  >


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



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

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

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



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





--


  Nenhum virus encontrado nesta mensagem.
  Checked by AVG Anti-Virus.
  Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005

  --

Nenhum virus encontrado nesta mensagem.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005


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






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

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

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

Links do Yahoo! Grupos










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

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

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

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

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

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

 





RES: [delphi-br] Locate/DbGrid

2005-03-18 Por tôpico Cícero

Posso estar errado mas acho que se voce usar o evento
OnmouseUP do dbgrid, você pode fazer sua alteração
update tal e tal seucampo='S'
O ponteiro vai ficar no mesmo lugar a não ser que voce esteja usando esse
campo para indexação. Nesse caso, eh claro que os que tem brancos ficam
primeiro, depois os N e depois os S.


-Mensagem original-
De: Filipe [mailto:[EMAIL PROTECTED]
Enviada em: sexta-feira, 18 de março de 2005 08:21
Para: (_Object Pascal; delphi-br@yahoogrupos.com.br;
[EMAIL PROTECTED]
Assunto: [delphi-br] Locate/DbGrid




 Bom dia colegas!

  Seguinte: Tenho um DbGrid, que qdo recebe um dblClick, atualiza um
campo do registro, tipo : Sim/Não. Como os registros eram atualizados depois
do clique, tive q gravar a posição da tabela numa variável, fazer a
alteração e dar um Locate na query, caso contrário o foco ia para o primeiro
registro.

  Até aí tudo bem...

  O problema, é que, o registro atualizado, vai para o Meio do grid, e
eu preciso que ele fique onde está. ex:

  varInteger := Query.fieldByName('Chave').asInteger;

  reg5  S
  Reg6  N
  Reg7  N
  Reg8  S  // digamos q eu atualize este registro aki, ele vai para o
meio:
  Reg9  N

  Locate('Chave', varInteger, []);

  reg6  N
  Reg7  N
  Reg8  N  //  <-
  Reg9  N
  Reg10 S

  E preciso q ele fique onde estava:

  reg5  S
  Reg6  N
  Reg7  N
  Reg8  N  //<-
  Reg9  N

  Alguém sabe como proceder???


  Obrigado.




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




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



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

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

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

Links do Yahoo! Grupos










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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico Walter Alves Chagas Junior

Eu já desenvolvi para a Argox usando a linguagem de programação da
impressora Eltron. Se a sua argox tiver a Epron da Eltron vai fucionar
beleza, caso contrario não vai funcionar. Estarei te mandando em PVT uma
cópia PDF do manual da linguagem da eltron e uns scripts de exemplo pra você
começar a mexer

 
 
 []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: jmourajr2000 [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 17 de março de 2005 21:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA
> 
> 
> 
> 
> Caros amigos, boa noite!
> 
> Surgiu-me inesperadamente uma solicitação de desenvolvimento de um 
> aplicativo para a impressão de codigo de barras.
> O cliente comprou uma impressora Argox Rabbit 214 e me pede em 
> carater emergencial(para amanhã a tarde 18/03) o tal aplicativo para 
> impressão dos codigos.
> Como nunca desenvolvi nada para Argox pois sei que, após algumas 
> pesquisas, a mesma utiliza uma linguagem PPLA(algo como comandos em 
> MS-DOS pelo que entendi), não faço ideia por onde começar.
> O cliente me trará a impressora ainda hoje(22:00hs) , para que eu 
> possa fazer tal rotina e testar, pois ele a utilizará no final de 
> semana e deverá fazer sua entrega de produtos com os devidos codigos 
> na proxima segunda e terça-feira.
> Perguntas:
> 1) Disponho de um componente chamado NS-Barras será que ele pode me 
> auxiliar para tal? (impressão gerenciada pelo Windows + Quickreport)
> 2) Como programo em PPLA em Delphi?
> 3) Ou é melhor sair correndo? :)
> 4) Esta impressora suporta comandos desenvolvidos em 32bits?
> 
> Quem puder me dar uma luz eu ficarei imensamente grato.
> 
> Utilizo Delphi3 + Paradox
> 
> Grato pela atenção de todos.
> 
> Abraços.
> 
> José de Moura
> 
>  
> 
> 
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
>  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>  
> Links do Yahoo! Grupos
> 
> 
> 
> 
>  
> 
> 
> 


[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] duvida em sql e retorno de uma select vazio

2005-03-18 Por tôpico Cícero

Aproveitando.como seria a comparação de campo boleano true ou false
select * from tabela where campoSimNao = true

-Mensagem original-
De: didi [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 17 de março de 2005 17:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] duvida em sql e retorno de uma select vazio




duvida em sql
Sendo a tabela a e a tabela b (Eduardo Galvão)
Voce pode fazer assim.
SELECT A.ANO,A.SEM,A.TIPO FROM TABELAA A, TABELAB B
WHERE A.ANO = B.ANO
AND A.SEM = B.SEM
AND A.TIPO = B.TIPO
DÁ PARA MELHORA? cOM CERTEZA VOCE PODE USAR O JOIN

RETORNO DE SELECT VAZIO. (TONI)

IF(SELECT COUNT(*) FROM SC6010
WHERE C6_FILIAL = '01' AND C6_NUM = @P_NUM AND [EMAIL PROTECTED] AND
C6_LOJA = @P_LOJA AND D_E_L_E_T_ <> '*'  ) =   0
BEGIN
-- RAISERROR('TENTE NOVAMENTE' ,16,1)
SET @P_SIT='1'
GOTO FIMERRO
END

Uso o if com o select pois desta forma se o conteudo da select for
igual a zero o registro não existe na tabela. Sei que não exatamente
isto que voce está querendo. O que me pareceu é que voce quer saber
se um campo possui valor. Neste caso voce poderia
fazer um select e perguntar se o campo é nulo ou se é igual a zeros.
Com o esquema acima voce o alteraria colocando no caso estoque=0 se
isto for verdade voce pode usar o update
Estou postando este exemplo para que todos possam dar uma olhada e
caso for darem uma melhorada. SEI QUE AQUI É DELPHI, mas me desculpem
delphi usa sql CERTO?. Se esta certo fico satisfeito.

Abraços Didi. -sp





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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Locate/DbGrid

2005-03-18 Por tôpico Filipe


 Bom dia colegas!

  Seguinte: Tenho um DbGrid, que qdo recebe um dblClick, atualiza um campo 
do registro, tipo : Sim/Não. Como os registros eram atualizados depois do 
clique, tive q gravar a posição da tabela numa variável, fazer a alteração e 
dar um Locate na query, caso contrário o foco ia para o primeiro registro.

  Até aí tudo bem...

  O problema, é que, o registro atualizado, vai para o Meio do grid, e eu 
preciso que ele fique onde está. ex:

  varInteger := Query.fieldByName('Chave').asInteger;

  reg5  S
  Reg6  N
  Reg7  N
  Reg8  S  // digamos q eu atualize este registro aki, ele vai para o meio:
  Reg9  N

  Locate('Chave', varInteger, []);  

  reg6  N
  Reg7  N
  Reg8  N  //  <-
  Reg9  N  
  Reg10 S

  E preciso q ele fique onde estava:

  reg5  S
  Reg6  N
  Reg7  N
  Reg8  N  //<-   
  Reg9  N

  Alguém sabe como proceder???


  Obrigado.




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


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



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

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

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

<*> 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] Problemas com campo DATE, Oracle e Delphi

2005-03-18 Por tôpico Alexandre Paganato

Salve a todos.
Sou iniciante com o Oracle e peço a ajuda de alguém com mais experiência.
Estou acessando o Oracle com Zeros Lib, fazendo os comandos de
insert/update/delete através do zUpdateSQL.
Tudo correto com a conexão, porém ao tentar inserir um registro onde tem
campo DATE, esta apresentando erro.
Passo a string de insert assim:
insert into usuarios (usu_codigo, usu_nome, usu_data)
values(:usu_codigo, :usu_nome, :usu_data)

Estou usando o componente "TDBDateEdit" para coletar a data, e o resto
como descrevi antes.

Mensagem de erro: "o literal não corresponde a string de formato.".

O erro parece ser com a conversão da data, já fiz tudo que eu conheço e
nada.

Att.,
___
[],
Alexandre Paganato
An. de Sistemas Jr.
Gerencia de Desenvolvimento - EMDEC
mail: [EMAIL PROTECTED]
[EMAIL PROTECTED]
msn: [EMAIL PROTECTED]


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

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

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

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

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

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

 





Re: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico MC Sistemas

Tenho usado a Argox - OS 214,
mas sempre   com a impressora  configurada para PPLB, onde imprimo na porta 
LPT1 através do Write (..)

Marcelo Carvalho
MC Sistemas Personalizados

  - Original Message - 
  From: Oséias Ferreira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, March 18, 2005 7:36 AM
  Subject: Re: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA


  -BEGIN PGP SIGNED MESSAGE-
  Hash: SHA1

  Puts Cara...

  Também estou com uma Argox aqui, só que pelo QuickReport, FortesReports
  ela não imprime...
  Só pelo PPLA mesmo.
  Tem algum macete para o QuickReport imprimir nela?

  Abraço;

  - --
  Oséias.

  Francisco Thiago escreveu:
  > Cara, eu já estive no mesmo apuro.. a solução mais simples para o teu caso é
  > usar um QuickReport da vida e mandar imprimir.
  > 
  > Programar no PPLA pelo que vi é só mandar o código como se estivesse
  > programando em DOS Só que o código é muito complexo, você demoraria um
  > certo tempo para aprender a fazer.
  > 
  > A Argox acompanha também um produto que regula a impressora (margens e etc)
  > Instale ele caso uma margem setada como zero no quick report aparece no meio
  > da etiqueta.
  > 
  > Foi a solução mais "barata" que encontramos aqui
  > 
  > Boa sorte
  > 
  > Thiago
  -BEGIN PGP SIGNATURE-
  Version: GnuPG v1.4.0 (MingW32)

  iD8DBQFCOq9HHKYDdGAIQkURAj0RAJsHYBo+RjZck2MTFBjl7PenctcthQCdExNL
  yiUKQZNRIAmnacaZ03sS1ZA=
  =o/yZ
  -END PGP SIGNATURE-



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

  Para ver as mensagens antigas, acesse:
  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] OFFTOPIC - Dúvida com sql

2005-03-18 Por tôpico Prisma Sistemas - Moacir

Mauricio,

Bem lembrado. 

[ ]´s

Moacir

Maurício Chiarato Vaglieri escreveu:

>Moacir,
>
>   A sua tática de dar um "A.*, B.*" creio eu que não vá funcionar, pois 
> existem campos com os mesmos nomes nas duas tabelas. Na minha opinião você 
> deveria descrever quais campos quer individualmente.
>
>Abraços,
>
>Mauricio
>  - Original Message - 
>  From: Prisma Sistemas - Moacir 
>  To: delphi-br@yahoogrupos.com.br 
>  Sent: Thursday, March 17, 2005 7:32 AM
>  Subject: Re: [delphi-br] OFFTOPIC - Dúvida com sql
>
>
>  Eduardo,
>
>  Select A.*,B.* from TABELA_A  A
>  left join TABELA_B B on (A.ANO=B.ANO and A.SEM=B.SEM and A.TIPO=B.TIPO)
>  where blablabla
>  order by bla bla bla
>
>  [ ]´s
>  Moacir
>
>
>  Eduardo Galvão escreveu:
>
>  >Pessoal,
>  >
>  >Uma tabela (A) possui como chave primária 
>  >os campos ANO,SEM,TIPO.
>  >
>  >Uma outra (B) possui os campos ANO,SEM,TIPO e mais outros campos.
>  >
>  >Eu preciso saber quais os registros da tabela (A) não
>  >existem na (B).
>  >
>  >Exemplo: Se (A) possui o registro 2005,1,'A',
>  >e nenhum registro em (B) possui estes campos,
>  >então eu devo imprimir (A).
>  >
>  >Alguma dica?
>  >
>  >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.308 / Virus Database: 266.7.2 - Release Date: 11/03/2005
>  >
>  >
>  >[As partes desta mensagem que não continham texto foram removidas]
>  >
>  >
>  >
>  >  
>  >
>
>
>  -- 
>  No virus found in this outgoing message.
>  Checked by AVG Anti-Virus.
>  Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/3/2005
>
>
>
>  -- 
>  < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>  Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.com/group/delphi-br/messages
>
>  Para falar com o moderador, envie um e-mail para:
>  [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
>
>
>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!. 
>
>
>
>
>--
>
>
>  Nenhum virus encontrado nesta mensagem.
>  Checked by AVG Anti-Virus.
>  Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005
>
>  --
>
>Nenhum virus encontrado nesta mensagem.
>Checked by AVG Anti-Virus.
>Version: 7.0.308 / Virus Database: 266.7.3 - Release Date: 15/03/2005
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
>
>  
>


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



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

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

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

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

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

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

 





Re: [delphi-br] Impressão de Codigo de Barras - Argox - PPLA

2005-03-18 Por tôpico Oséias Ferreira

-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

Puts Cara...

Também estou com uma Argox aqui, só que pelo QuickReport, FortesReports
ela não imprime...
Só pelo PPLA mesmo.
Tem algum macete para o QuickReport imprimir nela?

Abraço;

- --
Oséias.

Francisco Thiago escreveu:
> Cara, eu já estive no mesmo apuro.. a solução mais simples para o teu caso é
> usar um QuickReport da vida e mandar imprimir.
> 
> Programar no PPLA pelo que vi é só mandar o código como se estivesse
> programando em DOS Só que o código é muito complexo, você demoraria um
> certo tempo para aprender a fazer.
> 
> A Argox acompanha também um produto que regula a impressora (margens e etc)
> Instale ele caso uma margem setada como zero no quick report aparece no meio
> da etiqueta.
> 
> Foi a solução mais "barata" que encontramos aqui
> 
> Boa sorte
> 
> Thiago
-BEGIN PGP SIGNATURE-
Version: GnuPG v1.4.0 (MingW32)

iD8DBQFCOq9HHKYDdGAIQkURAj0RAJsHYBo+RjZck2MTFBjl7PenctcthQCdExNL
yiUKQZNRIAmnacaZ03sS1ZA=
=o/yZ
-END PGP SIGNATURE-



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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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