RES: [delphi-br] OFF-TOPIC: Processamento Pentium4 x Pentium M

[Rodrigo Villaverde]

http://www.intel.com/products/processor/index.htm

Lá tem o que você procura

Rodrigo Villaverde
Analista de Sistemas
 

 
Tel.: (21) 2421-1600
Cel.: (21) 9176-3590
E-mail: [EMAIL PROTECTED]
Home Page: www.petrolog.com.br 
 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de [EMAIL PROTECTED]
Enviada em: quarta-feira, 25 de janeiro de 2006 09:59
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] OFF-TOPIC: Processamento Pentium4 x Pentium M

Amigos,

   Desculpem o off-topic + estou c/ uma duvida e jah procurei na net
e nao encontrei nada a respeito.

   Estou querendo trocar meu Notebook q eh um Pentium 4 2.4GHz e estou
pensando em trocar por um Pentium M.
   A duvida eh em relacao ao poder de processamento entre eles.  Nao
encontrei em nenhum lugar, mesmo no site da intel, q mostrasse esse
comparativo.
   Se o Pentium M tiver pelo menos o mesmo poder de processamento vou
trocar + se for inferior vou ter q optar pelos Pentium 4 mesmo.

Alguem pode me ajudar?

Obrigado

William Rocha




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


 
Links do Yahoo! Grupos




 






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

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

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

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

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

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

 

[delphi-br] Dúvida Relatórios

[Rodrigo Villaverde]

Boa Tarde,

 

Estou usando o qrCompositeReport e estou com o seguinte problema:

Não consigo mostrar os PageHeader dos outros relatórios. Por exemplo, tenho
3 relatórios e só consigo mostrar o PageHeader do primeiro relatório, não
consigo mostrar dos outros dois.

 

Obrigado



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



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

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

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

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

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

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

 

RES: [delphi-br] Interbase

[Rodrigo Villaverde]

Crie um generator

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Cristiano
Enviada em: segunda-feira, 5 de setembro de 2005 12:07
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Interbase


Pessoal

Estou com uma dúvida básica,,,como eu faço ou qual tipo de declaração para
que uma variavel no interbase seja auto incremento 

 

Obrigado a quem poder me ajudar..

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

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



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

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

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




 





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

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

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

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

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

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

 

[delphi-br] Dúvida no envio de e-mail com Indy

[Rodrigo Villaverde]

Bom dia,

 

Tenho duas dúvidas básicas:

 

1.  Como eu faço para mandar um Carbon Copy (CC), e o caracter que
delimita os endereços de e-mail é ; ?
2.  Como eu faço para enviar mais de um anexo?

 

Obrigado



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



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

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

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

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

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

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

 

RES: [delphi-br] Problemas com SQL

[Rodrigo Villaverde]

Vc tem q configurar o CaracterSet do seu Banco

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ricardo MDE
Enviada em: segunda-feira, 29 de agosto de 2005 14:55
Para: delphi-br
Assunto: [delphi-br] Problemas com SQL

Message: The conversion of a char data type to a datetime data type resulted
in an Message:out-of-range datetime value.
The statement has been terminated.


boa tarde tenho um System Procedures onde ele pega uma data no formato
String, o problema é que a data está como '29/08/2005 12:00:00', o problema
é em meu computador tenho o sql server em inglês onde a data deveria ser
'08/29/2005 12:00:00', gostaria de saber como posso pegar está data no
histórico de procedure com datetime 38586.5 ou algo parecido, assim não
teria problemas com versão de SQL

Muito obrigado

Ricardo Lino Gonzalez

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





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

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

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




 





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

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

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

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

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

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

 

RES: [delphi-br] alguem ja viu este erro

[Rodrigo Villaverde]

Tenta 192.168.2.35:c:\dpf.gdb

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Miguelito
Enviada em: quinta-feira, 17 de março de 2005 11:17
Para: delphi-br
Assunto: [delphi-br] alguem ja viu este erro

 

Pessoal estou tentando conectar pela primeira vez o dbexpress a um banco num
servido remoto

 

no data base coloco 192.168.2.35\dpf.gdb (no meu comoutador) funciona legal
e sem problemas

 

agora se coloco o banco na máquina q ira conter o arquivo, não funciona

 

192.168.2.59\dpf.gdb (na pasta c:\)   

 

da o seguinte erro

 

unable to complete network request to host "192.168.2.59"

failed to establish a conection

unknow win32 error 10060

 

qual sera o problema, o ip da maquina esta legal

 

se coloco no executar \\192.168.2.59 ele localiza sem problemas. 

 

Miguel Villacorta

  4446-4100 ramal 4126

7312-5509

 [EMAIL PROTECTED]

  www.dpfautopecas.com.br

MSN [EMAIL PROTECTED]

 
  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.338 / Virus Database: 267.10.5/68 - Release Date: 10/8/2005


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





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

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

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




 





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

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

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

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

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

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

 

RES: [delphi-br] Ferramenta para conversao de MDB para FDB

[Rodrigo Villaverde]

Não sei se existem, mas se existir um drive ODBC para FB vc consegue fazer
essa migração tranquilamente.

Rodrigo Villaverde
Analista de Sistemas
 

 
Tel.: (21) 2421-1600
Cel.: (21) 8105-0968
E-mail: [EMAIL PROTECTED]
Home Page: www.petrolog.com.br 
 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de SAMES DAVIS HIPOLITO GOMES
Enviada em: quarta-feira, 1 de junho de 2005 08:40
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: [delphi-br] Ferramenta para conversao de MDB para FDB


Bom dia Pessoal,

Gostaria de saber se existe alguma ferramenta que converta
uma Base de Dados do Access ( MDB ) para a Base de Dados FireBird (
FDB )
é possível essa conversão ?

É porque eu já tenho uma Base de Dados montada em Access
e gostaria de aproveita-la nessa migração que estou fazendo para o
FB.


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






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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] sql serve

[Rodrigo Villaverde]

No site da Microsoft vc encontra esses manuais. É só dar uma procurada lá.

___
Rodrigo Reis Monnerat Louzada Villaverde
Analista de Sistemas
Petrolog Soluções e Serviços
Tel: + 55 (21) 2421-1600
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Angel silver
Enviada em: sexta-feira, 13 de maio de 2005 21:14
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] sql serve

Boa Noite,
 
 
alguém poderia me mandar manuais, apostilhas ebooks sobre
sql pois toprecisando urgente.
 
 
desde já agradeço..


-
Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta!

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



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

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

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




 





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

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

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

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

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

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

 

RES: [delphi-br] Off - Desafio

[Rodrigo Villaverde]

Consegui


___
Rodrigo Reis Monnerat Louzada Villaverde
Analista de Sistemas
Petrolog Soluções e Serviços
Tel: + 55 (21) 2421-1600

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Eduardo Silva ®
Enviada em: terça-feira, 10 de maio de 2005 11:23
Para: Grupo Delphi-br
Assunto: [delphi-br] Off - Desafio

Galera, desculpem o off, mas me enviaram o link abaixo e até agora eu não
consegui resolver o problema.

É só ir clicando nas setinhas até chegar na saída.

Se alguém conseguir resolver, por favor me envie os passos em pvt...

http://www.ally.com.ru/mmedia-genser-3.htm



~\\|//~
-(o o)-
o--oOOOo--(_)--oOOOo-o
||
|   Eduardo de Almeida Silva |
|   Kobra Sistemas   |
|  [EMAIL PROTECTED]  -   (14)3263-0326   |
||
|.oooO   Oooo.   |
o(   )---(   )---o
  \ ( ) /
   \_)   (_/



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

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

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




 





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

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

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

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

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

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

 

RES: [delphi-br] AJUDA - SQL

[Rodrigo Villaverde]

O texto tem que estar entre aspas.
Quando for utilizar o Datafield utilize o comando QuoteStr(Datafield)

___
Rodrigo Reis Monnerat Louzada Villaverde
Analista de Sistemas
Petrolog Soluções e Serviços
Tel: + 55 (21) 2421-1600

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de T a t y S a n t a n a
Enviada em: terça-feira, 10 de maio de 2005 09:48
Para: Grupo de Delphi
Assunto: [delphi-br] AJUDA - SQL

Olá pessoal bom dia, será que alguém poderia me ajudar. To terminando
meu projeto de fim de curso e to fazendo as consultas. Utilizei um Query pra
fazê-las, só que não dá certo.
Preciso pesquisar um produto pelo código dele, pelo nome e pelo fornecedor
daquele produto. Construí a seguinte rotina.

With DM.QPesquisar do
  Begin
SQL.Clear;
SQL.Text := 'Select  A.Cod_produto, A.Descricao, A.valor, C.NOME
>From PRODUTOS A, FORNECEDOR C Where C.NOME = "'+LPesquisar.Text+'" or
A.Descricao= "'+descricao.Text+'" or A.Cod_Produto ='+cod_produto.Text+ '
and A.COD_FORNECEDOR = C.COD_FORNECEDOR';
Open;
  End;

Não mudei de linha no código SQL aqui é porque não cabe. Aí quando se vai
pra execução quando eu clico no botão onde programei esse SQL ele dá o
seguinte erro.

DYNAMIC SQL ERROR 
SQL ERRO COD = - 104
TOKEN UNKNOWN - LINE 1, CHAR 148
END.

Nem sei mais o q testar. Já mudei diversas vezes e nada. Se alguém tiver uma
idéia.

Obrigada..

Taty Santana

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



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

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

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




 





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

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

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

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

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

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

 

[delphi-br] Criar componente

[Rodrigo Villaverde]

Boa tarde,

 

Estou criando meu primeiro componente e estou encontrando alguns problemas.
O mais importante é que não estou conseguindo sobrepor o evento KeyDown do
componente TEdit.

 

Segue em anexo parte do meu código:

 

type

  TTipoCampo= (tcAlfa, tcNumerico, tcData, tcHora, tcMoeda);

  TKeyEvento = procedure (Sender: TObject; var Key: Word; Shift:
TShiftState) of object;

  TMyEdit = class(TEdit)

  private

{ Private declarations }

ValidaLimpeza: Boolean;

TrocaFoco: Boolean;

Campo: TTipoCampo;

procedure SetTipoCampo(Value: TTipoCampo);

procedure SetValidaLimpeza(Value: Boolean);

function ValidaSaida: Boolean;

function ValidaDados: Boolean;

  protected

{ Protected declarations }

property OnKeyDown: TKeyEvento;

  public

{ Public declarations }

constructor Create(AOwner: TComponent); override;

procedure KeyDown(var Key: Word; Shift: TShiftState); override;

  published

{ Published declarations }

property TipoCampo: TTipoCampo

  read Campo write SetTipoCampo default tcAlfa;

property Limpa: Boolean

  read ValidaLimpeza write SetValidaLimpeza default True;

 

{property OnKeyDown: TNotifyEvent

  read EventoKeyDown write EventoKeyDown;}

  end;

 

Como é que eu faço isso?

 

Obrigado.

 

___

Rodrigo Reis Monnerat Louzada Villaverde

Analista de Sistemas

Petrolog Soluções e Serviços

Tel: + 55 (21) 2421-1600

 



[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] Seria pirataria?

[Rodrigo Villaverde]

Marcos,

O aconselhável é você entrar em contato com a Microsoft e verificar essa
possibilidade.
No contrato que "assinamos" com a Microsoft fica proibida a reprodução
apenas para fins de backup. Teoricamente você não poderia anexar esses
arquivos.
Eu entraria em contato com a Microsoft para não ter problemas.

Um abraço

___
Rodrigo Reis Monnerat Louzada Villaverde
Analista de Sistemas
Petrolog Soluções e Serviços
Tel: + 55 (21) 2421-1600
-Mensagem original-
De: Marcos Elias [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 6 de abril de 2005 09:11
Para: Lista Delphi; Delphi Br
Assunto: [delphi-br] Seria pirataria?


Fala galera...
 
Vi que nas novas versões de Windows (2000, XP...) há um programinha, o
IEXPRESS.EXE, que fica na pasta de sistema (system ou system32). Ele depende
dos arquivos MAKECAB.EXE e WEXTRACT.EXE.
Executando-se o iexpress ele gera um arquivo compactado auto-extraível, como
os utilizados em alguns programas de instalação e alguns acessórios da
própria Microsoft. Está lá, tem até uma interface e salva as configurações
de instalação num arquivo, excelente e é para usar - mesmo que não tenha
atalhos para ele no Windows Explorer.
 
Pois bem... Criei um programa validador de número serial, e compacto com
ele... Acontece que pretendo adaptar esse programa validador de número
serial e registro para um programa comercial, ou seja, distribuí-lo. Quem
tem Windows 2000/XP poderia compactar os arquivos com esse IEXPRESS, mas e
para o Windows 9x/Me? Será que eu poderia colocar esses 3 arquivos do
windows no meu programa de instalação, e mandá-los juntos? Não é uma "cópia"
muito menos uma revenda, visto que vários arquivos de sistema passar de
windows em windows, como uns do VB (as dll com funções) e o próprio
msconfig, que muita gente leva pro windows 2000.
 
Preferia compactar automaticamente, mas desconheço um componente gratuito
que faça a compactação...
 
A pergunta então seria essa : "posso ter algum problema - por exemplo, com a
microsoft - se eu colocar esses 3 arquivos no meu programa de instalação
para serem executados em windows 9x/me?"
 
Eh claro que a resposta não depende de vocês, mas comentários e debates
ajudam a tomar um caminho...
 
Falou pessoal!
Marcos Elias
[EMAIL PROTECTED]

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

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



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

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

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




 






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

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

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

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

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

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

 

RE: [delphi-br] Calculo com Horas

[Rodrigo Villaverde]

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

60 / 30 = 2


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


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

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



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



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

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

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


PessoALL


Preciso fazer um calculo assim:

Hora inicial - Hora Final / intervalo

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

Obrigado.


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



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

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

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

Links do Yahoo! Grupos











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

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

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

Links do Yahoo! Grupos











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

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

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




 








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

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

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

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

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

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

 

RE: [delphi-br] Tela de Impressão aparece !!!

[Rodrigo Villaverde]

Ah, tá. Entendi agora. Abraço.

-Original Message-
From: Rafael Souza [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 15:53
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Tela de Impressão aparece !!!


Rodrigo
Encontrei o meu problema.
Selecionei o quickreport e na propriedade Band, cliquei no sinal de '+'
e coloquei Has Title para true, então funcionou...

Respondendo sua pergunta, no quickreport coloquei TQRLabel e no form
coloquei um edit e um button.

O tqrlabel tem name Maj.

O button imprimir recebe o comando:

Maj.Caption := Edit2.Text;

quickrep1.Preview;

Então na hora de imprimir, o tqrlabel que esta no quickreport recebe os
dados que foram digitados no Edit2...

Entendeu?

Te agradeço pela atenção e ajuda...

Rafael Souza

 


Rodrigo Villaverde <[EMAIL PROTECTED]> wrote:
O seu quickreport não acessa nenhum dado para montar o relatório?

-Original Message-
From: Rafael Souza [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 15:10
To: delphi-br@yahoogrupos.com.br
Subject: RE: [delphi-br] Tela de Impressão não aparece...


Rodrigo;

Não estou usando nenhum tipo de componente (Table, Query...)
O aplicativo Tem somente Buttons e Edits...

Rafael

Rodrigo Villaverde <[EMAIL PROTECTED]> wrote:
A sua query não está retornando nenhum registro

-Original Message-
From: Rafael Souza [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 14:58
To: Delphi Grupo
Subject: [delphi-br] Tela de Impressão não aparece...


Boa Tarde!

Gente,
Coloquei no meu form um QuickRep1 e o QRShape1 
e no form o botao p/ imprimir e os edits

No botao de imprimir o código:

Cap.Caption := Memo1.Text; //Cap.Caption vai receber o texto de Momo1 
Maj.Caption := Memo2.Text; //Maj.Caption vai receber o texto de Momo2 
quickrep1.Preview;

Então ao clicar, a tela de Preview abre mas não aparece os dados.
Estou esquecendo de configurar alguma outra coisa ?


Aproveitando, tem como eu criar um novo form para colocar somente os
QuickRep e os QRShape, por ex.:

Se clicar no botao1 ele abre o form Imprime chamando QuickRep1 e imprime
o conteúdo de  Cap.Caption := Memo1.Text;

Se clicar no botao2 ele abre o form Imprime, chamando QuickRep2 e
imprime o conteúdo de Maj.Caption := Memo2.Text; 

Como posso fazer esta parte?
Ja tentei mas não deu certo...

Grato a todos.


Rafael Souza


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

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



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

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

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

Links do Yahoo! Grupos













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

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



















   function SearchComboBox() { if
(document.form_combo.keyword.value.length==0){  alert("Por favor, digite
algo.");  return false; }else {  document.form_combo.action
="http://br.rd.yahoo.com/SIG=12aievbke/M=264105.3931087.6562589.1588051/
D=brclubs/S=2137111264:HM/EXP=168906/A=2361264/R=0/SIG=11uaou2jn/*ht
tp://www.bondfaro.com/bondfaro/in/combosearch_in.jsp?sk=11"; } return
true;} [input]   [input]   [input]  

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


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

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



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

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

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

Links do Yahoo! Grupos













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

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

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



Yahoo! Grupos, um serviço oferecido por:



















   function SearchComboBox() { if
(document.f

RE: [delphi-br] Tela de Impressão não aparece...

[Rodrigo Villaverde]

O seu quickreport não acessa nenhum dado para montar o relatório?

-Original Message-
From: Rafael Souza [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 15:10
To: delphi-br@yahoogrupos.com.br
Subject: RE: [delphi-br] Tela de Impressão não aparece...


Rodrigo;
 
Não estou usando nenhum tipo de componente (Table, Query...)
O aplicativo Tem somente Buttons e Edits...
 
Rafael

Rodrigo Villaverde <[EMAIL PROTECTED]> wrote:
A sua query não está retornando nenhum registro

-Original Message-
From: Rafael Souza [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 14:58
To: Delphi Grupo
Subject: [delphi-br] Tela de Impressão não aparece...


Boa Tarde!

Gente,
Coloquei no meu form um QuickRep1 e o QRShape1 
e no form o botao p/ imprimir e os edits

No botao de imprimir o código:

Cap.Caption := Memo1.Text; //Cap.Caption vai receber o texto de Momo1 
Maj.Caption := Memo2.Text; //Maj.Caption vai receber o texto de Momo2 
quickrep1.Preview;

Então ao clicar, a tela de Preview abre mas não aparece os dados.
Estou esquecendo de configurar alguma outra coisa ?


Aproveitando, tem como eu criar um novo form para colocar somente os
QuickRep e os QRShape, por ex.:

Se clicar no botao1 ele abre o form Imprime chamando QuickRep1 e imprime
o conteúdo de  Cap.Caption := Memo1.Text;

Se clicar no botao2 ele abre o form Imprime, chamando QuickRep2 e
imprime o conteúdo de Maj.Caption := Memo2.Text; 

Como posso fazer esta parte?
Ja tentei mas não deu certo...

Grato a todos.


Rafael Souza


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

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



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

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

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

Links do Yahoo! Grupos













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

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



















   function SearchComboBox() { if
(document.form_combo.keyword.value.length==0){  alert("Por favor, digite
algo.");  return false; }else {  document.form_combo.action
="http://br.rd.yahoo.com/SIG=12aievbke/M=264105.3931087.6562589.1588051/
D=brclubs/S=2137111264:HM/EXP=168906/A=2361264/R=0/SIG=11uaou2jn/*ht
tp://www.bondfaro.com/bondfaro/in/combosearch_in.jsp?sk=11"; } return
true;} [input]   [input]   [input]  

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


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

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



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

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

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




 








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

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

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

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

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

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

 

RE: [delphi-br] Tela de Impressão não aparece...

[Rodrigo Villaverde]

A sua query não está retornando nenhum registro

-Original Message-
From: Rafael Souza [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 14:58
To: Delphi Grupo
Subject: [delphi-br] Tela de Impressão não aparece...


Boa Tarde!
 
Gente,
Coloquei no meu form um QuickRep1 e o QRShape1 
e no form o botao p/ imprimir e os edits
 
No botao de imprimir o código:
 
Cap.Caption := Memo1.Text; //Cap.Caption vai receber o texto de Momo1 
Maj.Caption := Memo2.Text; //Maj.Caption vai receber o texto de Momo2 
quickrep1.Preview;
 
Então ao clicar, a tela de Preview abre mas não aparece os dados.
Estou esquecendo de configurar alguma outra coisa ?
 
 
Aproveitando, tem como eu criar um novo form para colocar somente os
QuickRep e os QRShape, por ex.:
 
Se clicar no botao1 ele abre o form Imprime chamando QuickRep1 e imprime
o conteúdo de  Cap.Caption := Memo1.Text;
 
Se clicar no botao2 ele abre o form Imprime, chamando QuickRep2 e
imprime o conteúdo de Maj.Caption := Memo2.Text; 
 
Como posso fazer esta parte?
Ja tentei mas não deu certo...
 
Grato a todos.

 
Rafael Souza


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

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



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

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

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




 








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

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

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

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

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

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

 

RE: [delphi-br] Erro ao alterar - muito estranho

[Rodrigo Villaverde]

O problema está no conteúdo da variável do código do vendedor. Depure o
seu aplicativo e verifique qual é o conteúdo deste código.

-Original Message-
From: Rodrigo - Winsoft [mailto:[EMAIL PROTECTED] 
Sent: quinta-feira, 17 de março de 2005 13:01
To: Lista - Delphi-br
Subject: [delphi-br] Erro ao alterar - muito estranho


Boa tarde galera.

Estou com o seguinte problema..

Estou trabalhando com D7 e Firebird 1.5.. ( TSQLDataSet +
TDataSetProvider + TClientDataSet )

Minha tabela de vendas está realcionada com Clientes / Vendedor /
Transportadora.
Se eu clico no botao alterar e gravar. funciona normal..

Se eu clico no botao alterar, altero algum campo e gravo. funciona
normal.

Se eu clico no botão alterar, apago o cód. do vendedor e coloco
novamente o mesmo e gravo. dá a seguinte mensagem de erro: "Token
unknown - line 2, char 1 where".

O estranho é q eu não mudo o meu select em momento algum...

Segue o meu select: 

select VE.*, C.NCLIFOR, V.NVENDEDOR, T.NTRANSPORTADORA, T.PLACA
from VENENT VE
inner join CLIFOR C on C.CCLIFOR = VE.CCLIFOR
inner join VENDEDOR V on V.CVENDEDOR = VE.CVENDEDOR
left join TRANSP T on VE.CTRANSPORTADORA = T.CTRANSPORTADORA
where VE.CVENENT =:PCVENENT
and VE.TIPO_OPERACAO =:PTIPO_OPERACAO


Se alguém tiver alguma ideia, desde já agradeço...


Obrigado.

Rodrigo Pedroso
Winsoft Informática - (14) 3664-1586
[EMAIL PROTECTED]

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



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

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

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




 








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

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

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

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

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

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

 

[delphi-br] Componente Free

[Rodrigo Villaverde]

Bom dia

 

Alguém sabe onde posso encontrar um componente free para exibir *.GIF?

 

Obrigado



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



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

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

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

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

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

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

 

[delphi-br] Enviando e-mail via SMTP

[Rodrigo Villaverde]

Ola,

Estou tentando enviar e-mail através do delphi utilizando o componente
TNMSMTP, e estou obtendo o seguinte erro:

Código 554: No valid Recipients

Estou usando o Delphi 5

O meu provedor é o Terra, e o meu outlook pede q eu autentique com senha meu
servidor de saída. Será que esse é o problema?

Se for, como eu faço para colocar a senha, pois esse componente só utiliza o
USERID?

Obrigado

 



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



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

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

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

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

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

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

 

RES: RES: [delphi-br] Criar form em runtime por parametro

[Rodrigo Villaverde]

No local de x coloque TForm

-Mensagem original-
De: Murillo Proença [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 23 de fevereiro de 2005 12:28
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Criar form em runtime por parametro



 na verdade nem está compilando, pois eu não sei como escrever a sintaxe.
  se fosse normalmente eu montaria assim:

  Form1:= TForm1.Create(Application)

  agora, no meu caso eu tenho um parametro na função que é um form
  
  Parametro:= .Create(Application)

  eu não sei como colocar a referencia a classe ().

  deu pra entender?



--- Em delphi-br@yahoogrupos.com.br, "Joao Paulo" <[EMAIL PROTECTED]>
escreveu
> Mas ocorre algum erro ? Caso ocorra, qual erro ?
> 
>  
> 
>   _  
> 
> De: Murillo Proença [mailto:[EMAIL PROTECTED] 
> Enviada em: quarta-feira, 23 de fevereiro de 2005 10:44
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Criar form em runtime por parametro
> 
>  
> 
> 
> Bom dia,
> 
> tenho uma funcao onde recebo por parametro um TForm, o que preciso é 
> criar o form, mostra-lo e liberar da memoria. O que não consigo é 
> montar a sintaxe da criação:
> 
> function CriaForm(prForm: TForm): Boolean;
> begin
>   prForm:= .Create(Application); //aqui que não consigo 
>   prForm.ShowModal;
>   prForm.Free;
>   result:= true;
> end;
> 
> Obrigado 
> 
> Murillo Proença
> 
> 
> 
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> 
> 
> 
> 
> 
> 
> Yahoo! Grupos, um serviço oferecido por:
> 
> 
> 
>   
> 
> 
>  
 
> 
> 
> 
>  
>

lubs/S=2137111264:HM/EXP=1109252723/A=2361264/R=6/SIG=10v4acpp0/*http:/br.sh
> opping.yahoo.com/>  
> 
>   
> 
>  
> 
>  
> 
>   _  
> 
> Links do Yahoo! Grupos
> 
> * Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>   
> * Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>  
>   
> * O uso que você faz do Yahoo! Grupos está sujeito aos Termos
>   do Serviço do Yahoo!. 
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]





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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] Lote -ultimo Registro nao Pega

[Rodrigo Villaverde]

Aí, coloque uns controles e debug isso aí. É o único geito de ver isso

-Mensagem original-
De: giuvany [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 23 de fevereiro de 2005 11:12
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Lote -ultimo Registro nao Pega


Então Rodrigo não tive muito sucesso não!

-Mensagem original-
De: Rodrigo Villaverde [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 23 de fevereiro de 2005 10:25
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Lote -ultimo Registro nao Pega


Coloque o next no final do loop e veja se vc consegue arrumar esse erro

-Mensagem original-
De: giuvany [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 23 de fevereiro de 2005 10:12
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Lote -ultimo Registro nao Pega


Seguinte pessoal esto escrevendo um arquivo de lote,

Só que tenho um problema é que o ultimo registro não consigo inserir o lote

Alguém pode me dar um help vejam o código abaixo:

 

 

 

 

while not dm_principal.query1.Eof>PEGANDO REGISTRO DA TABELA(QUERY1)

do begin

 

Write(meutxt,''+completa_string(6,dm_principal.query1CRM.Value,'N'));
--->>>>ESCREVENDO EM ARQUIVO

Write(meutxt,''+completa_string(50,dm_principal.query1VALOR_TOTAL.Value,'S')
); --->>>>ESCREVENDO EM ARQUIVO

 

 

crm_atual:=dm_principal.query1CRM.Value;CRM>PEGANDO CRM ATUAL

 

 

dm_principal.query1.Next;   ->PROXIMO REGISTRO

 

 

 

if crm_atual<>dm_principal.query1CRM.Value then-->>>IF
CRM_ATUAL<> DO PROXIMO  VOU GRAVAR LOTE

begin

 

Write(meutxt,''+completa_string(50,dm_principal.Qry_Lotevalor_total.asstring
,'S'));  -> ESCREVENDO  VALOR TOTAL DE LOTE PARA CRM

Writeln(meutxt);

 

end;

 

crm_atual:=dm_principal.query1CRM.Value; -> ATUALIZA CRM_ATUAL

 

END;

 

 

 

Problema que no ultimo CRM ELE COMPARA SE CRM_ATUAL <> CRM 

MAS ISTO NÃO É AE ENTÃO ELE NÃO GRAVA O LOTE.

Como então gravar o ultimo lote??

 

 

 



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



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

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

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




 






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

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

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




 





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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] Lote -ultimo Registro nao Pega

[Rodrigo Villaverde]

Coloque o next no final do loop e veja se vc consegue arrumar esse erro

-Mensagem original-
De: giuvany [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 23 de fevereiro de 2005 10:12
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Lote -ultimo Registro nao Pega


Seguinte pessoal esto escrevendo um arquivo de lote,

Só que tenho um problema é que o ultimo registro não consigo inserir o lote

Alguém pode me dar um help vejam o código abaixo:

 

 

 

 

while not dm_principal.query1.Eof>PEGANDO REGISTRO DA TABELA(QUERY1)

do begin

 

Write(meutxt,''+completa_string(6,dm_principal.query1CRM.Value,'N'));
---ESCREVENDO EM ARQUIVO

Write(meutxt,''+completa_string(50,dm_principal.query1VALOR_TOTAL.Value,'S')
); ---ESCREVENDO EM ARQUIVO

 

 

crm_atual:=dm_principal.query1CRM.Value;CRM>PEGANDO CRM ATUAL

 

 

dm_principal.query1.Next;   ->PROXIMO REGISTRO

 

 

 

if crm_atual<>dm_principal.query1CRM.Value then-->>>IF
CRM_ATUAL<> DO PROXIMO  VOU GRAVAR LOTE

begin

 

Write(meutxt,''+completa_string(50,dm_principal.Qry_Lotevalor_total.asstring
,'S'));  -> ESCREVENDO  VALOR TOTAL DE LOTE PARA CRM

Writeln(meutxt);

 

end;

 

crm_atual:=dm_principal.query1CRM.Value; -> ATUALIZA CRM_ATUAL

 

END;

 

 

 

Problema que no ultimo CRM ELE COMPARA SE CRM_ATUAL <> CRM 

MAS ISTO NÃO É AE ENTÃO ELE NÃO GRAVA O LOTE.

Como então gravar o ultimo lote??

 

 

 



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



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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] Data e MaskEdit! (Denovo!)

[Rodrigo Villaverde]

Procure no Help
DecodeDate
DecodeTime

-Mensagem original-
De: Rodrigo Izquierdo da Motta [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 22 de fevereiro de 2005 10:48
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Data e MaskEdit! (Denovo!)


Ola Lista!!!

Naum consigo achar como separar um dia de uma data,
naum sei nem por onde comecar, e o pior, depois eu
tenho que juntar pra fazer outra data, to cacando o
help e nada que ajude, sera que alguem pode dar uma
forcinha?

Obrigado

/*==*/

 --- Rodrigo Izquierdo da Motta <[EMAIL PROTECTED]>
escreveu: 
> 
>   Ola Lista!!!
> 
> Queria fazer umas brincadeiras com data, e naum
> consigo, deve ter algo pronto no Delphi, mas naum
> conheco. Eu tenho um MaskEdit, onde eu ponho uma
> Data,
> ai eu preciso depois da data posta, subtrair 1 dia,
> depois 2 dias, ai queria saber se jah tem uma
> maneira
> de fazer isso automaticamente, mas se naum tiver,
> alguem tem alguma ideia de como fazer na Mao mesmo?
> 
> Obrigado a todos
> 
> Rodrigo Izquierdo da Motta.
> 
> /*=*/
> 
> 
> =
>   Rodrigo Izquierdo da Motta.
> 
> 
> 
> 
>   
>   
>   
>
___
> 
> Yahoo! Acesso Grátis - Instale o discador do Yahoo!
> agora. http://br.acesso.yahoo.com/ - Internet rápida
> e grátis
> 
> 
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
> MENSAGEM >
> 
> Para ver as mensagens antigas, acesse:
>  http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
>  [EMAIL PROTECTED] ou
> [EMAIL PROTECTED]
>  
> Links do Yahoo! Grupos
> 
> 
> 
> http://br.yahoo.com/info/utos.html
> 
>  
> 
> 
> 
>  

=
  Rodrigo Izquierdo da Motta.







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


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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] Número randômico entre x e y

[Rodrigo Villaverde]

Camoloze, já havia verificado nessa unit, mas por via de dúvidas resolvi
verificar novamente, e constatei novamente que essa função não existe no
Delphi 5.
Valeu pela força! Qnd a empresa resolver migrar, já sei q no Delphi 7 tem
essa função.
Abraços

-Mensagem original-
De: Camoloze [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 10:46
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Número randômico entre x e y


Rodrigo uso a versão 7 e esta função esta na unit Math, dá uma olhada ai.
 
´[]´s  Camoloze

-Mensagem original-
De: Rodrigo Villaverde [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 10:21
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Número randômico entre x e y


Qual versão do Delphi vcs utilizam? Fui procurar essa função no meu help e
ela não existe nele. Uso o Delphi 5.

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 10:03
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] Número randômico entre x e y


Porque neguin não lê help :-/



[]s

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



> -Mensagem original-
> De: Camoloze [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 17 de fevereiro de 2005 10:03
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Número randômico entre x e y
> 
> 
> 
> Porque não usa a função RandomRange do Delphi?
>  
> Delphi syntax:
> function RandomRange(const AFrom, ATo: Integer): Integer;
>  
> Description
>  
> RandomRange returns a random integer from the range that 
> extends between
> AFrom and ATo (inclusive). RandomRange can handle negative 
> ranges (where
> AFrom is greater than ATo).
> To initialize the random number generator, add a single call 
> Randomize or
> assign a value to the RandSeed variable before making any calls to
> RandomRange.
>  
> []´s camoloze
> 
> -Mensagem original-
> De: Rodrigo Villaverde [mailto:[EMAIL PROTECTED] 
> Enviada em: quinta-feira, 17 de fevereiro de 2005 09:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Número randômico entre x e y
> 
> 
> Rapaz, ele é da família sim, mas eu não conheço.
> 
> -Mensagem original-
> De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED] 
> Enviada em: quinta-feira, 17 de fevereiro de 2005 09:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Número randômico entre x e y
> 
> 
> Funcionou...valeu rodrigo.
> 
> P.S.: Algum parentesco com o Darci Villaverde (violonista)?
> - Original Message -
> From: "Rodrigo Villaverde" <[EMAIL PROTECTED]>
> To: 
> Sent: Thursday, February 17, 2005 9:31 AM
> Subject: RES: [delphi-br] Número randômico entre x e y
> 
> 
> 
> function NumeroRandomicoIntervalo(LimiteInferior, 
> LimiteSuperior: Integer):
> Integer
> var
> NumeroAleatorio: Integer;
> begin
>   Randomize;
>   repeat
> NumeroAleatorio:= Random(LimiteSuperior);
>   until NumeroAleatorio >=  LimiteInferior;
>   NumeroRandomicoIntervalo:= NumeroAleatorio;
> end;
> 
> -Mensagem original-
> De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 17 de fevereiro de 2005 09:17
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Número randômico entre x e y
> 
> 
> Folks,
> 
> Preciso gerar um número randômico q esteja dentro de um 
> intervalo. Exemplo:
> 
> Números aleatórios entre 10 e 20
> 11, 19, 15
> 
> Sei utilizar a função random, mas esta me permite apenas estabelecer o
> limite superior...e o limite inferior? Alguém sabe?
> 
> [ ]'s
> 
> Rodrigo
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> 
> 
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 

RES: [delphi-br] Número randômico entre x e y

[Rodrigo Villaverde]

Qual versão do Delphi vcs utilizam? Fui procurar essa função no meu help e
ela não existe nele. Uso o Delphi 5.

-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 10:03
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: RES: [delphi-br] Número randômico entre x e y


Porque neguin não lê help :-/

 
 
 []s

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

> -Mensagem original-
> De: Camoloze [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 17 de fevereiro de 2005 10:03
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Número randômico entre x e y
> 
> 
> 
> Porque não usa a função RandomRange do Delphi?
>  
> Delphi syntax:
> function RandomRange(const AFrom, ATo: Integer): Integer;
>  
> Description
>  
> RandomRange returns a random integer from the range that 
> extends between
> AFrom and ATo (inclusive). RandomRange can handle negative 
> ranges (where
> AFrom is greater than ATo).
> To initialize the random number generator, add a single call 
> Randomize or
> assign a value to the RandSeed variable before making any calls to
> RandomRange.
>  
> []´s camoloze
> 
> -Mensagem original-
> De: Rodrigo Villaverde [mailto:[EMAIL PROTECTED] 
> Enviada em: quinta-feira, 17 de fevereiro de 2005 09:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: RES: [delphi-br] Número randômico entre x e y
> 
> 
> Rapaz, ele é da família sim, mas eu não conheço.
> 
> -Mensagem original-
> De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED] 
> Enviada em: quinta-feira, 17 de fevereiro de 2005 09:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] Número randômico entre x e y
> 
> 
> Funcionou...valeu rodrigo.
> 
> P.S.: Algum parentesco com o Darci Villaverde (violonista)?
> - Original Message -
> From: "Rodrigo Villaverde" <[EMAIL PROTECTED]>
> To: 
> Sent: Thursday, February 17, 2005 9:31 AM
> Subject: RES: [delphi-br] Número randômico entre x e y
> 
> 
> 
> function NumeroRandomicoIntervalo(LimiteInferior, 
> LimiteSuperior: Integer):
> Integer
> var
> NumeroAleatorio: Integer;
> begin
>   Randomize;
>   repeat
> NumeroAleatorio:= Random(LimiteSuperior);
>   until NumeroAleatorio >=  LimiteInferior;
>   NumeroRandomicoIntervalo:= NumeroAleatorio;
> end;
> 
> -Mensagem original-
> De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 17 de fevereiro de 2005 09:17
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] Número randômico entre x e y
> 
> 
> Folks,
> 
> Preciso gerar um número randômico q esteja dentro de um 
> intervalo. Exemplo:
> 
> Números aleatórios entre 10 e 20
> 11, 19, 15
> 
> Sei utilizar a função random, mas esta me permite apenas estabelecer o
> limite superior...e o limite inferior? Alguém sabe?
> 
> [ ]'s
> 
> Rodrigo
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
> 
> 
> 
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> 
> 
>

RES: [delphi-br] Número randômico entre x e y

[Rodrigo Villaverde]

Rapaz, ele é da família sim, mas eu não conheço.

-Mensagem original-
De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 09:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Número randômico entre x e y


Funcionou...valeu rodrigo.

P.S.: Algum parentesco com o Darci Villaverde (violonista)?
- Original Message -
From: "Rodrigo Villaverde" <[EMAIL PROTECTED]>
To: 
Sent: Thursday, February 17, 2005 9:31 AM
Subject: RES: [delphi-br] Número randômico entre x e y



function NumeroRandomicoIntervalo(LimiteInferior, LimiteSuperior: Integer):
Integer
var
NumeroAleatorio: Integer;
begin
  Randomize;
  repeat
NumeroAleatorio:= Random(LimiteSuperior);
  until NumeroAleatorio >=  LimiteInferior;
  NumeroRandomicoIntervalo:= NumeroAleatorio;
end;

-Mensagem original-
De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 17 de fevereiro de 2005 09:17
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Número randômico entre x e y


Folks,

Preciso gerar um número randômico q esteja dentro de um intervalo. Exemplo:

Números aleatórios entre 10 e 20
11, 19, 15

Sei utilizar a função random, mas esta me permite apenas estabelecer o
limite superior...e o limite inferior? Alguém sabe?

[ ]'s

Rodrigo


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



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

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

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

Links do Yahoo! Grupos











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

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

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

Links do Yahoo! Grupos















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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] Número randômico entre x e y

[Rodrigo Villaverde]

function NumeroRandomicoIntervalo(LimiteInferior, LimiteSuperior: Integer):
Integer
var
NumeroAleatorio: Integer;
begin
  Randomize;
  repeat
NumeroAleatorio:= Random(LimiteSuperior);
  until NumeroAleatorio >=  LimiteInferior;
  NumeroRandomicoIntervalo:= NumeroAleatorio;
end;

-Mensagem original-
De: Rodrigo Ribeiro [mailto:[EMAIL PROTECTED] 
Enviada em: quinta-feira, 17 de fevereiro de 2005 09:17
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Número randômico entre x e y


Folks,

Preciso gerar um número randômico q esteja dentro de um intervalo. Exemplo: 

Números aleatórios entre 10 e 20
11, 19, 15

Sei utilizar a função random, mas esta me permite apenas estabelecer o
limite superior...e o limite inferior? Alguém sabe?

[ ]'s

Rodrigo


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



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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] como medir tempo de resposta do banco

[Rodrigo Villaverde]

Vc tem dois modos de fazer isso.
Olhando o log de transações do banco de dados, ou via programação.
Caso vc tenha como monitorar esses dois tipos de log, vc tem como verificar
também o tempo de tráfego da informação na rede.

Um abraço

-Mensagem original-
De: delphi6_2005 [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 16 de fevereiro de 2005 16:16
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] como medir tempo de resposta do banco



Amigos precisava medir o tempo de resposta de minhas transações no 
banco.
Existe algum componente ou função para isso.


Agradeço a ajuda dos amigos.


Paulo





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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] RES: DESAFIO: Grade de Horário Escolar

[Rodrigo Villaverde]

Josir, infelizmente eu não posso passar esse arquivo pela net. Assinei um
contrato de confidenciabilidade, desculpe.

-Mensagem original-
De: Josir Gomes [mailto:[EMAIL PROTECTED] 
Enviada em: quarta-feira, 16 de fevereiro de 2005 09:11
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] RES: DESAFIO: Grade de Horário Escolar


Olá CEJUS, 

a forma de resolver isso que eu conheço é com Pesquisa Operacional
(Programação Linear, utilizando o método Simplex). Tem até algoritmos
prontos para resolver isso na Internet.

Mas se vc nunca estudou o tema, um livro sobre o assunto é fundamental para
vc entender a teoria.
Se quiser um bom livro:

Pesquisa Operacional
Gerson Lachtermacher
Editora Campus/Elsevier

É bem didático e vem recheado de exemplos práticos.

Rodrigo, vc pode passar bibliografia ou link na internet de como se resolve
isso com "algoritmo recursivo" ?

> Isso se resolve tranquilamente com algoritmo recursivo.

Saudações a todos,
Josir Gomes


-Mensagem original-
De: CEJUS [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 15 de fevereiro de 2005 16:46
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] DESAFIO: Grade de Horário Escolar
Prioridade: Alta


Como faço uma grade de horários para não ficar quebrada nos horários ou
seja, dispor na melhor forma possível os períodos, tentei começar mas não
consegui terminar pois acontece o seguinte, na 3ª e quartas turmas falta
horários pq o sistema joga todas aulas conforme exemplo:



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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] off topic- Re: Mensalidades... (Resposta)

[Rodrigo Villaverde]

Giovani, primeiramente desculpe se te ofendi dizendo para não fazerem
aquilo.
Agora sobre a degradação de performance...
Executando do modo que vc havia dito, o servidor faria um full table scan,
encaminhando todo o resultado pela rede.
Até aqui vc degradaria o tráfego da rede. Imagine o seguinte cenário:
conectado por Dial-up em um servidor remoto, por linha discada a 56Kbps. Seu
link estaria completamente comprometido, isso sem contar que você pode ter
milhões de registros transitando nesse link.
Sobre o loop... princípios de best pratices. Todo loop degrada a performance
de qualquer aplicação, portanto use com moderação.
Eu executei um loop básico que segue abaixo

For Contador:= 1 to 30 do

Essa simples instrução no meu servidor durou apenas 5 segundos. E olha que
30 registros retornados é facilmente obtido por uma query simples.
A mesma instrução variando de 1 a 100 durou 13 segundos.
Esse mesmo loop foi executado em máquinas clientes e duraram 15% a mais.
Outro motivo. Utilize sempre a arquitetura cliente-servidor. Como o servidor
é uma máquina com maior capacidade de processamento, porque trazer o
trabalho para uma máquina de menor capacidade? Mesmo que essa rotina seja
executada uma vez por mês, não existe o porquê trazer o processamento para
uma máquina de menor capacidade.
Outro fator para melhorar a performance, é fazer essa rotina como Stored
Procedure. Já aconteceu de rotinas que haviam sido implementadas no cliente
que foram transformadas em Stored Procedures que melhoraram o tempo de
resposta em 35%.
Bem, agora sobre fevereiro... Realmente do modo que coloquei no meu exemplo
não prevê os 28 ou 29 dias de fevereiro. É um caminho das pedras, e não a
solução pronta. O que deve ser feito é tratar sempre pelo mês, ou seja,
criar uma rotina para tirar três meses e retornar a data base.
Quanto aos diferentes dias de vencimento, como foi dito no e-mail, só serve
o exemplo que passei se a rotina for para 90 dias CORRIDOS a partir do
vencimento. Caso a rotina seja por dias acumulados, deve-se fazer com um
loop. Nesse caso recomendo implementar em uma Stored Procedure e retorar
apenas os usuários que estão em atraso a 90 dias ACUMULADOS.
E os que foram pagos mesmo fora do vencimento, não estão atrasados, pois já
foram pagos.

Sem mais.


-Mensagem original-
De: Giovani - Terra [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 15 de fevereiro de 2005 18:41
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Re: Mensalidades...


Sr. Rodrigo...

E em fevereiro?
E quando o pagamento for feito em dias diferenciados?
Nunca fale NÃO FAÇA ISSO para alguém que está tentando ajudar, ok?
O negócio é o seguinte...
Quando alguém pede uma ajuda, está tentando solucionar um problema. O fato é
que existem n maneiras para solucionar o mesmo problema. Se você pensa
diferente do que eu penso, ótimo, pois isso é baseado no fator humano.

Outra coisa... Porque sacrificar a performance dentro de um loop?
Isso vai ser feito para um UNICO CLIENTE, e somente em 3 meses... Não
entendi aí o fator performance. Gostaria que fosse explanado.



  - Original Message - 
  From: Rodrigo Villaverde 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 15, 2005 3:02 PM
  Subject: RES: [delphi-br] Re: Mensalidades...


  Não faça isso! Não sacrifique a performance do seu aplicativo!

  Resolva isso com uma instrução SQL

  Const
  DiasAtrazados= 90;

  Var
  DataLimite: TDateTime;

  DataLimite:= Now - DiasAtrazados;

  ...

  Dentro da sua cláusula where coloque a seguinte condição

  DataVencimento < DataLimite

  Se a pesquisa retornar vazia, é sinal que não existem mensalidades com
mais
  de 3 meses de atraso.
  Mas isso só vai funcionar se o período que quer medir é dias corridos à
  partir do vencimento. Se for por dias acumulados de todos os atrasos, a
  cláusula where acima não irá funcionar.


  --

No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/2/2005


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



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

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

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




 






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

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

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

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

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

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

 

RES: [delphi-br] DESAFIO: Grade de Horário Escolar

[Rodrigo Villaverde]

Eu já fiz um com algorítimo recursivo. Interessante vcs terem usado IA para
resolver essa questão. Já trabalhei com isso para uma consultoria de análise
de comportamento da Bolsa de São Paulo.
Um abraço

-Mensagem original-
De: Rodrigo Othavio Farias [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 15 de fevereiro de 2005 17:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] DESAFIO: Grade de Horário Escolar


Eu participei do desenvolvimento de um software de Controle de Grade
horaria, pra vc ter ideia do tamanho do pepino foi utilizado Inteligencia
Artificial para tentar resolver esse problema de alocação dos professores,
pq qualquer tentativa de programação normal nao é eficaz nesses casos, só
aplicando teorias de IA pra resolver esse tipo de problema tendo o minimo de
intervenção humana, mundialmente esse tipo de problema de alocação de
recussos é estudado e exsitem varias teorias para resolve-lo.

Entao das duas duas uma, ou vc usa programação normal e o usuario vai ter
que arrumar toda a grade horaria na mao ou aplica alguma teoria
compuatacional voltada para alocação de recursos.

No Brasil existiam na época eu trabalhei com isso 2 sistemas que tratavam
desse problema, o nosso que utilizava IA e necessitava de minima intervenção
humana e um outro do Grupo Expoente que era quase 100% braçal, o usuario
acabava montando ele mesmo a grade horaria.



[]´s
Rodrigo O. Farias
- Original Message - 
From: Rodrigo Villaverde
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, February 15, 2005 4:47 PM
Subject: RES: [delphi-br] DESAFIO: Grade de Horário Escolar


Isso se resolve tranquilamente com algoritmo recursivo.


-Mensagem original-
De: CEJUS [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 15 de fevereiro de 2005 16:46
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] DESAFIO: Grade de Horário Escolar
Prioridade: Alta


Como faço uma grade de horários para não ficar quebrada nos horários ou
seja, dispor na melhor forma possível os períodos, tentei começar mas não
consegui terminar pois acontece o seguinte, na 3ª e quartas turmas falta
horários pq o sistema joga todas aulas conforme exemplo:

Segunda  TerçaQuarta  Quinta  Sexta
Português  Matemática  História  Inglês  Geografia
Português  Matemática  História  Inglês  Geografia
Matemática  Português  Ciências  Ed. Física  Religião
Matemática  Português  Ciências  Ed. Física  Ed.
Artística

Matemática  Português  Ciências  Ed. Física  Religião
Matemática  Português  Ciências  Ed. Física  Ed.
Artística
Português  Matemática  História  Inglês  Geografia
Português  Matemática  História  Inglês  Geografia

História  Inglês  Português  Matemática  -
História  Inglês  Português  Matemática  -
Ciências  Ed. Física  Matemática  Português   Religião
Ciências  Ed. Física  Matemática  Português  Ed.
Artística

Ciências  Ed. Física  Matemática  Português   Religião
Ciências  Ed. Física  Matemática  Português  Ed.
Artística
História  Inglês  Português  Matemática  -
História  Inglês  Português  Matemática  -

Nota-se que os professores não estarão em turmas diferentes no mesmo horário
Pode se ministrar no máximo 2 horários por dia por matéria

Períodos por semana:
Port. 4
Mat 4
Religião 1
Ed. Artística 1
O resto das matérias são 2 periodos por semana

Ou seja, ele maneja os horários da primeira forma que vier e não da melhor
forma que tiver.

Alguém já fez algum programa similar? Ou tem alguma idéia de como resolver o
problema?


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/2/2005




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

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

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

Links do Yahoo! Grupos











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

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

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



Yahoo! Grupos, um serviço oferecido por:








Links do Yahoo! Grupos

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

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

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



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

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

RES: [delphi-br] DESAFIO: Grade de Horário Escolar

[Rodrigo Villaverde]

Eu já fim um com algorítimo recursivo

-Mensagem original-
De: Rodrigo Othavio Farias [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 15 de fevereiro de 2005 17:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] DESAFIO: Grade de Horário Escolar


Eu participei do desenvolvimento de um software de Controle de Grade
horaria, pra vc ter ideia do tamanho do pepino foi utilizado Inteligencia
Artificial para tentar resolver esse problema de alocação dos professores,
pq qualquer tentativa de programação normal nao é eficaz nesses casos, só
aplicando teorias de IA pra resolver esse tipo de problema tendo o minimo de
intervenção humana, mundialmente esse tipo de problema de alocação de
recussos é estudado e exsitem varias teorias para resolve-lo.

Entao das duas duas uma, ou vc usa programação normal e o usuario vai ter
que arrumar toda a grade horaria na mao ou aplica alguma teoria
compuatacional voltada para alocação de recursos.

No Brasil existiam na época eu trabalhei com isso 2 sistemas que tratavam
desse problema, o nosso que utilizava IA e necessitava de minima intervenção
humana e um outro do Grupo Expoente que era quase 100% braçal, o usuario
acabava montando ele mesmo a grade horaria.



[]´s
Rodrigo O. Farias
- Original Message - 
From: Rodrigo Villaverde
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, February 15, 2005 4:47 PM
Subject: RES: [delphi-br] DESAFIO: Grade de Horário Escolar


Isso se resolve tranquilamente com algoritmo recursivo.


-Mensagem original-
De: CEJUS [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 15 de fevereiro de 2005 16:46
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] DESAFIO: Grade de Horário Escolar
Prioridade: Alta


Como faço uma grade de horários para não ficar quebrada nos horários ou
seja, dispor na melhor forma possível os períodos, tentei começar mas não
consegui terminar pois acontece o seguinte, na 3ª e quartas turmas falta
horários pq o sistema joga todas aulas conforme exemplo:

Segunda  TerçaQuarta  Quinta  Sexta
Português  Matemática  História  Inglês  Geografia
Português  Matemática  História  Inglês  Geografia
Matemática  Português  Ciências  Ed. Física  Religião
Matemática  Português  Ciências  Ed. Física  Ed.
Artística

Matemática  Português  Ciências  Ed. Física  Religião
Matemática  Português  Ciências  Ed. Física  Ed.
Artística
Português  Matemática  História  Inglês  Geografia
Português  Matemática  História  Inglês  Geografia

História  Inglês  Português  Matemática  -
História  Inglês  Português  Matemática  -
Ciências  Ed. Física  Matemática  Português   Religião
Ciências  Ed. Física  Matemática  Português  Ed.
Artística

Ciências  Ed. Física  Matemática  Português   Religião
Ciências  Ed. Física  Matemática  Português  Ed.
Artística
História  Inglês  Português  Matemática  -
História  Inglês  Português  Matemática  -

Nota-se que os professores não estarão em turmas diferentes no mesmo horário
Pode se ministrar no máximo 2 horários por dia por matéria

Períodos por semana:
Port. 4
Mat 4
Religião 1
Ed. Artística 1
O resto das matérias são 2 periodos por semana

Ou seja, ele maneja os horários da primeira forma que vier e não da melhor
forma que tiver.

Alguém já fez algum programa similar? Ou tem alguma idéia de como resolver o
problema?


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/2/2005




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

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

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

Links do Yahoo! Grupos











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

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

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



Yahoo! Grupos, um serviço oferecido por:








Links do Yahoo! Grupos

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

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

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



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

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

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




 






-- 
<<<<<

RES: [delphi-br] DESAFIO: Grade de Horário Escolar

[Rodrigo Villaverde]

Isso se resolve tranquilamente com algoritmo recursivo.


-Mensagem original-
De: CEJUS [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 15 de fevereiro de 2005 16:46
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] DESAFIO: Grade de Horário Escolar
Prioridade: Alta


Como faço uma grade de horários para não ficar quebrada nos horários ou
seja, dispor na melhor forma possível os períodos, tentei começar mas não
consegui terminar pois acontece o seguinte, na 3ª e quartas turmas falta
horários pq o sistema joga todas aulas conforme exemplo:

Segunda Terça   Quarta  Quinta  Sexta
Português   Matemática  HistóriaInglês  Geografia
Português   Matemática  HistóriaInglês  Geografia
Matemática  Português   CiênciasEd. Física  Religião
Matemática  Português   CiênciasEd. Física  Ed.
Artística

Matemática  Português   CiênciasEd. Física  Religião
Matemática  Português   CiênciasEd. Física  Ed.
Artística
Português   Matemática  HistóriaInglês  Geografia
Português   Matemática  HistóriaInglês  Geografia

HistóriaInglês  Português   Matemática  -
HistóriaInglês  Português   Matemática  -
CiênciasEd. Física  Matemática  Português   Religião
CiênciasEd. Física  Matemática  Português   Ed.
Artística

CiênciasEd. Física  Matemática  Português   Religião
CiênciasEd. Física  Matemática  Português   Ed.
Artística
HistóriaInglês  Português   Matemática  -
HistóriaInglês  Português   Matemática  -

Nota-se que os professores não estarão em turmas diferentes no mesmo horário
Pode se ministrar no máximo 2 horários por dia por matéria

Períodos por semana:
Port. 4
Mat 4
Religião 1
Ed. Artística 1
O resto das matérias são 2 periodos por semana

Ou seja, ele maneja os horários da primeira forma que vier e não da melhor
forma que tiver.

Alguém já fez algum programa similar? Ou tem alguma idéia de como resolver o
problema?


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/2/2005
 



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

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

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




 






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

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

[Rodrigo Villaverde]

Não faça isso! Não sacrifique a performance do seu aplicativo!

Resolva isso com uma instrução SQL

Const
DiasAtrazados= 90;

Var
DataLimite: TDateTime;

DataLimite:= Now - DiasAtrazados;

...

Dentro da sua cláusula where coloque a seguinte condição

DataVencimento < DataLimite

Se a pesquisa retornar vazia, é sinal que não existem mensalidades com mais
de 3 meses de atraso.
Mas isso só vai funcionar se o período que quer medir é dias corridos à
partir do vencimento. Se for por dias acumulados de todos os atrasos, a
cláusula where acima não irá funcionar.


-Mensagem original-
De: Giovani - Terra [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 15 de fevereiro de 2005 14:47
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Re: Mensalidades...


Bom, primeiramente, o teu sistema provavelmente terá alguém para realizar a
baixa desse pagamento.
Então é fácil.
Quando o sócio for pagar, a pessoa vai inserir os dados dentro do sistema,
certo?
Nesse momento, faça um loop dentro da sua base de dados, verificando se há
um atraso de 3 meses de pagamento.
Se houver, dê uma mensagem para a pessoa que estiver inserindo os dados.

Por exemplo:

A hora que for clicado em um botão (por exemplo), faça o seguinte:

DataAtual := Data de hoje; (22/12/1999) //Datas fictícias
Pegue o mês da data atual (use o decodedate), e diminua 3 (pois daí serão os
3 últimos meses).
Então vai ficar no mes 9.
Faça um loop, verificando se houve pagamento no mes 9, 10 e 11.
Se os três estiverem em branco, é sinal que o cara está atrasado :)

Acho que é mais ou menos isso que você tem que fazer...
Qualquer coisa, dá um toque, ok?





-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/02/2005



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

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

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




 






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

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.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] Acess Violation ( Desenvolver em equipe é F**a!! )

[Rodrigo Villaverde]

Esse problema está ocorrendo quando o Garbage Collection é executado.
Verifique os recursos que estão ativos no seu aplicativo quando esse erro
ocorre.

-Mensagem original-
De: [> Mutuka <] [mailto:[EMAIL PROTECTED] 
Enviada em: segunda-feira, 14 de fevereiro de 2005 15:38
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Acess Violation ( Desenvolver em equipe é F**a!! )


Boa tarde a todos... ferramentas: Delphi 6 Mysql.

Problema: como programamos em uma epique as vezes
nao eh possível mais achar onde esta ocorrendo um
erro q alguem cometeu... Estou tendo um Acess
Violation "00024E0" Read Address "05A13280" qndo
fecho o sistema, não eh sempre q ocorre cerca de
8 em 10 vezes... 

Alguem tem uma ideia de onde poderia partir para
eu tentar achar?

Obrigado a todos!!!

=

   Leandro...

[> Mutuka <]  






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


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

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

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




 






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

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

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

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

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

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