[delphi-br] RE: s--l

2010-08-31 Por tôpico Andre Luis Silveria
Hi,
How are you recently?
I have good news for you. 
I give you some surprice here! The latest Apple iPad Wi-Fi + 3G (64GB)  
is only 429.99 And other items all are original with low price that you 
can't belive !!
You can never find such a low price in other place...
Don't miss this chance, hope you can find somethings that you are interested .
I believe you will have an good experience on shopping from them.
The website is  http://www.olanys.com
rega...@--


  

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



[delphi-br] Hello . t--h

2010-08-25 Por tôpico Andre Luis Silveria
Hi,
  During my travel in Guangzhou,China,I find a company which sell world-famous 
brand products such as Apple,Nokia,Sony,Philips .This company accept paypal 
,credit card,bank transfer and western union payment method .Chinese products 
have low price is not only legend .I go to China by myself and find it is fact 
and authentic products .Don't miss this chance .I have got many bonus from them 
.To help publicize them,please understand .By the way,tell you their website 
address:   www.vipuyanst.com 
thanksh--3


  

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



[delphi-br] Hello . $--3

2010-05-28 Por tôpico Andre Luis Silveria
hi
I have a Japanese friend told me that he worked in a Japanese company. I 
visited the company he worked for and found the products very favorable. And 
there are many product versions, such as the European version, American 
version, and the Asian version and so on. All company's products take photos 
for the true products. I suggest you should have a look in this website. There 
is the company website:  www.zol-japan2.com.  You can enjoy a lot of benefits 
in the second shopping time. Thank you $--4


  

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



Res: [delphi-br] cubo de decisão

2010-05-05 Por tôpico Andre Luis Silveria
Aqui na empresa usamos o HierCube, muito bom.
http://www.radar-soft.com/pt/products/vcl.aspx


  

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



[delphi-br] hi. )-

2010-04-29 Por tôpico Andre Luis Silveria
hi!
I find a good website:  www.besark.com <  http://www.besark.com>
They mainly sell new and original electronic products. 
Now they are holding sales promotion activity, all the product are sold at a 
discount.
low cost and good quality ,and the delivery is on time .
It is a good chance that you should not lose.
If you need some, visit this website .
Hope everything goes well.
Greetings! e-


  

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



[delphi-br] Dear friends! a--b

2010-04-15 Por tôpico Andre Luis Silveria
Dear friends! 
Keep in touch.I find a website selling various innovative products, such as 
mobile phone, LCD TV, laptop, motorbike and so on.And all products originate 
from America, Japan or Korea.
This website is www.kicrop11.INFO I have purchased some products from this 
website.The cost is low, but the quality is high and they delivery products in 
time.Now they have a promotion, but it only lasts for 45 days.
if you need, you can browse. 
Best wishes!h--)


  

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



Res: [delphi-br] Re: Sistema para Builds de projetos

2010-04-15 Por tôpico Andre Luis Silveria
Nessa pagina tem o Axial Build feito pelo Isac Pinheiro 
:http://cc.embarcadero.com/Author/55953
Mas aqui na empresa estamos usando o want para a compilação, onde fizemos uma 
interface gráfica par facilitar. 


  

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



[delphi-br] Componente para Agenda

2010-01-26 Por tôpico Andre Luis Silveria
Bom dia a todos, preciso desenvolver um software de agenda e gostaria de 
sugestões quanto a componentes para exibir os compromissos.
Já olhei os componentes ExpressScheduller, mas prefiria que fossem componentes 
open sources ou free.
Se tiverem alguma indicação agradeço desde já.

Atenciosamente,

André Luis da Silveira



  

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

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



[delphi-br] hi

2010-01-10 Por tôpico Andre Luis Silveria
Hello,
How are you doing? Hope you are alright. 
Last week, I bought an phone from a site: http://www.olanys.com/
it is very cheap and I get it in 5 days. The quality is very good. 
The site also sell motor,tv,laptop,digital SLRS and so on. 
I never forget to share good things with friends.
So,if you are interested in it, you can have a look.
I think you will get some surprise.  


andre luis


  

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

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



[delphi-br] Share my happiness!!!

2009-12-04 Por tôpico Andre Luis Silveria
Share my happiness!!!
Hi, I am willing to give you a big surprise: . I bought an Apple 
Mac book one week ago from this website. Now, I have received it. This product 
quality is very good. They also sell phones, TV, motors and so on. By the way, 
they mainly sell new and original products and they have many good feedback. 
Because The upcoming Christmas and New Year's, so many companies are promoting 
their products. ooaap website also have very competitive prices. If you need 
these products, you can have a look. It is a good chance that you should not 
lose. Greetings! 


  

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

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



[delphi-br] hi, are u ?

2009-09-14 Por tôpico Andre Luis Silveria
Dear friend,
How are you recently?
I bought a laptop from a website:    www.koreadeal.com last week. I have got 
the product. Its quality is very good and the price is competitive. They also 
sell phones, TV, psp, motor and so on. By the way, they import product from 
Korea and sell new and original products. They have good reputation and have 
many good feedbacks. If you need these products, look at this website will be a 
clever choice. I am sure you will get many surprise and benefits.
Greetings!

 


  

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

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



Res: [delphi-br] OT - Univerisdade Microsoft

2009-03-04 Por tôpico Andre Luis Silveria
Obrigado pela tentativa mais ainda não é isso, é um site onde tem as vídeo 
aulas, provas e tudo mais, é como um universidade online. O link que me passou 
e para que se possa cadastrar uma universidade como parceiro, tendo acesso ao 
programas da microsoft.   


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

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



[delphi-br] OT - Univerisdade Microsoft

2009-03-04 Por tôpico Andre Luis Silveria
Bom dia a todos.
Alguns dias atrás visitando alguns do blogs que custumo acessar um link para um 
artigo sonbre uma universidade da microsoft, cheguei a entrar no site da mesma 
e até fiz a primeira prova do curso de SQL Server, mas como sempre perdi o link 
e não consigo achar pelo Google, se alguem souber alguma coisa ou tiver o link 
e puder me respassar, assim que achar posto aqui para que se alguem tiver 
interesse possa se inscrever tb.


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

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



Res: Res: RES: [delphi-br] Sistema pa controle interno

2009-03-02 Por tôpico Andre Luis Silveria
Vou tentar montar e te passo.   


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

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



Res: Res: RES: [delphi-br] Sistema pa controle interno

2009-03-02 Por tôpico Andre Luis Silveria
Use o trio: Mantis + Trac + SubVersion,  todos open 
Com o Mantis vc controle as requisições de implementações, correções de erros, 
etc.
Com o Trac gerencia o que foi feito entre alterações em cada caso  do Mantis.
Com o Subversion, controle as alterações dos fontes.

Mais completo  que isso só o Starteam da Borland.   


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

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



Res: [delphi-br] Retornar a Linha & Unit

2009-02-27 Por tôpico Andre Luis Silveria
tenta usar o madexcept





De: Leonardo Quinino 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 27 de Fevereiro de 2009 11:04:44
Assunto: Re: [delphi-br] Retornar a Linha & Unit


Eu desistir de procurar isso no delphi, a unica coisa que ainda nao
conseguir fazer em relacao ao clipper foi justamente isso, ( eu programei em
clipper numa epoca jurassica)  rs :)...

a solucao foi rever meus conceitos e valores ahahah,,,  usar mais try
exception, mostrar as mensagens do erro exption   E.ErroMessage. .  etc

gravar logs com telas no momento do erro...

Mas realmente com a praticidade do clipper, nao encontrei,, talvez seja em
funcao do tipo de ambiente de trabalho (dos  / windows) ou talvez em relacao
aos metodos de trabalho interno do delphi nao permitir essa informacao.

Bem a minha opniao bem simploria do assunto é essa, mas posso estar falando
por ignorancia (falta de conhecimento) .

Seria bom esse assunto, a solucao pode existir, se alguem tiver essa
solucao,, nos poupe de uma theread sem fim... .r S:)) !!!

2009/2/26 José Mário Silva Guedes 

>   Olá amigos...
>
> Passei o dia fazendo umas rotinas de LOGs e eis que surge a necessidade
> clássica: Pegar o nome da Unit e o número da linha.
>
> Pesquisei e achei o de sempre... Assert, arquivo MAP...
>
> Será que algum colega conseguiu resolver este tipo de necessidade? Algum
> expert ou componente resolve?
>
> Um forte abraço!
>
> --
> José Mário Silva Guedes
> Analista Programador Delphi
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
Leonardo Quinino

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


   


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

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



Res: [delphi-br] ajuda intervalo numerico

2009-02-03 Por tôpico Andre Luis Silveria
if (num in [23..56]) and (num in [30..45]) then
ShowMessage('Numero dentro dos dois intervalos');


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

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



Res: [delphi-br] transformar numero em negativo

2009-01-23 Por tôpico Andre Luis Silveria
SQL:
select case when VLOR_INO > 0 then VLOR_INO * -1 else VLOR_INO end
from inota

Delphi:
if VLOR_INO > 0 then
VLOR_INO := VLOR_INO * -1;


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

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



[delphi-br] CodeRage III

2008-12-01 Por tôpico Andre Luis Silveria
Alguem que tenha se inscrito consegue acessar ?

Pois nos email que tenho com os links está dando que a reunião ainda não foi 
iniciada, embora na página do evento diga que se iniciaria as 11:00 pelo 
horário de brasília.


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

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



Res: [delphi-br] URGENTE - Como retornar Campos Prim ário do DataSet

2008-04-11 Por tôpico Andre Luis Silveria
O que vc pode fazer é o seguinte:
RCampo : TRecord
Campo : String;

procedure chamarLog(DS : Dataset);
var Tabela : TTable;
Campo : Array of RCampo;
begin
  if (DS.State in [dsInsert, dsEdit)  then
  begin
for i := 0 to Ds.FieldsCount - 1 do
begin
if pfInKey in DS.Fields[i].ProviderFlags then
begin
SetLength(Campo, Length(Campo)+1);
 Campo[Length(Campo)-1].Campo := DS.Fields[0] .FieldName; //retornar o 
campo chave
 end;
end;   
   Tabela :=  (DS as TTable).TableName) ; //retornar o nome da tabela
 end;
end;


- Mensagem original 
De: Jorge Ericsson <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 10 de Abril de 2008 19:06:39
Assunto: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet

Olá amigos Delphianos,

Preciso enviar para minha tela de pesquisa os campos chaves e o nome da
tabela de Datasource.

Tentei o seguinte:

procedure chamarLog(DS : Dataset);
var Tabela : TTable;
 Campo: String;
begin
  if (DS.State in [dsInsert, dsEdit)  then
  begin
   Campo := DS.Fields[0] .FieldName; //retornar o campo chave
   Tabela :=  (DS as TTable).TableName) ; //retornar o nome da tabela
 end;
end;

Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em
qq posição da tabela.

Alguém poderia ajudar-me nesse problema ?

Agradeço,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsso n.com.br
61 9227.4785 / 3967.6172
Brasília - DF

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















  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] <<< Nível Master vai encara r? >>>

2008-04-07 Por tôpico Andre Luis Silveria
Não precisa de nada disso, basta colocar no CanResizeForm, 
CanResizeForm:
Resize := False;

Pronto sem gambiarras, nem implementações mirabolantes





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] <<< ClientDataSet BMP x JPG >>>

2008-04-07 Por tôpico Andre Luis Silveria
Para trabalhar com Jpg no Delphi, vc deve declarar a unit JPEG no uses da unit.
Procure sobre essa unit no help do Delphi que vc vai achar muito informaçao 
útil.




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] <<< Nível Master vai encara r? >>>

2008-04-07 Por tôpico Andre Luis Silveria
Já tentou colocar no OnCanResize do formulário:
Resize := False;

Se isso for somente para os Masters, não sei qual pergunta seria para o nivel 
NewBie ...
Mas já me contento em ser Master.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Acessar web service via Delphi - wsdl

2008-04-04 Por tôpico Andre Luis Silveria
http://web.telia.com/~u54524181/soap.htm
tutorial básico de como criar e consumir um webservice em delphi.

Recomendo dar uma olhada nos sites:
www.imaster.com.br;
www.clubedelhi.net;
www.activedelphi.com.br;
Santo Google;

Pois esta é uma questão básica para quer consumir um webservice.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] dois programadore no mesmo projeto

2008-04-04 Por tôpico Andre Luis Silveria
tanto o cvs como o subversion  são gratuitos.
Pode baixa-los e usar a vontade, outra forma seria usar um repositório como o 
GoogleCode, SourceForge, para guardar os fontes, assim qualquer um que faça 
parte do projeto pode baixar o fonte de qualquer lugar do mundo, sem a 
necessidade de se manter um servidor na empresa para esse fim.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] dois programadore no mesmo projeto

2008-04-04 Por tôpico Andre Luis Silveria
use um controlador de versão (cvs, subversion).



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] TSQLQuery

2008-04-03 Por tôpico Andre Luis Silveria
query.fetch;
query.RecordCount;

Dependendo da quantidade de registros vai demorar um pouco o fetch.

- Mensagem original 
De: dhsb <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 3 de Abril de 2008 14:49:00
Assunto: [delphi-br] TSQLQuery

Pessoal como faco para fazer uma simples consulta de quantos 
registros 
retornou de um SQL

Uso delphi 7 e TSQLQuery.

Ja tentei com o data set com a query mas sempre retorna 1

Olha o que estou fazendo.

Qry.RecordCount

Valeu















  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Ajuda em select

2008-04-03 Por tôpico Andre Luis Silveria
select cliente.nome from cliente
where cliente.dt_nascimen to in (select cliente.dt_nascimen to
from cliente
group by cliente.dt_nascimen to
having count(cliente. id_cliente) > 1
order by count(cliente. id_cliente) )





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Como saber se existe um atalho no desktop, caso nao exista criar um?

2008-03-26 Por tôpico Andre Luis Silveria
Acho que vc que não leu a mensagem até o final, lá ele fala como saber se o 
atalho já existe usando o registro.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Assinatura revista DevMedia, cobrando para ver video aulas????? Para o Rubem Rocha.

2008-03-14 Por tôpico Andre Luis Silveria
arrumaram o problema de cobrar de assinantes, acabei de acessar:
http://www.devmedia.com.br/articles/viewcomp.asp?comp=8159
que se refera a 8ª aula de bpl e para assinantes é de graça...

Só na reclamação mesmo.
 




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Assinatura revista DevMedia, cobrando para ver video aulas?????

2008-03-11 Por tôpico Andre Luis Silveria
as video aulas de BPL estão em:

www.vytryny.com.br, são as aulas do autor da palestra na Borcon do ano passado.

Acho que vale a pena conferir.




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Qual componente de relatório melh or com IBX?

2008-03-06 Por tôpico Andre Luis Silveria
O que melhor trabalha será o que vc se identificar mais fácil.
Todos dão suporte a todos os componentes TDataset e seus descendentes.
Na internet tem tutorial a rodo uma simples busca no  Google e seus problemas 
se acabaram.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: RES: [delphi-br] Impressão de Nota com Fast Repor

2008-03-06 Por tôpico Andre Luis Silveria
Vou te passar um exemplo quando chegar em casa 
ok...

- Mensagem original 
De: Tiago <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Março de 2008 16:34:20
Assunto: RES: [delphi-br] Impressão de Nota com FastRepor

  Olá,

>vc tem dois datasets ? um para serviço e outro para produtos ?

Não, uso o mesmo dataset, mas posso tranquilamente separar em 2 datasets.

Mas como eu faria para sair do laça de impressão dos produtos? Existe algum
comando do fastreposr que faça isso ?

Obrigado,

Tiago F. Zacchi.

De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em
nome de Andre Luis Silveria
Enviada em: quinta-feira, 6 de março de 2008 16:23
Para: [EMAIL PROTECTED] os.com.br
Assunto: Res: [delphi-br] Impressão de Nota com FastRepor

vc tem dois datasets ? um para serviço e outro para produtos ?
se sim, basta sair do laço de impressão dos produtos e ir para o laço dos
serviços.
depois do new page volta para o os produtos e continua

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
http://br.mail. yahoo.com/

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

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



  











  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Impressão de Nota com FastRepor

2008-03-06 Por tôpico Andre Luis Silveria
vc tem dois datasets ? um para serviço e outro para produtos ?
se sim, basta sair do laço de impressão dos produtos e ir para o laço dos 
serviços.
depois do new page volta para o os produtos e continua





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Componente RSPrint

2008-03-06 Por tôpico Andre Luis Silveria
http://www.alberteije.com/cursodelphini.php
olha aqui que tem uma video aula usando este componente.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: Res: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures

2008-03-05 Por tôpico Andre Luis Silveria
vc tem que ter uma variavel para armazenar a contagem:
testa aé e retorna o erro que aparecer.

SET TERM ^ ; 
CREATE PROCEDURE SP_ALTERA_ESTOQUE( 
CODLOJA INTEGER, 
CODPRODUTO INTEGER, 
QUANTIDADE INTEGER) 
AS 
DECLARE VARIABLE CONTA INTEGER;
BEGIN 
Select Count(*) 
From PRODUTOSESTOQUELOJA S 
   WHERE((PRODUTOSESTOQUELO JAS.CODLOJA = :CODLOJA AND 
  (PRODUTOSESTOQUELOJAS.CODPRODUTO = :CODPRODUTO)
into :conta;

IF (:conta > 0) THEN 
BEGIN 
UPDATE PRODUTOSESTOQUELOJA S SET PRODUTOSESTOQUELOJA S.ESTOQUE = 
PRODUTOSESTOQUELOJA S.ESTOQUE + :QUANTIDADE 
END 
ELSE 
BEGIN 
INSERT INTO PRODUTOSESTOQUELOJA S (ESTOQUE) VALUES (QUANTIDADE) 
END 
END; 
SET TERM ; ^ 

- Mensagem original 
De: Edson Cabral <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 5 de Março de 2008 17:03:47
Assunto: Res: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures

  Quanto ao uso do componente para executar a Stored Procedure 
eu sei. 

A questão é que a Stored Procedure abaixo não é criada, pois dá um erro 
(possivelmente de sintaxe). 
Eu quero saber se alguém descobre que erro é esse, ou se de repente eu estou 
fazendo algo errado no corpo da stored procedure para causar o erro.

O erro do IBExpert informa a linha em que está o IF e não compila a stored 
procedure no banco. Entendeu? A SP nem sequer chega a ser criada.

Edson

- Mensagem original 
De: Ricardo César Cardoso 
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Terça-feira, 4 de Março de 2008 12:14:43
Assunto: Re: [delphi-br] OFF-TOPIC / SQL Firebird 2.0 - Stored Procedures

Bem... não sei se entendi sua pergunta, mas se vc quer fazer isso no Delphi, 
pode fazer usando o TSQLConnection (DBExpress) passando esta stored procedure. 
Cada parâmetro é acessado por um "array" Params e o índice de cada parâmetro. O 
primeiro parâmetro tem o índice 0 no "array" de parâmetros e assim por diante. 
Para criar a procedure, vc usa o método "Execute".

Acho que é isso. Se não for, detalhe melhor o problema.

Atte,
Ricardo.

Edson Cabral <[EMAIL PROTECTED] com.br> escreveu: Perdoem o off-topic, é que 
estou com certa urgência.
Quem trabalha com Stored Procedures poderá tirar essa dúvida.
 

Olá pessoal. 

Estou com uma dúvida em relação a criação de Stored Procedures no Firebird 2.0. 
Sempre que precisei usar SPs, as criei a partir do IBExpert. 
Só que agora preciso de uma stored procedure que tenho que criar na unha e 
estou meio perdido... 

Trata-se de uma stored procedure para atualizar o Estoque (campo ESTOQUE) da 
tabela PRODUTOSESTOQUELOJA S. 
Preciso passar três parâmetros: CodLoja e CodProduto, e mais a Quantidade que 
desejo incrementar o estoque. 

A SP deve verificar se o produto já existe cadastrado a partir dos parâmetros 
de entrada CodProduto e CodLoja (se achar algum registro com os campos CodLoja 
e CodProduto que confiram com os parâmetros). 
Caso exista, deve-se dar um UPDATE na tabela para atualizar o estoque somando-o 
a variável QUANTIDADE (mais um parâmetro de entrada). 

Caso não exista ainda cadastrado, deve-se dar um INSERT na tabela cadastrando o 
produto com a quantidade em estoque que passei como parâmetro QUANTIDADE. 
O código que tenho (e que não funciona, pois dá erro na criação da SP) é esse 
abaixo: 

Código: 

SET TERM ^ ; 
CREATE PROCEDURE SP_ALTERA_ESTOQUE( 
CODLOJA INTEGER, 
CODPRODUTO INTEGER, 
QUANTIDADE INTEGER) 
AS 
BEGIN 
IF (Select Count(*) From PRODUTOSESTOQUELOJA S WHERE ((PRODUTOSESTOQUELO 
JAS.CODLOJA = :CODLOJA) AND (PRODUTOSESTOQUELOJ AS.CODPRODUTO = :CODPRODUTO) > 
0) THEN 
BEGIN 
BEGIN TRANSACTION 
UPDATE PRODUTOSESTOQUELOJA S SET PRODUTOSESTOQUELOJA S.ESTOQUE = 
PRODUTOSESTOQUELOJA S.ESTOQUE + :QUANTIDADE 
COMMIT 
END 
ELSE 
BEGIN 
BEGIN TRANSACTION 
INSERT INTO PRODUTOSESTOQUELOJA S (ESTOQUE) VALUES (QUANTIDADE) 
COMMIT 
END 
END; 
SET TERM ; ^ 

Obrigado a todos. 
Edson 

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
http://br.mail. yahoo.com/

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

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

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

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
http://br.mail. yahoo.com/

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



  











  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Ata de Resultados

2008-03-04 Por tôpico Andre Luis Silveria
um group by no nome do aluno, e no fortes uma banda Group com os details não 
resolveria ?

- Mensagem original 
De: Ralp Alves Bezerra <[EMAIL PROTECTED]>
Para: Delphi BR 
Enviadas: Terça-feira, 4 de Março de 2008 18:29:32
Assunto: [delphi-br] Ata de Resultados

  Nobres Colegas,

Venho mais uma vez pedir a ajuda dos nobres colegas para poder resolver 
uma dúvida que me ocorre:

Tenho um sistema em paradox para administração escolar rodando, estou 
precisando gerar a ata de resultados finais para o mesmo, porém, estou 
com um problema que ainda não consegui resolver.
 
Tenho uma tabela onde ficam registradas todas as informações de notas e 
matérias do alunos.

Ex.:

Nome  Matéria   Nota
 - - ---
Maria da silva  Portugues10
Maria da Silva Matemática 08
Maria da Silva Inglês  09
Maria da Silva Física  08

e assim por diante com todos os alunos da turma. Se existirem 10 
matérias o nome do aluno se repete as mesmas 10 vezes.

Como faria para gerar uma segunda tabela ou outra maneira de poder gerar 
ata de resultados finais com o tipo de tabela que possuo?

Nesta sistema estou utilizando Delphi 7, Paradox e FortesReport, mas a 
dica poderia ser também em QR se caso fosse mais prático.

Desde já agradeço a ajuda.

Abraços.

Ralp Alves Bezerra


  











  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] [COMBOBOX]

2008-03-04 Por tôpico Andre Luis Silveria
Somente com os componentes da Jedi vc consegue de maneira transparente, o que 
vc pode fazer e colocar assim:

01 - AAA
02 - BBB
 ou seja o codigo espaço traço espaço nome
e depois dar um copy(Combobox.Text, 1, Pos(' -', Combobox.Text) -1)
Meio gambiarra mas que funciona, isso funciona.





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Join com 3 tabelas

2008-03-03 Por tôpico Andre Luis Silveria
select A.CODI_ALU, A. NOME_ALU, M.DATA_MEN, M.VENC_MEN, C.COBR_COB
from Aluno A
left outer join Mensalidade M on (M.CODI_ALU = A.CODI_ALU)
left outer join Cobranca C on (C.CODI_MEN = M.CODI_MEN)
where M.VENC_MEN <= '01/29/2008' and C.COBR_COB = 'S'

levei em conta que se tem cobrança o campo COBR_COB está com o valor 'S' 
(string)





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] ajuda para executar procedure no adostoredproc

2008-02-29 Por tôpico Andre Luis Silveria
se vc estiver mandando abrir o clientdataset vai dar erro mesmo,
Usamos aqui procedures no Oracle e Firebird usando Query e nunca tivemos os 
problemas dos parâmetros, se puder passar o erro assim facilitaria a ajuda.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] ajuda para executar procedure no adostoredproc

2008-02-29 Por tôpico Andre Luis Silveria
se vc estiver mandando abrir o clientdataset vai dar erro mesmo,
Usamos aqui procedures no Oracle e Firebird usando Query e nunca tivemos os 
problemas dos parâmetros, se puder passar o erro assim facilitaria a ajuda.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] ajuda para executar procedure no adostoredproc

2008-02-29 Por tôpico Andre Luis Silveria
se vc estiver mandando abrir o clientdataset vai dar erro mesmo,
Usamos aqui procedures no Oracle e Firebird usando Query e nunca tivemos os 
problemas dos parâmetros, se puder passar o erro assim facilitaria a ajuda.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Conexão com o banco...

2008-02-29 Por tôpico Andre Luis Silveria
Mas é pago, se for free, nada melhor que o ADO mesmo



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Conexão com o banco...

2008-02-29 Por tôpico Andre Luis Silveria
ADO com certeza, se for usar somente o Sql Server
Se não aí tem um monte, dbexpress, MDO, Zeos 



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Como saber quanto tempo

2008-02-27 Por tôpico Andre Luis Silveria
Me intrometendo:
Seu sistema não parece ser pequeno, e vc levou em conta somente forms, 
relatórios, até aí tudo bem.
Mas e as regras de negócio ? Quanto tempo vc vai levar com o cliente levantando 
requisitos, especificando requisitos, modelando a base ?
Isso para falar no básico, será que isso não conta ? ou vc vai fazer isso tudo 
de graça mesmo ? Só nesse processo te falo que vai mais de 50 horas. Quanto ao 
seu cálculo de horas, vc vai fazer em horário comercial ou fora dele, porque se 
eu ganho 18 por hora no horário comercial, nada mais justo que ganhar pelo 
menos 22,00 (18,00 + 50%) fora dele, afinal  vou estar sacrificando meu 
descanso ou  estudos para  trabalhar.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Consulta data

2008-02-27 Por tôpico Andre Luis Silveria

 datamodule3. IBQuery_Ordem_ Servico.Close; 
datamodule3.
IBQuery_Ordem_ Servico.SQL. Clear; 
datamodule3. IBQuery_Ordem_
Servico.sql. add('select * from ORDEM_SERVICO where DATA between :mes1 and 
:mes2');

datamodule3. IBQuery_Ordem_ Servico.Params. ParamByName( 'mes1').AsDate:
=strtodate( edit1.Text) ; 
datamodule3. IBQuery_Ordem_ Servico.Params. ParamByName( 'mes2').AsDate:
=strtodate( edit2.Text) ; 
datamodule3. IBQuery_Ordem_ Servico.SQL.
Add('order by ID_ORDEM_SERVICO' ); 





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Model Complexo no Grid

2008-02-26 Por tôpico Andre Luis Silveria
usa um clientdataset temporário para mostrar os dados como vc quer
 traz os dados, faz um laço, e preenche o clientdataset temporário (que vai ser 
mostrado no grid ou no relatório).




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Ajuda Delphi com Word

2008-02-22 Por tôpico Andre Luis Silveria
Olha no site www.clubedelphi.net que tem uns artigos falando sobre isso.

- Mensagem original 
De: Vinicius Santos - MSI <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 22 de Fevereiro de 2008 15:14:59
Assunto: Re: [delphi-br] Ajuda Delphi com Word









  



Fala mermão, faça a mala direta usando Access normalmente, depois 
insere os dados na tabela do Access pelo Delphi !



Flw Flw



Vinicius dos Santos

Analista de Desenvolvimento Júnior

MSI SOLUÇÕES

Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil

Fone/Fax: +55 (14) 3324-8181  www.msisolucoes. com.br



- Original Message - 

  From: Raphae Fonseca 

  To: [EMAIL PROTECTED] os.com.br 

  Sent: Friday, February 22, 2008 3:06 PM

  Subject: [delphi-br] Ajuda Delphi com Word



Boa tarde amigos da Lista



Estou precisando fazer uma mala direta delphi X Word.



Inserir dados de uma determinada tabela num documento já formatado no word.



Algum amigo já desenvolveu algo parecido?



Poderia me ajudar



Raphael



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

  http://br.mail. yahoo.com/



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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] QuickReport

2008-02-22 Por tôpico Andre Luis Silveria
ou se quiser um free e muito bom tb procure pelo VDOPrint.

- Mensagem original 
De: Gladson Reis <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 22 de Fevereiro de 2008 15:09:55
Assunto: Re: [delphi-br] QuickReport









  



use o RDPrint



- Original Message - 

From: "stainle2003" 

To: <[EMAIL PROTECTED] os.com.br>

Sent: Friday, February 22, 2008 2:37 PM

Subject: [delphi-br] QuickReport



estou tentando escrever em um Formulário da Nota Fiscal com Delphi 7 e

QuickReport, não estou conseguindo assimilar: meço em MM o quanto devo

deslocar o componente no Quick para que se encaixe no local correto,

porém percebi que devo multiplicar por 3 aproximadamente, ou seja se

tenho que deslocar 15 mm para a esquerda, no Left do DBText por exemplo

devo subtrair 45 mm e mesmo assim não fica bom, alguém poderia me

explicar porque não corresponde a unidade de medida(MM) que leio nas

propriedade do QuickReport com as que eu meço com a régua.

estou usando a fonte Draft10.

o que seria melhor para impressão de Nota Fiscal, o Quick ou o Fortes ??



grato



Stainle



-- 

< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >



Links do Yahoo! Grupos



__ Informação do NOD32 IMON 2896 (20080222) __



Esta mensagem foi verificada pelo NOD32 sistema antivírus

http://www.eset. com.br






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Atualizador automatico

2008-02-22 Por tôpico Andre Luis Silveria
http://www.devmedia.com.br/articles/viewcomp.asp?comp=1024&hl=
ou 
http://www.devmedia.com.br/articles/viewcomp.asp?comp=6333&hl=
ou
http://www.devmedia.com.br/articles/viewcomp.asp?comp=4929&hl=

isso em uma pesquisa rápida, se tivesse tempo e precisando disso garanto que 
tinha achado tudo o que preciso, talvez até pronto.





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] ODBC

2008-02-20 Por tôpico Andre Luis Silveria
Basta instalar o mdac na máquina.

Com ADO vc não precisa de ODBC, pois ele conecta facilmente em máquinas com 
access e sqlserver.

- Mensagem original 
De: r_iroman <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 19 de Fevereiro de 2008 19:09:06
Assunto: [delphi-br] ODBC









  



Gente, fiz uma conexão com o ADO em um banco do Access (.mdb), mas 

preciso utilizar o programa em uma maquina que não tem delphi e 

provavelmente nem Access, o que preciso fazer para que eu consiga rodar 

sem instalar nem o delphi e nem o access ??? Colocar DLL's na pasta ??



Alguem consegue me ajuda !



Desde ja agradeço






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Re: QuickReport Paradox

2008-02-15 Por tôpico Andre Luis Silveria
vc pode usar um case para saber se o campo é correto ou de correção no sql.

select case when C.VALOR1_CORRETO = '' then P.VALOR1 else C.VALOR1_CORRETO 
from PORTE P
left outer join CORRECAO C on (C.ID_PORTE = P.ID_PORTE)
where suacondição

testa e vê se da certo

  André Luis da Silveira
Siagri Sistemas de Gestão





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Regras para Ponto

2008-02-15 Por tôpico Andre Luis Silveria
o que vc pode fazer e criar uma tabela com os horários que o funcionário entra, 
sai almoco, entra almoco e sai
assim vc já tem os intervalos que ele tem para bater os pontos...
lembrando que tem o limite de tolerância...

Se estiver fora do limite de tolerância então solicita a senha do supervisor , 
ou somente consegue bater o ponto no DP.

Qualquer coisa grita ae ...

- Mensagem original 
De: Rafael Jorge <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 15 de Fevereiro de 2008 15:21:30
Assunto: Re: [delphi-br] Regras para Ponto









  



vou controlar o ponto por soft tambem.. ai tenho que estabelecer 
essas

regras nele.

vai ter 3 tipos de coleta.. pelo txt gerado pelo maquinario do ponto ou pela

digital num leitor biometrico num pc direto em rede ou via soft pra pegar o

ponto do funcionario digitando seu codigo.

por isso queria saber das regras que o povo utiliza.

o que tu falou e valido. mas e a saida pro almoco? se eu descartar durante 8

horas nao vou saber quando ele saiu e voltou.

mas valeu. vou continuar procurando e fazer uma tela de parametrização para

isso.

t+



Em 15/02/08, Ricardo César Cardoso  escreveu:

>

>   Olha... na empresa onde trabalho ponto é registrado eletronicamente. A

> partir do momento em que é registrado a passagem do cartão, todas as

> passagens posteriores num período menor que 8 horas são registradas com um

> flag de repetição.

>

> Não sei como fica para o sistema, mas basicamente ele vai subtrair o tempo

> registrado da primeira passagem do tempo registrado da última passagem.

>

> Alguns leitores de cartão ficam travados após uma leitura com sucesso e só

> liberam depois de algum tempo (isso já fica programado em hardware) outros

> sistemas coletam toda e qualquer registro e deixam o trabalho de separar o

> joio do trigo ao encargo de um aplicativo.

>

> Atte,

> Ricardo.

>

> Rafael Jorge  > escreveu:

> sei que esse assunto ja foi muito debatido aqui mas como nao consequi achar

>

> as mensagens antigas vou pergunta.

> qual as regras para um sistema simples de ponto?

> exemplo.. quanto tempo nao posso permitir que um funcionario bata o ponto

> denovo? essas coisas.

> obrigado.

> t+

>

> --

>  - - - - - -

> Rafael jorge alves (Analista/desenvolv edor)

>

> www.sistemafocus. com.br

> sistema focus de gestão comercial e serviços em informatica.

>  - - - - - -

>

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

>

>

>

>

>

>  - - ---

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

> armazenamento!

>

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

>

>  

>



-- 

 - - - - - -

Rafael jorge alves (Analista/desenvolv edor)



www.sistemafocus. com.br

sistema focus de gestão comercial e serviços em informatica.

 - - - - - -



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Leitura de arquivo texto

2008-02-14 Por tôpico Andre Luis Silveria
O que vc pode fazer é a cada 50 registros por exemplo gravar o arquivo 
fisicamente no banco e continuar exportando.

Sempre que gravar os arquivos fisicamente feche e abra a tabela de novo, mas 
sem registros ...
- Mensagem original 
De: auriston.delphi <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 14 de Fevereiro de 2008 15:51:32
Assunto: [delphi-br] Leitura de arquivo texto









  



Quando efetuo uma leitura de um arquivo texto para gravar o banco 
de 

dados esta dando a mensagem OUT OF MEMORY, eu uso a rotina abaixo:

 AssignFile(Nomearqu ivo, OpenDialog1. FileName) ;

 Screen.Cursor := crSQLWait;

 ProgressBar1. Min := 0;

 ProgressBar1. Max := Tilinha;

 Reset(Nomearquivo) ;

 dm.qrytemp.DisableC ontrols;

 while not Eoln(Nomearquivo) do

begin

   Form1.Caption := Copy(Entrada, 1,126);

   inc(ilinha);

   Readln(Nomearquivo, Entrada);

   if Copy(Entrada, 1,2) <> '90' then

  Begin

 dm.qrytemp.Insert;

 dm.qrytemp.FieldByn ame('MAQUINA' ).Value  := 0;

 dm.qrytemp.FieldByN ame('linha' ).AsString := Copy

(Entrada,1,126) ;

 if Copy(Entrada, 1,2) = '50' then

Begin

   dm.qrytemp.FieldByn ame

('CNPJ').Asstring := Copy(Entrada, 3,14);

   dm.qrytemp.FieldByn ame

('NOTA').Asstring := Copy(Entrada, 46,6);

End;

 if Copy(Entrada, 1,2) = '53' then

Begin

   dm.qrytemp.FieldByn ame

('CNPJ').Asstring := Copy(Entrada, 3,14);

   dm.qrytemp.FieldByn ame

('NOTA').Asstring := Copy(Entrada, 46,6);

End;

 if Copy(Entrada, 1,2) = '54' then

Begin

   dm.qrytemp.FieldByn ame

('CNPJ').Asstring:= Copy(Entrada, 3,14);

   dm.qrytemp.FieldByn ame

('NOTA').Asstring:= Copy(Entrada, 22,6);

   dm.qrytemp.FieldByn ame

('produto'). Asstring := Copy(Entrada, 38,14);

   dm.qrytemp.FieldByN ame

('ITEM').AsString:= Copy(Entrada, 35,3);

End;

 if Copy(Entrada, 1,2) = '75' then

dm.qrytemp.FieldByN ame

('Produto'). AsString := Copy(Entrada, 19,14);

 dm.qrytemp.Post;

  End;

//   ProgressBar1. Position := iLinha;

End;

  dm.qrytemp.EnableCo ntrols;

Precsisode um ajuda para otimizar o codigo acima para que ele fique 

mais leve.

Uso D7 + IBX + FIREBIRD 1.5

sds

Auriston






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Ajuda com TRecord

2008-02-13 Por tôpico Andre Luis Silveria
length(Pessoa.Nome);

- Mensagem original 
De: Celio Bernardo <[EMAIL PROTECTED]>
Para: delphi-br 
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 8:14:42
Assunto: [delphi-br] Ajuda com TRecord









  



Amigos tenho uma estrutura como

   

  Type TPessoas = record

   

  Nome : String[60];

  cpf : String[11];

   

  end.

  ...

   

  var

 Pessoa : TPessoas;

   

   

  Como é a sintaxe pra pegar o tamanho do campo:

   Exemplo: Pessoa.Nome  o tamamho é 60.

   

  Obrigado

   

  Celio.

   



 - - ---

 Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br 

 - - ---



 - - ---

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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] ComboBox com Item Invisivel

2008-02-12 Por tôpico Andre Luis Silveria
Acho que deve ter um padrão para saber quais itens serão escondidos, certo ???

O que vc pode fazer e criar um StringList e carregar com todos os valores do 
Combo e os seus ItemIndexes;
Dependendo da condição vc refaz o combo colocando somente o que tem que 
aparecer;
Dependendo do que foi selecionado no combo, vc busca na stringlist o valor do 
seu itemindex para passar para a aplicação;

Seria uma "gambiarra das boas" para resolver o seu problema. Assim somente 
apareciam os itens que o usuários que ver e vc não perde os itemindexes deles.

Boa sorte,

  André Luis da Silveira
Siagri Sistemas de Gestão.





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: Res: [delphi-br] Datas formato Americano POR ÉM

2008-02-11 Por tôpico Andre Luis Silveria
   Edit1.Text := FormatDateTime('dd/mm/', StrToDate(Copy('20080202', 
7,2)+'/'+Copy('20080202', 5,2)+'/'+Copy('20080202', 1,4)));

- Mensagem original 
De: Celio Bernardo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 11 de Fevereiro de 2008 12:35:44
Assunto: RE: Res: [delphi-br] Datas formato Americano PORÉM









  



Se o for como no exemplo: '20080122'  SEM barras (/). Não funcionou 
mostrando o seguinte erro:

   

   - --

Debugger Exception Notification

 - --

Project Project1.exe raised exception class EConvertError with message 
''20080321' is not a valid date'. Process stopped. Use Step or Run to continue.

 - --

OK   Help   

 - --

   

  Obrigado.

   

  Celio.



Rubem Nascimento da Rocha  escreveu:

  

Eu postei hj na lista uma função pra converter uma string no formato 'mmdd' 
em um valor TDateTime, sem precisar 'recortar' a string com a função Copy(). 
Vejam se ela funciona e postem suas impressões.



Sds.



 _ _ __



To: [EMAIL PROTECTED] os.com.br

From: [EMAIL PROTECTED] com.br

Date: Mon, 11 Feb 2008 11:18:51 -0300

Subject: Re: Res: [delphi-br] Datas formato Americano PORÉM



Explicando melhor... a string exemplo: '20080122' é sem barras (/) separadora.



obrigado.

Celio.



>Andre Luis Silveria <[EMAIL PROTECTED] com.br> escreveu:



>FormatDate( ' dd/mm/' , StrToDAte(Stringcom aData));



>Mais fácil que isso só sentando no pudim 



--- Em [EMAIL PROTECTED] os.com.br, Celio Bernardo

escreveu

>

> Amigos tenho uma data no formato 'MMDD' tipo '20080122'

> e quero transforma-la em 22/01/2008.

>

> PS: Parece ser muito simples, mas depois de horas trabalhando nao

consigo mais pensar.

>

> Agradeço ajuda.

>

> Celio.



 - - ---

Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br

 - - ---



 - - ---

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



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



 _ _ _ _ _ _

Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas 
e muito mais no MSN Video!

http://video. msn.com/? mkt=pt-br



 - - ---

 Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br 

 - - ---



 - - ---

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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Datas formato Americano

2008-02-11 Por tôpico Andre Luis Silveria
FormatDate('dd/mm/', StrToDAte(StringcomaData));

Mais fácil que isso só sentando no pudim 



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Delphi - Report Builder - Componente

2008-02-08 Por tôpico Andre Luis Silveria
Isso já existe chama-se ExtraDevs, com ele apararece na impressão as opçoes de 
gerar o relatório numa planilha do excel, word, texto e pdf.

- Mensagem original 
De: Felipe Nunes <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 8 de Fevereiro de 2008 7:27:25
Assunto: [delphi-br] Delphi - Report Builder - Componente









  



Olá pessoal,

   

  Queria saber se alguém ja trabalhou ou trabalhar com esse tecnologia..

   

  Eu estou querendo implementar nos relatórios que crio, a função que me 
permitir pegar o relatório que foi gerar e exportar para uma planilha de excel, 
ou ate mesmo em arquivo de texto do word ou coisa similar..

   

  Se puderem me ajudar ficarei grato



Felipe Nunes

   

 - - ---

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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] windows mobile - Urgente

2008-02-06 Por tôpico Andre Luis Silveria
Grande Márcia,

Com o Delphi 2006 até que se consegue fazer alguma coisa para windows 
mobile utilizando o Compact Framework do DotNet.

Mas seria melhor levar em consideração algumas outras ferramentas como o 
CodeWarrior, o Visual Studio.

Atenciosamente,

   André Luis da Silveira
Siagri Sistemas de Gestão

- Mensagem original 
De: Marcia Cristina de Paula Vieira Borges dos Reis <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 6 de Fevereiro de 2008 6:33:54
Assunto: [delphi-br] windows mobile - Urgente









  



Bom Dia Pessoal,

   

  Gostaria de saber se alguem já desenvolveu alguma aplicação em Delphi para 

  windows mobile.

   

  Márcia Cristina.



 - - ---

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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] DbExpress SqlQuery...

2008-02-01 Por tôpico Andre Luis Silveria
Corrigindo nosso caro amigo Adriano Santos, o firebird permite sim subselects 
em selects, ao contrário do que ele disse, uso em meus sistemas sem problemas.

Agora se puder passar o problema que ocorre já facilitaria a ajuda.

  André Luis da Silveira
Siagri Sistemas de Gestão





  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] AutoCad no delphi

2008-02-01 Por tôpico Andre Luis Silveria
Pesquisa rápida no Google:
autocad+delphi

http://baixaki.ig.com.br/categorias.asp?cat=89&order=nome

http://www.freedownloadscenter.com/Best/delphi-cad-free.html

http://www.cadsofttools.com/en/products/cad_import_vcl.html

entre outros que não olhei.

como já dizia o velho ditado muito citado por aqui:

"Quem procura acha !!"

- Mensagem original 
De: Consultores Software <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 1 de Fevereiro de 2008 12:43:09
Assunto: [delphi-br] AutoCad no delphi









  



Boa tarde pessoal !



Alguem conhece um componente / plugin / rotina para visualizar arquivos do

AutoCad no delphi ?



Obrigado, desde já



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Erro No corresponding master record found.

2008-01-17 Por tôpico Andre Luis Silveria
Não estou perdendo a chave não.
Mas o problema não é nem no Insert, é quando vou editar os registros para 
inserir o valor da chave definitiva no lugar da temporária.
Estou quase louco aqui. Mas obrigado por responder.

- Mensagem original 
De: Leslyn Fernandes <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Janeiro de 2008 13:11:33
Assunto: Re: [delphi-br] Erro No corresponding master record found.









  



Oi... deixeu ver se entendi... vc insere num mestre, e no detalhe 
do mestre

e quando vai inserir no detalhe do detalhe da pau?



Vc num ta perdendo a referencia de chave do insert detalhe1 para o insert do

detalhe2??



tipo vc deveria estar fazendo algo assim:



insert no mestre

pego a pk do mestre

insert no detalhe com pk do mestre

pego pk do detalhe

insert no próx. detalhe com pk do detalhe anteriror



Espero ter ajudado



-- 

TFA,

Leslyn Fernandes

55-11-9159-3837

Computer Engineer

Integra Solutions



"Imagination is more important than knowledge."

 - Albert Einstein



2008/1/17 Andre Luis Silveria <[EMAIL PROTECTED] com.br>:



>   Estou com o erro citado e não sei mais o que fazer. O problema é que a

> situação é meio complicada, mas vou tentar descrever o problema:

>

> Tenho uma tabela Master que tem uma Detalhe ligada a ela e que é mestre de

> outro Detalhe: Meste -> Detalhe -> Detalhe.

>

> Em todas as tabelas tenho dois registros, antes que gravar (applyupdates)

> gero a chave final da tabela Mestre, automaticamente setada na tabela

> detalhe quando dou o post na mestre, depois faço um loop para preencher o

> mesmo código na detalhe do detalhe, até aí nada de anormal.

>

> Mas agora vem o problema: No primeiro registro funciona normal, ou seja

> seto o código para a mestre e post nela, seto na detalhe do detalhe e post

> nela tb. Mas quando vou gerar para o segundo registro, quando dou o post da

> detalhe do detalhe, ocorre o bendito erro : No corresponding master record

> found..

>

> Se alguem tiver uma dica, luz no final do túnel, qualquer coisa, pois no

> google o que encontrei não ajudou muito não.

>

> Atenciosamente,

>

> André Luis

> Siagri Sistemas.

>

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

> armazenamento!

> http://br.mail. yahoo.com/

>

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

>

>  

>



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



[delphi-br] Erro No corresponding master record found.

2008-01-17 Por tôpico Andre Luis Silveria
Estou com o erro citado e não sei mais o que fazer. O problema é que a situação 
é meio complicada, mas vou tentar descrever o problema:

Tenho uma tabela Master que tem uma Detalhe ligada a ela e que é mestre de 
outro Detalhe: Meste -> Detalhe -> Detalhe.

Em todas as tabelas tenho dois registros, antes que gravar (applyupdates) gero 
a chave final da tabela Mestre, automaticamente setada na tabela detalhe quando 
dou o post na mestre, depois faço um loop para preencher o mesmo código na 
detalhe do detalhe, até aí nada de anormal.

Mas agora vem  o problema: No primeiro registro funciona normal, ou seja seto o 
código para a mestre e post nela, seto na detalhe do detalhe e post nela tb. 
Mas quando vou gerar para o segundo registro, quando dou o post da detalhe do 
detalhe, ocorre o bendito erro : No corresponding master record found..

Se alguem tiver uma dica, luz no final do túnel, qualquer coisa, pois no google 
o que encontrei não ajudou muito não.

Atenciosamente,

  André Luis
Siagri Sistemas.




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] InfoPower

2007-12-18 Por tôpico Andre Luis Silveria
Dá uma olhada neste artigo:
http://dn.codegear.com/br/article/37280




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] CodeGear Delphi Day em Português

2007-12-13 Por tôpico Andre Luis Silveria
Já sim, entre em http://dn.codegear.com/br

- Mensagem original 
De: Leandro <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 13 de Dezembro de 2007 18:58:47
Assunto: [delphi-br] CodeGear Delphi Day em Português 









  



Pessoal, alguém sabe se já saiu o download? 

Não vi nada no site.



t+,



Leandro



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Enter dentro do DBMemo

2007-12-12 Por tôpico Andre Luis Silveria
if Screen.ActiveControl <> TDbMemo then
VK_RETURN: Perform(WM_NEXTDLGC TL,0,0);

- Mensagem original 
De: Anderson Furtilho <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 12 de Dezembro de 2007 16:27:45
Assunto: [delphi-br] Enter dentro do DBMemo









  





Olá amigos do Forum!!!



Se alguém ja passou por isso e puder me dar uma dica, ficarei 

agradecido!! !



Minha form o KeyPreview esta True e no evento OnKeyDown da mesma esta o 

seguinte código



Case Key of



VK_RETURN: Perform(WM_NEXTDLGC TL,0,0);



End;



O problema esta que quando ele passa por um DBMemo eu gostaria de que ao 

dar o enter ele não mudasse para o proximo controle.



Sei que eu poderia desabilitar o KeyPreview (KeyPreview := False) ai o 

enter pularia de linha dentro do DBMemo, mas o problema é que



esta componente DBMemo é o ultimo componente da form e o usuário costuma 

usar as teclas de atalhos para salvar o cadastro. Desabilitando o 



KeyPreview o restante das teclas de atalho também não funcionária na 

form.



Resumo: Evitar o WM_NEXTDLGCTL, 0,0 ao dar Enter dentro de um DBMemo.



Desde já antecipo meus agradecimentos!



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

http://br.mail. yahoo.com/




  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Loja para comprar livros programa ção..

2007-12-12 Por tôpico Andre Luis Silveria
Ainda não tem nenhum livro sobre o Delphi for PHP lançado, mas com certeza 
logo, logo terá, no mais recomendo acompanhar em revistas, artigos na net, por 
maiores informações sobre esta ferramenta.




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Erros Delphi7 em arquivo Texto..

2007-12-12 Por tôpico Andre Luis Silveria
Somente um detalhe, o MadExcept, não é gratuito se o vc o utilizar em software 
comercial, ou seja se vc vende o seu software, vc deve comprar a licença do 
mesmo. O pessoal não tem o costume de ler o txt de Copyrigth. 
- Mensagem original 
De: Fellipe Henrique <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 11 de Dezembro de 2007 15:33:03
Assunto: Re: [delphi-br] Erros Delphi7 em arquivo Texto..









  



A melhor forma é usando um sistema que captura os erros, o que eu 
uso é

muito bom,  e é gratuito chama-se MadExcept.



Ele gera um report do erro, falando até em qual linha aconteceu o erro, e

tem a opção de gerar um arquivo TXT ou enviar o erro por email.



Recomendo.



[]s



2007/12/11, Alexandre Marinho da Silveira <[EMAIL PROTECTED] com.br>:

>

>   Doretto

>

> Existem várias maneiras de fazer isso. A mais simples que eu conheço é

> essa:

> 1) No private do form principal eu declado um procedure que iriá

> capturar as excessões: procedure CapturaErro( Sender:TObject; E:Exception) ;

> 2) Eu não uso TXT para armazenar os erros, mas um DBF (TDbf). Esse

> componente cria sozinho o arquivo. Os campos são: DATAHORA (TDATETIME),

> FORM (STRING 30), CONTROLE (STRING30) e MENSAGEM (STRING 254);

> 3) O código usado para armazenar os erros é:

>

> procedure TForm1.CapturaErro( Sender:TObject; E:Exception) ;

> var

> msg:string;

> begin

> try

> if not FileExists(GetCurre ntDir+'\erro. dbf') then

> TErro.CreateTable;

> except

> end;

> try

> TErro.Append;

> TErro.FieldByName( 'DataHora' ).AsString: =FormatDateTime( 'dd/mm/

> hh:mm:ss',Now) ;

> TErro.FieldByName( 'Form').AsString :=Screen. ActiveForm. Name;

> TErro.FieldByName( 'Controle' ).AsString: =Screen.ActiveCo ntrol.Name;

> TErro.FieldByName( 'Mensagem' ).AsString: =E.Message;

> TErro.Post;

> except

> end;

> msg:=E.Message+ #10+#10;

> msg:=msg+'Form '+Screen.ActiveForm .Name+#10;

> msg:=msg+'Controle '+Screen.ActiveCont rol.Name;

> MessageDlg(msg, mtError,[mbOK] ,0);

> end;

>

> 4) Para reportar os erros, eu tenho um aplicativo externo que manipula

> essa tabela e permite envia-los por e-mail.

> Se vc quiser sofisticar mais o processo, existem alguns componentes que

> fazem o trabalho, incluindo a linha que gerou o erro. Como eu ainda não

> estou usando eles, não sei como te ajudar nesse caso. Um deles que eu vi

> e achei muito interessante, mas não tive tempo ainda de integrá-lo a

> minhas aplicações é o eXpress Application Manager (XAM for Delphi).

>

> Atenciosamente

>

> Alexandre Marinho da Silveira

>

> Doretto escreveu:

> >

> >

> > Bom dia !!!

> >

> > Programo em delphi7 c/ mssql e gostaria de saber se tem como gerar um

> > arquivo de log (TXT) dos erros que ocorrem no sistema

> >

> > Abraço

> >

> > Doretto

> >

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

> >

> >

> > Mensagens neste tópico

> > <

> http://br.groups. yahoo.com/ group/delphi- br/message/ 180887;_ylc= 
> X3oDMTM4ZmJkaDZi BF9TAzk3NDkwNDM3 BGdycElkAzEwNTg3 NzgEZ3Jwc3BJZAMy 
> MTM3MTExMjY0BG1z Z0lkAzE4MDg4NwRz ZWMDZnRyBHNsawN2 dHBjBHN0aW1lAzEx 
> OTczOTAzMDMEdHBj SWQDMTgwODg3>

>

> > (1) Responder (através da web)

> > <

> http://br.groups. yahoo.com/ group/delphi- br/post;_ ylc=X3oDMTJyY3Jj 
> bWtoBF9TAzk3NDkw NDM3BGdycElkAzEw NTg3NzgEZ3Jwc3BJ ZAMyMTM3MTExMjY0 
> BG1zZ0lkAzE4MDg4 NwRzZWMDZnRyBHNs awNycGx5BHN0aW1l AzExOTczOTAzMDM- 
> ?act=reply& messageNum= 180887>

>

> > | Adicionar um novo tópico

> > <

> http://br.groups. yahoo.com/ group/delphi- br/post;_ ylc=X3oDMTJlZWFz 
> NWQ1BF9TAzk3NDkw NDM3BGdycElkAzEw NTg3NzgEZ3Jwc3BJ ZAMyMTM3MTExMjY0 
> BHNlYwNmdHIEc2xr A250cGMEc3RpbWUD MTE5NzM5MDMwMw- ->

>

> >

> > Mensagens

> > <

> http://br.groups. yahoo.com/ group/delphi- br/messages; _ylc=X3oDMTJlZjR 
> 0azQyBF9TAzk3NDk wNDM3BGdycElkAzE wNTg3NzgEZ3Jwc3B JZAMyMTM3MTExMjY 
> 0BHNlYwNmdHIEc2x rA21zZ3MEc3RpbWU DMTE5NzM5MDMwMw- ->

>

> > | Arquivos

> > <

> http://br.groups. yahoo.com/ group/delphi- br/files; _ylc=X3oDMTJmbXR 
> uZnFkBF9TAzk3NDk wNDM3BGdycElkAzE wNTg3NzgEZ3Jwc3B JZAMyMTM3MTExMjY 
> 0BHNlYwNmdHIEc2x rA2ZpbGVzBHN0aW1 lAzExOTczOTAzMDM ->

>

> > | Fotos

> > <

> http://br.groups. yahoo.com/ group/delphi- br/photos; _ylc=X3oDMTJldmh 
> tNXRtBF9TAzk3NDk wNDM3BGdycElkAzE wNTg3NzgEZ3Jwc3B JZAMyMTM3MTExMjY 
> 0BHNlYwNmdHIEc2x rA3Bob3QEc3RpbWU DMTE5NzM5MDMwMw- ->

>

> > | Links

> > <

> http://br.groups. yahoo.com/ group/delphi- br/links; _ylc=X3oDMTJmdTl 
> oam9rBF9TAzk3NDk wNDM3BGdycElkAzE wNTg3NzgEZ3Jwc3B JZAMyMTM3MTExMjY 
> 0BHNlYwNmdHIEc2x rA2xpbmtzBHN0aW1 lAzExOTczOTAzMDM ->

>

> > | Banco de dados

> > <

> http://br.groups. yahoo.com/ group/delphi- br/database; _ylc=X3oDMTJjcG5 
> kam1qBF9TAzk3NDk wNDM3BGdycElkAzE wNTg3NzgEZ3Jwc3B JZAMyMTM3MTExMjY 
> 0BHNlYwNmdHIEc2x rA2RiBHN0aW1lAzE xOTczOTAzMDM->

>

> >

> > --

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

> >

> > <

> http://br.groups. 

Res: [delphi-br] Evento Gravado (Delphi Day)

2007-12-10 Por tôpico Andre Luis Silveria
No dia do evento foi dito que iria ser disponibilizado o evento em video. Agora 
se vão conseguir não sei, tinha alguns palestrantes que estavam com o camtasia 
ligado e gravando a apresentação, talvez coloquem em outro lugar para download.

- Mensagem original 
De: Jhosef Marks <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 10 de Dezembro de 2007 10:06:32
Assunto: Re: [delphi-br] Evento Gravado (Delphi Day)









  



Vai ser disponibilazado a parte de audio e video??



Em 10/12/07, Andre Luis Silveria <[EMAIL PROTECTED] com.br> escreveu:

>

>   Segundo o Andreano, será disponibilizado essa semana para download.

> Cabe aguardar e acompanhar no dn.codegear. com.br

>

> - Mensagem original 

> De: Leonardo Anselmo <[EMAIL PROTECTED] com.br >

> Para: [EMAIL PROTECTED] os.com.br 

> Enviadas: Domingo, 9 de Dezembro de 2007 21:10:34

> Assunto: [delphi-br] Evento Gravado (Delphi Day)

>

> Pessoal,

>

> Será que vai ser disponibilizado um link pra download do evento Delphi

> Day, com todas as palestras?. Se alguem souber, postem na lista.

>

> Valeu

>

> Leonardo Anselmo

>

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

>

> 

>

> 

>

> 

>

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

> armazenamento!

> http://br.mail. yahoo.com/

>

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

>

>  

>



-- 

Jhosef Marks de Carvalho

Delphi Developer

http://groups. google.com/ group/soumaisdel phi



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Evento Gravado (Delphi Day)

2007-12-10 Por tôpico Andre Luis Silveria
Segundo o Andreano, será disponibilizado essa semana para download.
Cabe aguardar e acompanhar no dn.codegear.com.br


- Mensagem original 
De: Leonardo Anselmo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 9 de Dezembro de 2007 21:10:34
Assunto: [delphi-br] Evento Gravado (Delphi Day)









  



Pessoal,



Será que vai ser disponibilizado um link pra download do evento Delphi Day, com 
todas as palestras?. Se alguem souber, postem na lista. 



Valeu



Leonardo Anselmo



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] OT - Link para o Delphi DAy

2007-12-07 Por tôpico Andre Luis Silveria
Somente lá pelas 09:15, ou mais perto da hora do evento ele ficara habililtado.

- Mensagem original 
De: Fabio <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 7 de Dezembro de 2007 8:49:43
Assunto: Re: [delphi-br] OT - Link para o Delphi DAy









  



Amigos o LINK [ENTER] esta habilitado para voces !!!

para conseguir fazer o acesso 



- Original Message - 

  From: Maria das Graças . 

  To: [EMAIL PROTECTED] os.com.br 

  Sent: Friday, December 07, 2007 8:28 AM

  Subject: Re: [delphi-br] OT - Link para o Delphi DAy



Acho que é esse:

  Para se conectar ao evento acesse: http://borland. interwise. com/borland/ 
iSeminar/ ER1739/ 

  Graça



Andre Luis Silveria <[EMAIL PROTECTED] com.br> escreveu:

  Alguem teria o link para acessar o Delphi Day Online.



Baixei meus emails em casa e não tenho o link aqui na empresa.



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

  http://br.mail. yahoo.com/



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



 - - ---

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



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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] OT - Link para o Delphi DAy

2007-12-07 Por tôpico Andre Luis Silveria
Obrigado a todos que responderam, o link é esse mesmo.




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



[delphi-br] OT - Link para o Delphi DAy

2007-12-07 Por tôpico Andre Luis Silveria
Alguem teria o link para acessar o Delphi Day Online.

Baixei meus emails em casa e não tenho o link aqui na empresa.



  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: Res: Re: [delphi-br] DBGrid

2007-12-05 Por tôpico Andre Luis Silveria

tenta 
DBGrid1.Colunnms[ 0].Title. Caption := 'Valor Empnhado | No

Mês Anterior'; 




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Porque meu form perde o vinculo com o DM?

2007-12-04 Por tôpico Andre Luis Silveria
Se cadastra no Vytryny que lá tem uma sequencia de 8 video aulas sobre 
modularização do Renato Matos, que deu o Minicurso na Borcon deste ano.

- Mensagem original 
De: Alvaro <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 4 de Dezembro de 2007 7:48:03
Assunto: Re: [delphi-br] Porque meu form perde o vinculo com o DM?









  



Tudo Ricardo!



Eu gostaria de modularizar meu sistema em bpls, vc pode me

enviar algum exemplo?



Em 03/12/07, Ricardo Lima <[EMAIL PROTECTED] com> escreveu:

>

>   Uso BDS 2006 e comigo também acontece uma problema semelhante. Meu

> sistema é modularizado em bpls, tem uma bpl que tem um dm com o componente

> de conexão, todas as outras bpls utilizam esse componente .Toda vez que

> abro um form

> sem abrir o dm que está a conexão a ref. é perdida.

>

> Marcos Bernardo escreveu:

> >

> > Salve amigo,

> >

> > Eu tbm sofro com isso..(heheh bug do delphi... diz a lenda),

> > Tanto que criei uma rotina que disparo no beforeOpen dos datasets

> > passando a conexao para eles...

> >

> > abraço

> >

> > Marcos Bernardo

> >

> > Em 03/12/07, Fellipe Henrique <[EMAIL PROTECTED] com 

> >  > escreveu:

> > >

> > > Olá amigos, tenho um projeto que estou tendo um problema...

> > >

> > > Tenho o DM, e nele está minha conexao... blz... e tenho meu form

> > > Principal... o meu Principal está vinculado ao DM, ou seja, tem o DM

> no

> > > uses

> > > dele. O DM está sendo criado ANTES do Principal, no DPR.

> > >

> > > Toda vez que fecho o projeto, e abro novamente, todos os DataSets e

> > > componentes, que tem um vinculo no DM, perde este vínculo. Me forçando

> a

> > > ter

> > > que ir componente por componente a selecionar novamente os vinculos.

> > >

> > > O que pode ser isso? E está acontecendo somente neste projeto, outros

> > > estão

> > > normal.

> > >

> > > Obrigado desde já.

> > >

> > > []s

> > >

> > > --

> > >  _ _ ___

> > > T.·.F.·.A.·.

> > > Fellipe Henrique

> > > [EMAIL PROTECTED] com   > > 40gmail.com>

> 

>

> > >

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

> > >

> > >

> > >

> >

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

> >

> >

>

>  

>



-- 

Att.,

Alvaro Esteves Alves

Analista de Sistemas



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Erro ao verificar campo Nulo do Banco de Dados.

2007-12-03 Por tôpico Andre Luis Silveria
Não seria mas fácil : datamodule. zQuery1.FieldByN ame('codigo' ).IsNull ???


- Mensagem original 
De: Eduardo Silva dos Santos <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 2 de Dezembro de 2007 16:46:18
Assunto: Re: [delphi-br] Erro ao verificar campo Nulo do Banco de Dados.









  



Entre o Delphi 5 e o Delphi 7 várias units foram 
renomeadas/modifica das,

para usar a constante NULL vc deve declarar a unit Variants no seu código.



Em 02/12/07, Ricardo Ravelli  escreveu:

>

>   Boa tarde a todos,

> Estou com um problema, tenho um sistema que desenvolvi em delphi 5, agora

> estou passando ele para delphi 7, quando faça um select e verifico se o

> campo estava nulo eu usava esse comando abaixo, que com o delphi 5

> funcionava perfeitamente.

>

> if (datamodule. zQuery1.FieldByN ame('codigo' ).Value) <> Null then

>

> No delphi 7 a palavra Null ele fala que não está identificado. Alguém sabe

> como posso resolver isso? Existe algum outro comando para resolver esse

> problema?

>

> Sistema Antigo: Delphi 5 Zeos 6.0.12, MySQL 3.23

>

> Sistema Atual: Delphi 7 Zeos 6.1.5, MySQL 3.23

>

> Obrigado

>

> Ricardo Ravelli.

>

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

>

>  

>



-- 

 . . . . ...

Eduardo Silva dos Santos

DRD Sistemas.

(27) 3218-4201

MSN: eduardo.drd@ gmail.com

Site: http://www.drdsiste mas.com/

 . . . . ...



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] CODERAGE

2007-11-26 Por tôpico Andre Luis Silveria
Eu tentei participar mas fica dando que excedeu a quantidade máxima de usuários.
Vc conseguiu logar ?

Queria que se o Andreano ou o Bruno se posicionassem sobre como resolver este 
problema ...



- Mensagem original 
De: Davi Eduardo Borges Wall <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 26 de Novembro de 2007 13:53:17
Assunto: [delphi-br] CODERAGE









  



Alguem ta participando do CodeRage, queria tirar algumas dúvidas



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: RES: RES: [delphi-br] Bruno ou Adreano

2007-11-26 Por tôpico Andre Luis Silveria
http://video.codegear.com/coderage/ragewithus.exe/register

- Mensagem original 
De: Davi Eduardo Borges Wall <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 26 de Novembro de 2007 10:49:27
Assunto: RES: RES: [delphi-br] Bruno ou Adreano









  



Eu acho que sim, lá diz que você ainda pode se registrar



De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em nome de 
Ricardo César Cardoso

Enviada em: segunda-feira, 26 de novembro de 2007 10:30

Para: [EMAIL PROTECTED] os.com.br

Assunto: Re: RES: [delphi-br] Bruno ou Adreano



Exatamente!



Agora uma dúvida... será que eu ainda consigo participar deste evento? Como eu 
faço?



Sds,

Ricardo.



Davi Eduardo Borges Wall <[EMAIL PROTECTED] com.br  > escreveu: Ricardo vc está certo..



Eu estava considerando a hora do lado leste. Que é de 3 horas de diferença se 
não me me engano.



A hora do oeste é bem maior. Então Acho que a palestra vai começar as 14 horas 
é isso Ricardo?



De: [EMAIL PROTECTED] os.com.br   
[mailto:[EMAIL PROTECTED] os.com.br  ] 
Em nome de Ricardo César Cardoso

Enviada em: segunda-feira, 26 de novembro de 2007 10:24

Para: [EMAIL PROTECTED] os.com.br  

Assunto: Re: [delphi-br] Bruno ou Adreano



Pelo plugin que eu tenho aqui para Firefox que mostra a hora em algumas cidades 
do mundo (WorldClock) em Los Angeles, CA ainda são 4:20 da manhã

(10:20 - Horário de Brasília)



Sds,

Ricardo.



Davi Eduardo Borges Wall <[EMAIL PROTECTED] com.br    > escreveu: Pessoal, ainda não 
começou CodeRage II? Na página mostra que o primeiro evento começa as 8:30 AM. 
Mas quando vc clica na sala, mostra Time 12:00 pm.



O ícone "ENTER" não está habilitado. Eu acho que já são 8:30 la na Califórnia 
não ? por que nas informações da sala mostra 12:00 pm???



[]'s



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



 - - ---

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



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



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



 - - ---

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



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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: RES: RES: [delphi-br] Bruno ou Adreano

2007-11-26 Por tôpico Andre Luis Silveria
http://conferences.codegear.com/coderage07/

- Mensagem original 
De: Davi Eduardo Borges Wall <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 26 de Novembro de 2007 10:49:27
Assunto: RES: RES: [delphi-br] Bruno ou Adreano









  



Eu acho que sim, lá diz que você ainda pode se registrar



De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em nome de 
Ricardo César Cardoso

Enviada em: segunda-feira, 26 de novembro de 2007 10:30

Para: [EMAIL PROTECTED] os.com.br

Assunto: Re: RES: [delphi-br] Bruno ou Adreano



Exatamente!



Agora uma dúvida... será que eu ainda consigo participar deste evento? Como eu 
faço?



Sds,

Ricardo.



Davi Eduardo Borges Wall <[EMAIL PROTECTED] com.br  > escreveu: Ricardo vc está certo..



Eu estava considerando a hora do lado leste. Que é de 3 horas de diferença se 
não me me engano.



A hora do oeste é bem maior. Então Acho que a palestra vai começar as 14 horas 
é isso Ricardo?



De: [EMAIL PROTECTED] os.com.br   
[mailto:[EMAIL PROTECTED] os.com.br  ] 
Em nome de Ricardo César Cardoso

Enviada em: segunda-feira, 26 de novembro de 2007 10:24

Para: [EMAIL PROTECTED] os.com.br  

Assunto: Re: [delphi-br] Bruno ou Adreano



Pelo plugin que eu tenho aqui para Firefox que mostra a hora em algumas cidades 
do mundo (WorldClock) em Los Angeles, CA ainda são 4:20 da manhã

(10:20 - Horário de Brasília)



Sds,

Ricardo.



Davi Eduardo Borges Wall <[EMAIL PROTECTED] com.br    > escreveu: Pessoal, ainda não 
começou CodeRage II? Na página mostra que o primeiro evento começa as 8:30 AM. 
Mas quando vc clica na sala, mostra Time 12:00 pm.



O ícone "ENTER" não está habilitado. Eu acho que já são 8:30 la na Califórnia 
não ? por que nas informações da sala mostra 12:00 pm???



[]'s



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



 - - ---

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



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



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



 - - ---

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



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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] AdoQuery: Command Text does not return a result set

2007-11-21 Por tôpico Andre Luis Silveria
Tente usar o execsql ou execute (não lembro agora) somente não use o open, ele 
exige que se retorne um cursor de dados, e o update/insert/delete não retorna 
um cursor.

- Mensagem original 
De: Ricardo César Cardoso <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 21 de Novembro de 2007 12:12:49
Assunto: Re: [delphi-br] AdoQuery: Command Text does not return a result set









  



Boa tarde!



Pode estar ocorrendo de nenhum registro no seu BD satisfazer aos parâmetros 
informados.



Sds,

Ricardo.



Junior  escreveu:   Estou 
tentando executar este comando via ADOQuery, porém ele está retornando

 

 “Command Text does not return a result set”

 

 UPDATE PRODUTOS

 

 SET PRECO_CUSTO= :PRECO_NORMAL

 

 CODIGO_BARRAS   = :CODIGO_BARRAS,

 

 CODIGO_ORIGINAL= :CODIGO_FORNECEDOR,

 

 PRECO_VENDA   = (PRECO_CUSTO + ((PRECO_CUSTO/ 100.00)*LUCRO) )

 

 WHERE CODIGO_FORNECEDOR = :CODIGO

 

 -Os campos da tabela estão corretos

 

 -Parameters estão preenchidos corretos (o próprio ADOQuery assume : como

 parametro)

 

 -DataSource ligado corretamente na tabela de Produtos.

 

 O que pode estar errado ?

 

 Desde já muitíssimo obrigado pela atenção

 

 Atenciosamente,

 

 Junior

 

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

 

 

 

 _



 - - ---

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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] inserir dados usando ibdataset

2007-11-21 Por tôpico Andre Luis Silveria
Já tentou passar direto ?

dm1.Internacao. ParamByName( 'HORA').AsTime := Time();

ou guardar em uma variável do tipo TTime e passar ela ?
Tempo : TTime;

Tempo := Time();


dm1.Internacao. ParamByName( 'HORA').AsTime := Tempo;

- Mensagem original 
De: inacio_mecena <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 21 de Novembro de 2007 11:51:57
Assunto: [delphi-br] inserir dados usando ibdataset









  



Ola pessoal bom dia.. seguinte estou com os seguintes problemas.. eu

crei um campo Hora do tipo time.. ai config o ibdataset tudo certinho

ele ta inserindo os dados.. so q eu to precisando pegar o parametro da

hora q el coloquei em um label com o seguinte codigo



lbHora.Caption := TimeToStr(time) ;



so q dai qdo eu vou salvar ele me fala q '0.38363000' não é um valor de

marca de tempo(timestamp) valido... dai mudei la no meu banco o campo

hora para timestamp mas mesmo assim o problema perdura..



e tbm gostaria de saber como faço para passar os parametros para o

ibdataset pq to usando o seguinte codigo.



dm1.Internacao. ParamByName( 'HORA').AsTime := lbHora.capiton;



ele fala q nao encontrou o campo hora qdo eu vou dar um post..



espro q tenham entendido a minha duvida.. att..



Inacio Mecena






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Delphi for php

2007-11-20 Por tôpico Andre Luis Silveria
desculpe: delphi_php_oficial

- Mensagem original 
De: Nilson Chagas <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 20 de Novembro de 2007 17:26:49
Assunto: [delphi-br] Delphi for php









  



Os nobre colegas poderiam me dizer (principalmente os caras do 
CodeGear

rsrsrs),



Onde encontro uma lista tão boa como esta que trate do Delphi for PHP???



[]s

Nilson Chagas.



-- 

Visite:

Fundamental: www.amados.com. br

Dúvidas:http://nilsoftware. blogspot. com/

Obrigatório: www.saopaulofc. com.br



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Delphi for php

2007-11-20 Por tôpico Andre Luis Silveria
delphi_for_php aqui mesmo no Yahoo, oficial da Codegear ...

- Mensagem original 
De: Nilson Chagas <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 20 de Novembro de 2007 17:26:49
Assunto: [delphi-br] Delphi for php









  



Os nobre colegas poderiam me dizer (principalmente os caras do 
CodeGear

rsrsrs),



Onde encontro uma lista tão boa como esta que trate do Delphi for PHP???



[]s

Nilson Chagas.



-- 

Visite:

Fundamental: www.amados.com. br

Dúvidas:http://nilsoftware. blogspot. com/

Obrigatório: www.saopaulofc. com.br



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Procurar registro no ClientDataSet

2007-11-12 Por tôpico Andre Luis Silveria
Vc criou o campo no FieldEditor ???



- Mensagem original 
De: André Luis de Oliveira <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 12 de Novembro de 2007 12:04:13
Assunto: Re: [delphi-br] Procurar registro no ClientDataSet









  



Eitá nois ...rs, não vou falar nada sobre seu comentario.. . hehehe



Vamos direto ao q interessa.



Não fucinou pelo seguinte, o CPF existe no cdsTemp e sempre me retorna q não 
achou.



- Original Message - 

  From: Davi Eduardo Borges Wall 

  To: [EMAIL PROTECTED] os.com.br 

  Sent: Monday, November 12, 2007 11:54 AM

  Subject: RES: [delphi-br] Procurar registro no ClientDataSet



Não funciona ... E ... ???



Eu fico meio revoltado com esse tipo de solicitação de ajuda.



Não há nenhuma pergunta, só afirmações. André eu te pergunto, imagine você 
recebendo esse e-mail de alguém lhe solicitando ajudacomo vc faria pra 
ajudar a pessoa?



Depois do puxão de orelha Vamos lá...



Bom primeiramente, O que te levou a pensar que isso não funcionou?



De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em nome de 
André Luis de Oliveira

  Enviada em: segunda-feira, 12 de novembro de 2007 11:47

  Para: Delphi BR

  Assunto: [delphi-br] Procurar registro no ClientDataSet



Criei um ClientDataSet em run-time. Crio o ClientDataSet e atualizo com os 
dados.

  Quando uso a função para testar se existe o registro, não funciona: if not 
cdsTemp.Locate( 'CPFTITULAR' , '12541225', []) then.



André Luis de Oliveira

  Analista de Sistemas

  E-mail: [EMAIL PROTECTED] amp.com.br  

  ( (19) 3322-4018

  Skype: al_oliveira



Uniodonto Campinas

  Av. Brasil, 200 - Campinas/SP

  ( (19) 3322-4000

  Visite nosso site: www.uniodontocamp. com.br



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



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



 - - - - - -



No virus found in this incoming message.

  Checked by AVG Free Edition. 

  Version: 7.5.503 / Virus Database: 269.15.30/1125 - Release Date: 11/11/2007 
21:50



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Erro no delphi7 c/ dbexpress

2007-11-09 Por tôpico Andre Luis Silveria
Já tentou refazer a conexão.
Tipo de se der a mensagem, então sqlconnection.Close e depois sqlConection.Open;

- Mensagem original 
De: Doretto <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 9 de Novembro de 2007 12:26:05
Assunto: [delphi-br] Erro no delphi7 c/ dbexpress









  



Boa tarde !!!



Tenho uma banco de dados mssql2000 em um servidor remoto e acesso ele pela net, 
e as vezes quando esta usando o sistema da a seguinte mensagem de erro



"NÃO É POSSÍVEL CRIAR UMA NOVA CONEXÃO" . Quando da a mensagem eu tenho que 
entrar o sair do sistema para voltar a funcionar.



Alguém poderia me dar uma luz



Abraço



Doretto



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Biometria

2007-11-09 Por tôpico Andre Luis Silveria
www.neokoros.com

Marco Cesar Chaul - Diretor


- Mensagem original 
De: MiNuTo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 9 de Novembro de 2007 11:37:31
Assunto: [delphi-br] Biometria









  



Galera , quem teve na Borcon , na palestra de Biometria , poderia 
me passar o site do palestrante . 



Agradeço...



Horacio



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: RES: [delphi-br] Sistema em Delphi 7, num Athlon 64, pode dar algum problema?

2007-11-08 Por tôpico Andre Luis Silveria
Vai em project options -> aba compiler e marque a opção use debug DCUs, se não 
estiver habilitado, vá em Linker e marque no Map File o Detailed, e marque o 
Debug DCUs.

Marque a linha com um breakpoint e debug linha a linha que vc vai descobrir o 
porque do erro.

Por acaso o valor que está sendo atribuido não está null ou está, já tive um 
problema parecido.

ou se desejar mande o que o MadException está relatando que analisamos.

- Mensagem original 
De: Davi Eduardo Borges Wall <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 8 de Novembro de 2007 17:10:46
Assunto: RES: [delphi-br] Sistema em Delphi 7, num Athlon 64, pode dar algum 
problema?









  



Eu boto fé que o problema não é o botão.





Mas assim, Felipe, você já tentou colocar essa linha em comentário ? e tentar 
fazer o erro acontecer novamente? Ele não acontece?





 





De: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] Em nome de 
Andre Luis Silveria


Enviada em: quinta-feira, 8 de novembro de 2007 17:06


Para: [EMAIL PROTECTED] os.com.br


Assunto: Res: [delphi-br] Sistema em Delphi 7, num Athlon 64, pode dar algum 
problema?





 





Não seria mais facil desabilitar o botão quando ele entrar no onclose, ou então 
quando ele clicar nele 





- Mensagem original 


De: Fellipe Henrique <[EMAIL PROTECTED] com <mailto:fellipeh% 40gmail.com> >


Para: [EMAIL PROTECTED] os.com.br <mailto:delphi- br%40yahoogrupos .com.br> 


Enviadas: Quinta-feira, 8 de Novembro de 2007 16:48:16


Assunto: Re: [delphi-br] Sistema em Delphi 7, num Athlon 64, pode dar algum 
problema?





eu sei que o erro na linha, porque o MadException me fala que é nele... já





tentei de tudo... parece que agora, é porque o usuario está dando Enter





muito rápido... tipo...tenho um botao, que chamo um Form em ShowModal,





quando fecho o form, processo algo, e normalmente dá uma travadinha de um 1





segundo.. mas aí o usuário já apertou um monte de vezes o ENTER, e ao





terminar o processo, é disparado esses ENTER e saí abrindo as telas.. to





achando que é isso, o motivo...





Alguém sabe, como faço pra limpar as teclas pressionadas no teclado? tipo,





no OnClose do Form, eu colocaria essa funcao, se ele apertasse mais vezes,





nao faria diferença, seria tudo anulado depois...





[]s





Em 08/11/07, Davi Eduardo Borges Wall <[EMAIL PROTECTED] com.br> escreveu:





>





> Esses AV perdidos são horríveis de se achar.





>





> Pode ter certeza que é um problema de lógica do seu programa e não um





> problema de processador.





>





> Faça o seguinte, coloque esta linha em comentário. Se você está





> atravessando memória é provável que ocorra AV em alguma linha próxima a





> esta.





>





> Eu tenho um problema parecido, quando executo um processo agendado na





> saída do servidor de aplicação gera um AV no free de um XMLDocument.





>





> Depurando percebi que era impossível dar erro nesse free, então coloquei a





> linha em comentário e deu o erro na próxima linha no free de outro objeto





> nada a ver.





>





> Bom, se você quer saber como eu resolvi este problema, eu não resolvi





> ainda.. RS.. tenho outras coisas pra fazer no momento... RS...





>





> []'s





>





> De: [EMAIL PROTECTED] os.com.br  [mailto:





> [EMAIL PROTECTED] os.com.br ] Em nome de





> Fellipe Henrique





> Enviada em: quinta-feira, 8 de novembro de 2007 16:16





> Para: [EMAIL PROTECTED] os.com.br 





> Assunto: [delphi-br] Sistema em Delphi 7, num Athlon 64, pode dar algum





> problema?





>





>





> Amigos, seguinte... tenho um sistema que roda em 8 máquinas, em rede, e o





> servidor é um AMD Athlon(tm) 64 Processor 3000+, rodando o Firebird 2.1.





>





> Bom, meu sistema é feito em Delphi 7, e estou tendo um problema, que está





> dando AV quase toda hora, e já vi que não é possível dar erro no local





> onde





> ele está dando, pois eu simplesmente faço isso:





>





> TbPrincipalVALOR. AsCurrency := 10;





>





> Queria saber, se alguem está tendo problema num processador 64bits, ou se





> é





> conhecido algum problema de sistemas no processador 64bits.





>





> Ah.. o S.O. é um Windows XP Prof. SP2.





>





> Desde já agradeço.





>





> []s





>





> --





>  _ _ ___





> T.·.F.·.A.·.





> Fellipe Henrique





> [EMAIL PROTECTED] com  <mailto:fellipeh% 40gmail.com>





>





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





>





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





>





> 





>





-- 





 __

Res: [delphi-br] ClientDataset-Campos não aceitam valor nulo

2007-11-08 Por tôpico Andre Luis Silveria
Já tirou o required = true do campo ?



- Mensagem original 
De: Yahoo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 8 de Novembro de 2007 10:49:54
Assunto: Re: [delphi-br] ClientDataset-Campos não aceitam valor nulo









  



Vitor,



O problema é este. Eu não dou o ApplyUpdates, dou somente o Post, mas acontece 
o erro mesmo assim.



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] <<< Memória livre insuficie nte... - Win98 >>>

2007-11-08 Por tôpico Andre Luis Silveria
Isto é limitação do sistema operacional e não tem a haver muito com a 
quantidade de memória que o sistema usa.
olha está thread aqui: 
http://groups.google.com.br/group/borland.public.delphi.objectpascal/browse_thread/thread/47c0e0612f1827bb?hl=pt-BR&lr=&frame=right&seekm=3af7acd9_1%40dnews

Está mais relacionado a quantidade de resources que o aplicativo tem disponível 
no sistema operacional.

- Mensagem original 
De: Juliano Silva - Yahoo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 8 de Novembro de 2007 9:55:05
Assunto: [delphi-br] <<< Memória livre insuficiente... - Win98  >>> 









  



Bom dia pessoal, 



Estou com um problema gigantesco, recentemente em minha aplicação, após

adicionar formulários simples com poucas coisas, ao executar .exe em micros

com sistema operacional Win98 com 200Mb de memória está apresentando a

seguinte mensagem “Memória livre insuficiente para executar esse programa.

Feche um ou mais programas e tente novamente.”. 



Não foi adicionado nada de mais no fonte, já dei uma bela pesquisada e ví

que este erro ocorre com freqüência com diversos programadores, mas não

consegui achar nenhuma solução, e olhando pelo WinXP pelo Gerenciador de

Tarefas, ao carregar a aplicação ela consome apenas 15Mb de memória.



O .exe hoje tem 17.7Mb e utilizo o Delphi2006



Atenciosamente



Juliano Silva



No virus found in this incoming message.

Checked by AVG Free Edition.

Version: 7.5.503 / Virus Database: 269.15.24/1117 - Release Date: 07/11/2007

22:52



No virus found in this outgoing message.

Checked by AVG Free Edition. 

Version: 7.5.503 / Virus Database: 269.15.24/1117 - Release Date: 07/11/2007

22:52

 



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Dúvida sobre Records

2007-11-06 Por tôpico Andre Luis Silveria
total= length(rec.nome) + length(rec.Endereco) + length(rec.LF);

- Mensagem original 
De: Daniel Bastos <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 6 de Novembro de 2007 11:55:40
Assunto: [delphi-br] Dúvida sobre Records









  



Bom dia meus caros.

estou na dúvida em uma parada aqui e vê se vcs podem me dar uma luz:

eu tenho um record mais ou menos assim;



type

  rcd = Record

Nome : array [1..10] of char;

Endereco : aray [1..20] of char;

LF : array [1..2] of char;

  end;



Bom, este record eu uso para abrir um arquivo txt dividido por colunas

(igual aqueles arquivos de retorno e remessa de banco).

Eu gostaria de saber se é possível saber o tamanho total do record, tipo:

Tamanho do 1º elemento + Tamanho do 2º elemento + Tamanho do 3º elemento.

é possível?



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] DESESPERADO!!!!

2007-11-06 Por tôpico Andre Luis Silveria
Tenta entrar em contato com este pessoal: [EMAIL PROTECTED]
Eles são feras em Interação Biométrica e a rotinas deles funcionam com qualquer 
leitor, e funcionam mesmo.
Eles fizeram uma palestra na Borcon sobre isso.
Pode falar em Meu nome, Andre da Siagri Sistemas.

- Mensagem original 
De: Felipe Nunes <[EMAIL PROTECTED]>
Cc: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]; AutomacaoTotal <[EMAIL 
PROTECTED]>
Enviadas: Terça-feira, 6 de Novembro de 2007 9:24:20
Assunto: [delphi-br] DESESPERADO









  



Galera, eu ja estou ficando desesperado com esse leitor da 
microsoft, o dia

da apresentação do meu pcc ja está xegando e essa droga de leitor não

funciona, ja tentei de todas as formas e nada.

 

Grfinger, Grfinger Identity nada reconhece a leitura do aparelho.

 

Ficaria grato demais se alguém pudesse me ajudar, nem que seja so pra

retornar um inteiro na leitura, ou uma stringso pra mim conferir com um

valor..

 



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Testando campos no delphi

2007-11-06 Por tôpico Andre Luis Silveria
Eu Faço assim

function Valida(Campo : Integer;)
begin
Result := True
if campo = 1 then
begin
if edit1.text = '' then
begin
Aviso('O Campo tal deve ser preenchido!');
edit1.SetFocus;
   Result := False
end;
 end;

if campo = 2 then

begin

if DbDate.Date = 0 then

begin

Aviso('O Campo data deve ser preenchido!');

   dbDate.SetFocus;

   Result := False

end;

 end;

end;

em cada campo que quero testar chamo assim:

if Not valida(1) then
Abort;

Se preciso testar mais de um:
if (Not valida(1)) or (Not Valida(2)) then

Abort;


- Mensagem original 
De: itasouza <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 5 de Novembro de 2007 13:14:01
Assunto: [delphi-br] Testando campos no delphi









  



Valeu Adriano Santos pelo código exemplo, suas dicas são valiosas.



Mais uma dúvida!!

Amigos



Estou precisando testar alguns campos, então declarei as procedure:



procedure Alteracao1;

procedure Alteracao2;



E tenho o meu código:



procedure TfrmAlteracao. Alteracao1;

begin

//1º teste

if DBEditInicialAltera cao1.Text = DBEditInicioEfetiva da.Text then

begin

if Application. MessageBox( 'A Data Inicial Efetivada está igual a

anterior, Deseja Alterar?','Confirme ',MB_YESNO+ MB_ICONQUESTION) =

MRYES then

begin

DBEditInicialAltera cao1.SetFocus;

Exit;

end;

end

end;



procedure TfrmAlteracao. Alteracao2;

begin

//2º teste

if DBEditFinalAlteraca o1.Text = DBEditFinalEfetivad a.Text then

begin

if Application. MessageBox( 'A Data Final Efetivada está igual a

anterior, Deseja Alterar?','Confirme ',MB_YESNO+ MB_ICONQUESTION) =

MRYES then

begin

DBEditFinalAlteraca o1.SetFocus;

Exit;

end;

end

end;



O problema e que precisava fazer os dois testes dentro de uma só

procedure pois da forma que está o sistema não da tempo para

alteração e já vai testando o outro campo na seqüência., o correto

seria jogar o foco no campo e parar caso a alternativa seja sim, se a

alternativa for não, então ele testa o outro campo seguindo a mesma

seqüência.



Alguém poderia dizer o que está errado ou faltando neste código?



Agradeço..






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



[delphi-br] Problemas com Tipos Complexos em WebService

2007-10-24 Por tôpico Andre Luis Silveria
Bom dia a todos,

Estou com um problema na declaração e uso de tipos complexos utilizando uma 
integração entre o ERP da Empresa e um Webservice.

Este webservice vai me retornar um objeto com o resultado da requisição, mas 
quando faça a importação do WSDL não é criada a classe do obejto de retorno. 
Não deveria cria-la ou falei besteira ?

Criei o objeto na mão, como sendo TRemotable, mas quando tento dar um 
create ou atribuí-lo com o resultado do webservice, dá access violation. 
Registrei ele com o RemClassRegistry.RegisterXSClass. Onde poderia estar 
errando ?

A todos aqueles que puderem me ajudar, meu muito obrigado.

Atenciosamente, 

André Luis da Silveira.






  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Delphi+PostGres+Replicação

2007-10-19 Por tôpico Andre Luis Silveria
Tentou abrir e fechar o AdoConnection ?


- Mensagem original 
De: Claudiney Cogo <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 19 de Outubro de 2007 18:14:42
Assunto: Re: [delphi-br] Delphi+PostGres+Replicação









  



Boa tarde a todos...



Venho mais uma vez buscar a ajuda de vocês, porque já queimei alguns bons 
neurônios e nada... rsrs

O problema é o seguinte:



Minha aplicação usa Delphi 7 + ADO + Sql Server. Até aí tudo tranquilo.

Tenho um form onde cadastro uma determinada tabela. Ela tem uma tabela filha, 
ligada por master source. Também sem problema até aqui. Num determinado momento 
eu preciso fazer algumas inserções nessa tabela, num laço while. Essas 
inserções eu faço usando SQL (insert into tabela ...). Funciona. O problema é 
que logo após sair do laço as informações da tabela não são atualizadas. Como 
se faltasse o applyupdates num insert pelo dataset. Mesmo fechando a tabela e 
abrindo de novo os dados permanecem os antigos. Só atualiza quando saio do 
sistema e volto, fechando a conexão. Sei que devo ter errado ou esquecido 
alguma coisa no meio do caminho. Mas já queimei muitos neurônios e não acho o 
problema. Já fui no google pesquisar e nada a respeito. Help do delphi, nada. 
Mensagens do delphi-br e nada. Ou dei muito azar na hora da busca, ou procurei 
pelos termos errados. O caso é que preciso resolver e não encontrei nada. Sei 
que deve ser alguma
 idiotice que fiz, mas se alguém puder dar uma luz, fico agradecido.



Abraço a todos.



 _ _ ___

Claudiney Cogo

N2 Sistemas e Soluções em Informática

Av. São Paulo, 172 - 15º Andar - Sala 1505

Maringá - Paraná

www.n2solutions. com.br



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] [OFF] Por que TEdit para alterar campos?

2007-10-19 Por tôpico Andre Luis Silveria
Desculpe é TDataSetProvider ...

- Mensagem original 
De: Ricardo Bianchin <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 19 de Outubro de 2007 16:16:41
Assunto: Re: [delphi-br] [OFF] Por que TEdit para alterar campos?









  



eu uso o D7 e nao achei o TDataProvider



fui no google e ta me dando indicios q so tem no D200x



sabem dizer se ele tem só nas versoes novas do delphi?

ou se é componente de terceiros?



Em 19/10/07, Andre Luis Silveria <[EMAIL PROTECTED] com.br> escreveu:

>

>   usamos com Firebir o trio TSQLQuery + TDataProvider + TClientDataSet e é

> só alegria ...

>

> Como já disseram aqui, tudo serve na programação basta saber como e onde

> aplicar.

>

> - Mensagem original 

> De: Ricardo Bianchin  40yahoo.com. br>

> >

> Para: [EMAIL PROTECTED] os.com.br 

> Enviadas: Sexta-feira, 19 de Outubro de 2007 15:50:31

> Assunto: Re: [delphi-br] [OFF] Por que TEdit para alterar campos?

>

> Srs,

>

> no tempo do delphi 6 eu usava access

>

> sempre usei datawares

>

> ha 1 ano tive q migrar pro firebird

>

> quando fui usar os datawares me deparei/aprendi na marra q só podia fazer

>

> next e first num dataset, q nao poderia mais usar o DBGrid e etc

>

> na epoca tive q largar os datawares e usar o tedit, stringgrid.

>

> tentei usar o SimpleDataSet mas quando um dado quebrara uma regra de

> negocio

>

> no bd ele apenas nao gravava e nao se sabia pq nao gravou

>

> desde aquela epoca minha vida tem sido um inferno por nao poder usar

>

> datawares no firebird pq ele é um bd unidirecional

>

> realmente tenho q usar TEdits neste caso ou os amigos sabem de algo q

>

> buferise os dados num TDataset?

>

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

>

> 

>

> 

>

> 

>

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

> armazenamento!

> http://br.mail. yahoo.com/

>

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

>

>  

>



-- 

Atenciosamente,

Ricardo Bianchin

 ~ ~ ~~

"Educating is having hope in the future!"

 ~ ~ ~~

"Batman cured us of the fear of the dark.

Superman taught us to look to the light."

 ~ ~ ~~

O que impressiona não é o grito dos maus;

é o silêncio dos bons.(M.L.King)

 ~ ~ ~~



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] [OFF] Por que TEdit para alterar campos?

2007-10-19 Por tôpico Andre Luis Silveria
usamos com Firebir o trio TSQLQuery + TDataProvider + TClientDataSet e é só 
alegria ...

Como já disseram aqui, tudo serve na programação basta saber como e onde 
aplicar.

- Mensagem original 
De: Ricardo Bianchin <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 19 de Outubro de 2007 15:50:31
Assunto: Re: [delphi-br] [OFF] Por que TEdit para alterar campos?









  



Srs,

no tempo do delphi 6 eu usava access

sempre usei datawares



ha 1 ano tive q migrar pro firebird



quando fui usar os datawares me deparei/aprendi na marra q só podia fazer

next e first num dataset, q nao poderia mais usar o DBGrid e etc



na epoca tive q largar os datawares e usar o tedit, stringgrid.

tentei usar o SimpleDataSet mas quando um dado quebrara uma regra de negocio

no bd ele apenas nao gravava e nao se sabia pq nao gravou



desde aquela epoca minha vida tem sido um inferno por nao poder usar

datawares no firebird pq ele é um bd unidirecional



realmente tenho q usar TEdits neste caso ou os amigos sabem de algo q

buferise os dados num TDataset?



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] ot - Como concorrer???

2007-10-19 Por tôpico Andre Luis Silveria
Se posso falar com franqueza, esses programas são todos uns lixos, só fazem 
o básico do básico, além de serem todos (ou quase) em paradox, sem nenhuma 
estruturação de programação, vai te dar mais trabalho alterar eles do que fazer 
um do zero, por isso não me preocupo muito com isso, quem compra isto aí é mais 
burro do que se pensa, pois está comprando uma bomba e não sabe como desarmar 
ela.

Atenciosamente,

André Luis da Silveira.

- Mensagem original 
De: Nilson Chagas <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 19 de Outubro de 2007 7:15:34
Assunto: [delphi-br] ot - Como concorrer???









  



Não estou fazendo propaganda, mesmo porque não vou ganhar nada com 
isto...

mas alguém já viu esta pagina:

http://www.csimaste r.com/loja/ default.php



Pergunto isto pelo fato de saber que muitos aqui lutam para sobreviver da

programação e tem um site que vende um monte de coisa com codigo fonte...



Como concorrer com isto???



[]s

Nilson Chagas



-- 

Visite:

Fundamental: www.amados.com. br

Dúvidas:http://nilsoftware. blogspot. com/

Obrigatório: www.saopaulofc. com.br



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] string representando inteiro em dbGrid - Ajuda !!!

2007-10-18 Por tôpico Andre Luis Silveria
usa o evento ongettext e settext do Tfield para converter as informações.

- Mensagem original 
De: Flavio <[EMAIL PROTECTED]>
Para: Grupo_Delphi 
Enviadas: Quarta-feira, 17 de Outubro de 2007 16:44:15
Assunto: [delphi-br] string representando inteiro em dbGrid - Ajuda !!!









  



Olá pessoal, boa tarde...



Minha dúvida é rápida: gostaria de saber se consigo inserir um comboBox (ou 
pickList) com ítens (comboBox) do tipo string, mas representando inteiros, em 
um dbGrid (usando ADOQuery) ?!



Por exemplo: tenho três tipos de diversidade étnica: negro, branco, mulato, 
porém cada um representado como um número no banco de dados Sql Server 2000.

branco = 1 (no banco)

negro = 2 (no banco)

mulato = 3 (no banco)

Quero mostrar no dbGrid um selecionador de ítens (pickList) contendo os valores 
branco, negro, mulato.



A verdade é que eu teria que fazer esse tipo de "conversão" a nível de banco de 
dados, porém já comecei o projeto.



Obrigado pela atenção.

Abrss..

Flávio.

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



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






  
























  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



Res: [delphi-br] Delphi e Excell

2007-10-16 Por tôpico Andre Luis Silveria
Usando ADO vc pode usar as planilhas Excel como se fossem uma base de dados 
normal.

Vou tentar colocar nos arquivos do grupo um exemplo.

- Mensagem original 
De: Vinicius da Silva Pinto <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 16 de Outubro de 2007 9:09:45
Assunto: [delphi-br] Delphi e Excell









  



Bom dia a todos.

Estou precisando de umas dicas e sugestões.

Um cliente me procurou e me pediu um sistema pequeno, um cadastro de

clientes e tipos de serviços que ele presta.

Só que ele quer que as tabelas sejam em excell, pois ele pretende

transportar essas tabelas para o Palm, laptop, micro de casa e do trabalho,

ou seja, essas tabelas irão pular feito pipoca pra lá e pra cá.

Eu tenho licença do D4 e D7 e nunca trabalhei com excell.

Minhas perguntas são:

Com qual das duas eu poderia ter um melhor rendimento e maior facilidade pra

desenvolver?

Preciso que algum componente externo?

Alguem poderia me passar umas dicas?

Obrigado por qq ajuda.



Vinicius S. Pinto

VSP Consultoria e Informática.

21 8816-2404






  
















  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

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



  1   2   >