[delphi-br] O Palácio Maravilhoso

2008-03-21 Por tôpico Juarez Mendes 
*O Palácio Maravilhoso*

Conta-se que certa vez, um rei do Iêmen, chamado Hiamir, chamou um dos seus
ministros e disse-lhe: "quero fazer longa viagem à Tiapur, uma região
longínqua, pobre e triste, árida e sem conforto.

Determino que vá antes de mim, e logo que lá chegar, mande que seja
construído um magnífico palácio, com largas varandas de marfins e pátios
floridos.

Nesse palácio ficarei hospedado durante uma temporada, com tranqüilidade e
conforto."

O Vizir respondeu humildemente: "escuto e obedeço, ó rei."

Dias depois o Vizir partiu, em uma caravana com numerosos camelos carregados
de ouro.

Ao chegar à cidade o Vizir ficou desolado com o estado de abandono em que se
achava o povo.

Encontrou pelas estradas crianças famintas e centenas de infelizes, morrendo
de inanição.

Os quadros de miséria e sofrimento que se desenrolavam, a cada passo e a
todo instante, torturavam o coração do poderoso ministro.

Ele trouxera mais de trinta mil dinares, que deveriam ser gastos na
construção de um grandioso palácio!

Que fez o Vizir?

Levado por um impulso irresistível, em vez de executar a ordem do rei,
resolveu gastar o dinheiro que trazia, beneficiando a infeliz população.

Mandou construir abrigos para os desamparados.

Distribuiu mantimentos entre os mais necessitados.

Determinou que todos os enfermos fossem, sem demora, medicados e forneceu
pão aos que padeciam fome.

Ao fim de alguns meses, notava-se uma transformação completa da cidade.

Os homens haviam voltado ao trabalho e por toda a parte reinava a alegria.

As crianças brincavam nos pátios e as mulheres cantavam nas portas das
tendas.

E do palácio maravilhoso, encomendado pelo rei, nada existia...

Quando o rei Hiamir chegou a Tiapur foi recebido por uma grande manifestação
de júbilo da população.

"Sinto-me feliz" - confessou o monarca - "por saber que sou sinceramente
estimado pelos meus súditos.

Mas onde está o palácio de Tiapur?" Perguntou.

"Antes de falar do palácio, ó rei, tenho um pedido a lhe fazer." Disse-lhe o
Vizir.

"Segundo as leis, aquele que o desobedecer, praticando um abuso de
confiança, deve ser condenado à morte.

Pois, houve, ó rei, um homem de sua confiança que praticou tal delito.

Espera-se que seja determinada a execução do culpado sem demora." Disse o
Vizir serenamente.

"Quem é o acusado?" Questionou o rei.

"O criminoso sou eu." Disse o Vizir sem hesitar.

E sem ocultar a menor parcela da verdade, o Vizir descreveu a miséria em que
se encontrava o povo.

Por fim, confessou que, penalizado diante de tanto sofrimento, em vez de
construir o palácio real, resolveu gastar os recursos que lhe foram
confiados para mudar a triste sorte da população.

"Não cumpri a ordem recebida, por isso aguardo o castigo de que me fiz
merecedor." Concluiu.

"Levante-se, meu amigo." Ordenou emocionado o rei. "Vejo que seu trabalho é
responsável pela edificação do mais belo dos palácios que já conheci. Vejo
as torres cintilantes nas fisionomias alegres das crianças; admiro as largas
varandas de marfim no sorriso radiante dos meus súditos; reconheço os pátios
floridos no olhar de gratidão das mães felizes. Como é majestoso e belo, ó
Vizir, o palácio que a sua bondade fez se erguer nas terras de Tiapur."

...

Cada um é responsável pela destinação que der à riqueza que lhe for
confiada, seja ela representada por recursos materiais ou por aptidões
profissionais.

Cada qual, pelo uso de seus próprios talentos, é capaz de alterar o mundo,
distribuindo alegrias ou acumulando dores.



do livro os Melhores contos, de Malba Tahan, ed. Record, 2002.





Uma feliz páscoa a todos!!! São meus sinceros votos a todos meus amigos!


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

[delphi-br] TSC da Filizona 146

2007-01-05 Por tôpico Juarez Mendes 
Pessoal, eu não acho para download em nenhum lugar o TSC da Filizola versão
1.4.6. Só me serve esta versão. Alquém poderia me dispobilizar ou dizer onde
eu encontro este aplicativo para download? Vale ressaltar que não é
pirataria pois o mesmo é distribuido gratuitamente pela filizola!

Obrigado

Juarez A. Mendes


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

[delphi-br] Re: Aplicativo não executa no windows 98

2006-06-30 Por tôpico Juarez A. Mendes 
2MB..

--- Em delphi-br@yahoogrupos.com.br, -=SchiavoR=- <[EMAIL PROTECTED]> 
escreveu
>
> Qual o tamanho do executável?
> 
> Juarez A. Mendes escreveu:
> > Meus colegas, estou com o seguinte problema, meu aplicativo que
> > executava perfeitamente no windows 98, agora exibe a 
mensagem "Memória
> > livre insuficiente para executar esse programa", já no windows 
xp/2000
> > ele funciona normalmente.
> >
> > Não faço idéia do que ou porque isso está ocorrendo. Já passei 
porisso
> > uma outra vez e notei que havia um formulário no sistema com 
problemas.
> > Atualizei este formulário e o aplicativo funcionou normalmente.
> >
> > Eu gostaria de saber como faço para evitar esse tipo de erro ou
> > detectar ele de forma mais rapida que ficar selecionando 
formulário por
> > formulário e compilando e testando.
> >
> > Agradeço qualquer ajuda.
> >
> > Obrigado
> >
> > Juarez A. Mendes
> >
> >
> >
> > 
> > --
--
> >
> > No virus found in this incoming message.
> > Checked by AVG Free Edition.
> > Version: 7.1.394 / Virus Database: 268.9.4/375 - Release Date: 
25/06/2006
> >
>







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

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

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

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

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

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

[delphi-br] Aplicativo não executa no windows 98

2006-06-30 Por tôpico Juarez A. Mendes 
Meus colegas, estou com o seguinte problema, meu aplicativo que 
executava perfeitamente no windows 98, agora exibe a mensagem "Memória 
livre insuficiente para executar esse programa", já no windows xp/2000 
ele funciona normalmente.

Não faço idéia do que ou porque isso está ocorrendo. Já passei porisso 
uma outra vez e notei que havia um formulário no sistema com problemas. 
Atualizei este formulário e o aplicativo funcionou normalmente. 

Eu gostaria de saber como faço para evitar esse tipo de erro ou 
detectar ele de forma mais rapida que ficar selecionando formulário por 
formulário e compilando e testando.

Agradeço qualquer ajuda.

Obrigado

Juarez A. Mendes





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

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

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

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

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

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

[delphi-br] Socorro! DBTreeview!

2006-03-01 Por tôpico Juarez 
Pessoal, estou tentando fazer um DBTreeview de um plano de contas que eu já vi 
em vários sistemas por ai. É simples,


Seria mais ou menos como na figura abaixo


[+] RECEITAS
 [+] Vendas
Softwares

[+] DESPESAS
[+] Aluguel
Casa 1
Condominio
Casa 2



Já tentei vários componentes para produzir um resultado satisfatório sem 
sucesso, tenho a tela de um sistema que eu vi que seria o máximo, caso alquem 
quiser ver eu mando por e-mail.

O que chegou mais perto do que eu queria era o TdxDBTreeview mas tem um 
problema sério, eu preciso filtrar depois o que é receita e o que é despesa, e 
como o treeview só registra o Código e o Parent como eu poderia filtrar quem é 
quem? 

Alguem poderia me dar uma luz? Agradeço qualquer ajuda.

Obrigado

Juarez Mendes

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



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

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

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

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

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

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

[delphi-br] Aplicação sempre ativa no windows

2006-02-24 Por tôpico Juarez 
Olá a todos!!
Tenho uma pequena aplicação Delphi que precisa ficar sempre ativa em um
Windows Server.

Se a máquina for apenas travada Ctrl-Alt-Del funciona sem problemas, mas, se
for dado Logoff a aplicação é fechada pelo windows.

Até o momento estou entendendo que a única saída é colocar essa aplicação
como serviço no windows...

Alguém tem alguma outra solução?
Caso tenha que ser incluída como serviço, como fazer?

[]s

Juarez


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



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

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

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

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

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

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

[delphi-br] Servidor web com suporte a firebird

2005-11-22 Por tôpico Juarez 
Oi pessoal, alguém conhece um servidor web que dê suporte a firebird? 

 

Obrigado,

 

Juarez. 



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



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

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

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

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

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

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

[delphi-br] Delphi e WEB

2005-09-02 Por tôpico Juarez 
Olá a todos.
Preciso acessar uma página web, inserir o conteúdo de uma variável em uma
caixa de texto da página e dar submit, tudo via Delphi. Alguém já fez isso
ou sabe se é possível.
Poderia ser também:
Enviar o conteúdo de uma variável pelo método post para uma url, via código 
delphi.
Sugestões também são bem vindas.
[]s
Juarez
 


-
Promoção Yahoo! Messenger com voz: você pode levar uma viagem na conversa. 
Participe!

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



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

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

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

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

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

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

[delphi-br] POSTGRESQL + DELPHI 6

2005-05-04 Por tôpico Juarez 
Temos uma aplicação que roda com SQLServer2000 e Delphi 6.
Preciso transformar para Postgresql 8 e Delphi 6.
O que tá pegando no Postgre é que não consigo inserir campos do tipo data em
um adoquery. Retorna: Erro não especificado.

Alguém já passou por essa?

[]s

Juarez



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



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

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

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

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

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

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

[delphi-br] GPS

2005-03-22 Por tôpico Juarez 

Olá a todos,

Temos um aplicativo que vai receber informações que foram enviadas via GPS.
Preciso criar uma função que receba latitude/longitude e retorne o local a
que corresponde essa latitude/longitude (bairro de preferência).
Alguém já implementou isso, e pode dar uma luz?

[]s

Juarez


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



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

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

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

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

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

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

[delphi-br] Formatar a milhar de um número

2005-02-03 Por tôpico Juarez 

Tenho uma adoQuery vinculada a um dbGrid. Um dos campos armazena o valor
48372339485
Preciso formatar a milhar desse número retornando no grid 48.372.339.485 sem
nenhum arredondamento.

Alguma dica?

valeu

Juarez



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

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

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

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

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

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

RES: [delphi-br] ATUALIZAR UMA STORED PROCEDURES

2005-01-25 Por tôpico Juarez 

Em vez de criar um script que atualize a tua stored procedure, não seria
mais fácil criar um script que exclua a stored procedure existente e depois
crie uma nova stored procedure com todas as tuas alterações?

Juarez


De: Emerson Moreno [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 25 de janeiro de 2005 09:17
Para: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br;
[EMAIL PROTECTED];
[EMAIL PROTECTED]; [EMAIL PROTECTED]
Assunto: [delphi-br] ATUALIZAR UMA STORED PROCEDURES



  Amigos estou com grande problema e não sei resolver. Eu tenho um
  procedure no banco FireBird 1.5 que fui obrigado a alterar algumas
  coisas inclusive as variáveis que estão na procedure, agora preciso
  fazer um script para atualizar essa procedure mas não sei como fazer.
  Por favor alguém poderia me ajudar estou com uma certa urrgência.



  --
  []'s

  Emerson Moreno
  Mascate Automação
  Desenvolvedor





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

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

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



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





--
  Links do Yahoo! Grupos

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

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

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



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



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

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

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

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

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

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

RES: [delphi-br] Acumular horas em uma subtração de datas

2005-01-07 Por tôpico Juarez 

Pode ser rotina.

Juarez




  -Mensagem original-
  De: Fabio Giro [mailto:[EMAIL PROTECTED]
  Enviada em: segunda-feira, 3 de janeiro de 2005 15:36
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Acumular horas em uma subtração de datas



  Você ainda quer que o resultado seja por sql ou pode ser uma rotina?

  - Original Message -
  From: "Juarez" <[EMAIL PROTECTED]>
  To: 
  Sent: Monday, January 03, 2005 5:00 PM
  Subject: RES: [delphi-br] Acumular horas em uma subtração de datas



  Preciso acumular as horas para que retorne o resultado: 48h15min17seg

  Juarez





  Se vc olhar direito, sem converter, o resultado deve ser 2 dias, 15
  minutos e 17 segundos.
  Não existe tempo 48 horas.
  Horas vai somente de 0 até 23.

  Se vc quer mostrar o resultado em horas, vai ter que converter de dias
  para horas.

  --
  Marcelo Almeida


Juarez wrote:

>Olá a todos.
>Desculpem pelo tema não ser exatamente Delphi.
>Tenho duas datas
>dataHoraInicio: 25/12/2004 09:00:00
>dataHoraFim: 27/12/2004 09:15:17
>Estou utilizando SQLServer
>Preciso fazer um select que subtraia as duas datas (dataHoraFim -
  DataHoraInicio) e obtenha o resultado 48:15:17
>Tentei:
>SELECT CONVERT(VARCHAR, DATA_HORA_FIM - DATA_HORA_INI, 108) AS DATA
>FROM Deslocamento
>mas o resultado é 00:15:17.
>
>





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

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

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



  Yahoo! Grupos, um serviço oferecido por:

  São Paulo Rio de Janeiro Curitiba Porto Alegre Belo
  Horizonte Brasília




  --
--
  --
Links do Yahoo! Grupos

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

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

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



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



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

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

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

  Links do Yahoo! Grupos















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

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

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



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





--
  Links do Yahoo! Grupos

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

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

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



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



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

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

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

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

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

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

RES: [delphi-br] Acumular horas em uma subtração de datas

2005-01-03 Por tôpico Juarez 

Preciso acumular as horas para que retorne o resultado: 48h15min17seg

Juarez





Se vc olhar direito, sem converter, o resultado deve ser 2 dias, 15
minutos e 17 segundos.
Não existe tempo 48 horas.
Horas vai somente de 0 até 23.

Se vc quer mostrar o resultado em horas, vai ter que converter de dias
para horas.

--
Marcelo Almeida


  Juarez wrote:

  >Olá a todos.
  >Desculpem pelo tema não ser exatamente Delphi.
  >Tenho duas datas
  >dataHoraInicio: 25/12/2004 09:00:00
  >dataHoraFim: 27/12/2004 09:15:17
  >Estou utilizando SQLServer
  >Preciso fazer um select que subtraia as duas datas (dataHoraFim -
DataHoraInicio) e obtenha o resultado 48:15:17
  >Tentei:
  >SELECT CONVERT(VARCHAR, DATA_HORA_FIM - DATA_HORA_INI, 108) AS DATA
  >FROM Deslocamento
  >mas o resultado é 00:15:17.
  >
  >





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

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

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



Yahoo! Grupos, um serviço oferecido por:

São Paulo Rio de Janeiro Curitiba Porto Alegre Belo
Horizonte Brasília





--
  Links do Yahoo! Grupos

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

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

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



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



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

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

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

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

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

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

[delphi-br] Acumular horas em uma subtração de datas

2004-12-30 Por tôpico Juarez 

Olá a todos.
Desculpem pelo tema não ser exatamente Delphi.
Tenho duas datas
dataHoraInicio: 25/12/2004 09:00:00
dataHoraFim: 27/12/2004 09:15:17
Estou utilizando SQLServer
Preciso fazer um select que subtraia as duas datas (dataHoraFim - 
DataHoraInicio) e obtenha o resultado 48:15:17
Tentei:
SELECT CONVERT(VARCHAR, DATA_HORA_FIM - DATA_HORA_INI, 108) AS DATA
FROM Deslocamento
mas o resultado é 00:15:17.
Alguém tem alguma dica para acumular as horas e dar o resultado: 48:15:17
Valeu
[]s
Juarez


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

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



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

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

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

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

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

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

[delphi-br] Atualizar um Form durante processamento

2004-12-28 Por tôpico Juarez Nasato 

Olá a todos.
Tenho o seguinte problema:
A partir do meu formA, crio o formB e passo parâmetros para uma função que está 
no formB.
A função do formB passa instruções para outras funções que estao no datamoduleB.
Até aí tudo bem, as funcões funcionam redondas. O que ocorre é que o formB ao 
ser aberto não se 
atualiza, fica incompleto (somente a imagem do form), sem labels e outros 
avisos de status que deveriam aparecer a
medida que as funções são executadas. Somente quando o processamento das 
funções termina é que o formB
aparece na integra.
Alguém sabe como contornar esse problema?
Obrigado
[]s
Juarez



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

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



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

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

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

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

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

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

[delphi-br] Store Procedure (SQLServer)

2004-12-23 Por tôpico Juarez 

Olá a todos,

Estou fazendo uma aplicação que insere dados no banco utilizando store
procedure (SQLServer2000) e ADO (TADOStoredProc) do Delphi 6.

Alguém utiliza? É estável?

Estou meio preocupado, pois algumas vezes da erro dizendo que não encontrou
um parametro e só volta a funcionar quando eu apago o objeto TADOStoredProc
e crio um novo.

Obrigado
[]s

Juarez




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

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

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

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

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

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

Re: RES: [delphi-br] Chamar uma função a partir de uma variável

2004-12-20 Por tôpico Juarez Nasato 

O que ocorre é que o nome da função está numa tabela no banco de dados.
Preciso fazer uma consulta para trazer o nome da função, que vem como string, e 
a partir dessa string chamar a funcão.
 
function TfrmImportarRegistros.teste() :string;
begin
   result:= 'hello';
end;

procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
   var : string;
begin
   var := qryFuncaoNOME_FUNCAO.Value;

   //como chamar a funcao teste a partir da string var?
end;

Valeu!!

Juarez


 


Diogo <[EMAIL PROTECTED]> wrote:

Acho que do jeito abaixo sai o que vc deseja…



[]s



function TDtmImportarRegistros.teste :string;
begin
   result:= 'hello';
end;

procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
   var : string;
begin
   var := teste;
   showmessage(var);
end;



  _  

De: Juarez Nasato [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 20 de dezembro de 2004 07:58
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Chamar uma função a partir de uma variável



Olá a todos,

Tenho a função:

function TDtmImportarRegistros.teste():string;
begin
   result:= 'hello';
end;

e quero chamá-la a partir do conteúdo de uma variável:

procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
   var, res : string;
begin
   var := 'teste()';
   res := pchar(var);
   showmessage(res);
end;
Tentei com pchar, mas não funcionou, alguém tem alguma dica
Obrigado,
[]s
Juarez


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

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



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

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

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







Yahoo! Grupos, um serviço oferecido por:




<http://br.rd.yahoo.com/SIG=12a9bre4i/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1103628392/A=2191897/R=0/SIG=10vqa2grn/*http:/br.di
versao.yahoo.com/> 




<http://br.rd.yahoo.com/SIG=12a9bre4i/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1103628392/A=2191897/R=1/SIG=10vqa2grn/*http:/br.di
versao.yahoo.com/> 

São PauloRio de JaneiroCuritibaPorto AlegreBelo Horizonte
Brasília



  _  

Links do Yahoo! Grupos

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



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



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

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

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



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

-
Links do Yahoo! Grupos

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




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

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



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

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

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

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

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

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

[delphi-br] Chamar uma função a partir de uma variável

2004-12-20 Por tôpico Juarez Nasato 

Olá a todos,

Tenho a função:
 
function TDtmImportarRegistros.teste():string;
begin
   result:= 'hello';
end;
 
e quero chamá-la a partir do conteúdo de uma variável:
 
procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
   var, res : string;
begin
   var := 'teste()';
   res := pchar(var);
   showmessage(res);
end;
Tentei com pchar, mas não funcionou, alguém tem alguma dica
Obrigado,
[]s
Juarez


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

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



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

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

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

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

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

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

RES: [delphi-br] Erro com o MEMO no windows 98

2004-12-08 Por tôpico Juarez 

Fiz uns testes e descobri que o problema está no Memo que estou utilizando
na minha aplicação.
Ao que parece o memo (TMemo) quando está rodando windows 98 e no Millenium
possui um limite de + ou - 45000 caracteres quando se faz a inclusão
utilizando memo1.lines.add. O memo para de acrescentar linhas sem dar
nenhuma mensagem e às vezes trava a aplicação.
Rodando no windows 2000 ou no XP isso não acontece.


for i := 1 to 1 do

memo1.lines.add('bla,bla,bla,bla,bla,bla,bla,bla,bla,bla,bla,bla,bla,bla');

Alguém tem alguma dica

Valeu!!

[]s

Juarez


  Aí é que está o problema. O windows 98 simplesmente trava e nao nenhuma
  mensagem.
  A aplicação faz a comunicação com um aparelho pela serial e como no w2000
  funciona legal estou imaginando que seja alguma atualização que esteja
  faltando.
  Vou fazer mais alguns testes...

  valeu

  Juarez



Seria mais fácil se vc descrevesse o erro.
[]s




Olá a todos!!

Tenho uma aplicação em D6 que roda perfeitamente no windows 2000, porém
dá
  pau no ruindows 98. Que atualizações preciso rodar no windows 98, além do
  MDAC, para que o famigerado pare de dar pau.

Obrigado

    []s

Juarez

---



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



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

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

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



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





--
  Links do Yahoo! Grupos

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

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

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



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



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

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

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

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

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

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

RES: [delphi-br] Erro no windows 98

2004-12-07 Por tôpico Juarez 

Aí é que está o problema. O windows 98 simplesmente trava e nao nenhuma
mensagem.
A aplicação faz a comunicação com um aparelho pela serial e como no w2000
funciona legal estou imaginando que seja alguma atualização que esteja
faltando.
Vou fazer mais alguns testes...

valeu

Juarez



  Seria mais fácil se vc descrevesse o erro.
  []s




  Olá a todos!!

  Tenho uma aplicação em D6 que roda perfeitamente no windows 2000, porém dá
pau no ruindows 98. Que atualizações preciso rodar no windows 98, além do
MDAC, para que o famigerado pare de dar pau.

  Obrigado

  []s

  Juarez

  ---



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



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

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

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

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

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

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

[delphi-br] Erro no windows 98

2004-12-07 Por tôpico Juarez 

Olá a todos!!

Tenho uma aplicação em D6 que roda perfeitamente no windows 2000, porém dá
pau no ruindows 98.
Que atualizações preciso rodar no windows 98, além do MDAC, para que o
famigerado pare de dar pau.

Obrigado

[]s

Juarez



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

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

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

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

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

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

RES: [delphi-br] Arquivos do word

2004-11-09 Por tôpico Juarez 

Veja se isto ajuda:

78. Word - Criar arquivo numa pasta compartilhada, via programação.
Cria uma tabela para receber o nome do arquivo. no before post coloca o
codigo abaixo.

   msWord := CreateOleObject('Word.Basic');
   msWord.AppShow;
   msWord.FileNew;
   msWord.insert('Arquivo Anexo à Ocorrencia: ' + (inttostr
dtmOcorrencia.qryOcorrenciaCodOco.AsInteger)));
   msWord.insert(#13 + 'Criação do arquivo: OK');
   msWord.insert(#13 + 'O arquivo está sendo gravado no servidor');
   msWord.insert(#13 + 'Aguarde...');
   msWord.FileSaveAs('\\10.41.8.183\ocorrencia$\' + arquivo); //Salva o
arquivo
   msWord.insert(#13 + 'Gravação: OK');
   msWord.insert(#13 + 'Processo finalisado. Bom trabalho!!');

[]s

Juarez



  -Mensagem original-
  De: Vinicius Mommensohn [mailto:[EMAIL PROTECTED]
  Enviada em: terça-feira, 9 de novembro de 2004 15:45
  Para: Delphi-br
  Assunto: [delphi-br] Arquivos do word


  Boa tarde pessoal,

  Vi um artigo no site do clube delphi sobre como manipular arquivos .doc,
mas não consegui baixar o artigo porque o link tava corrompido. Alguem tem
alguma apostila completa de como trabalhar com arquivos .doc pelo delphi?!?!

  Desde já agradeço,

  []s

  Vinicius

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



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

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

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



Yahoo! Grupos, um serviço oferecido por:








--
  Links do Yahoo! Grupos

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

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

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



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



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

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

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

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

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

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

[delphi-br] >> Extrair a parte inteira de um double

2004-10-26 Por tôpico Juarez 

Olá a todos!!

Que funcão devo usar?
Preciso de uma extrair somente a parte inteira de um double.
ex: 10,78493, deve retornar apenas 10.

Obrigado,

[]s

Juarez



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

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

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

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

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

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