[delphi-br] Manter o programa sempre ativo

[Fabio R Cardoso]

Pessoal, boa tarde.
Desejo fazer um programa simples que faça uma tarefa simples:
O programa deve deixar a janela ativa sempre ativa, ou seja: supondo que 
estou trabalhando com o word, daí de repente o windows manda um alerta 
sobre qualquer coisa, ou outro aplicativo que faz aparecer um alerta na 
tela, por cima do word. Isso faz o word perder o foco e alguns 
caracteres que eu estava digitando.
Portanto, quero que minha aplicação funcione em background monitorando a 
janela ativa e não deixando outro aplicativo aparecer de repente e 
faze-la perder o foco.

Alguém ajuda?

Fabio.

[delphi-br] Tabela com CEP

[Fabio R Cardoso]

Moçada, onde encontro uma tabela em Firebird com os CEP cadastrados?

grato,

Fabio.

Re: [delphi-br] Não consigo mudar o hei ght e width

[Fabio R Cardoso]

Sim, verifiquei. Infelizmente concluí que no Delphi 7 não dá pra fazer o 
form ter dimensões maiores que a resolução do monitor.


Fabio.


Eric Roberto Darruiz escreveu:
>
> Já verificou a propriedade Constraints do form (MaxHeight, MinHeight, 
> MaxWidth e MinWidth)?
> Defina os 4 para 0 e tente alterar novamente o tamanho e largura do form.
>
> []'s
>
> Eric
>
> - Original Message -
> From: Juliano Silva - Yahoo
> To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Sent: Tuesday, November 25, 2008 10:16 AM
> Subject: RES: [delphi-br] Não consigo mudar o height e width
>
> Bom dia
>
> Vou dizer uma besteira, acredito que já deva ter tentado, altera as
> propriedades
>
> PrintScale = poProportional
>
> WindowsState =wsMaximized
>
> Mas acredito que você já deva ter tentado isso...
>
> Juliano
>
> De: delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br> 
> [mailto:delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br>] Em
> nome de Fabio R Cardoso
> Enviada em: segunda-feira, 24 de novembro de 2008 19:08
> Para: delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br>; 
> [EMAIL PROTECTED] <mailto:lista-delphi%40yahoogrupos.com.br>
> Assunto: [delphi-br] Não consigo mudar o height e width
>
> Senhores, até me dá vergonha me dizer isso, mas não consigo mudar o
> height e o width do meu form.
>
> É o seguinte, desenvolvi um sistema para um cliente que usa resolução
> 1440x990. Porém o meu PC é o clássico 1024x768.
>
> Agora preciso ajustar os forms para a resolução dele, compilar e
> entregar. Porém, 1024x768 é a resolução máxima do meu monitor e não
> consigo alterar as propriedades width e height do meu form. Quando
> altero, por exemplo, o width para 1440, o Delphi muda sozinho para 1036.
> As propriedades Autosize e Autoscroll estão como False.
>
> Fabio.
>
> __ Informação do NOD32 IMON 3637 (20081124) __
>
> Esta mensagem foi verificada pelo NOD32 sistema antivírus
> http://www.eset.com.br <http://www.eset.com.br>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  

[delphi-br] Não consigo mudar o height e width

[Fabio R Cardoso]

Senhores, até me dá vergonha me dizer isso, mas não consigo mudar o 
height e o width do meu form. 

É o seguinte, desenvolvi um sistema para um cliente que usa resolução 
1440x990. Porém o meu PC é o clássico 1024x768. 

Agora preciso ajustar os forms para a resolução dele, compilar e 
entregar. Porém, 1024x768 é a resolução máxima do meu monitor e não 
consigo alterar as propriedades width e height do meu form. Quando 
altero, por exemplo, o width para 1440, o Delphi muda sozinho para 1036. 
As propriedades Autosize e Autoscroll estão como False. 


Fabio.

[delphi-br] Filtrando dados

[Fabio R Cardoso]

Senhores, quero fazer o seguinte: possuo três tabelas listadas abaixo.


FORNECEDORES
forne_codigo integer not null primary key
fone_nome varchar(50)


PRODUTOS
produ_codigo integer not null primary key
produ_codigofornecedor* integer not null
produ_descricao varchar(50)
* FK com tabela fornecedores


ITENS_DE_COMPRA
icomp_codigo integer not null primary key
icomp_codigoproduto* integer not null
icomp_codigofornecedor** integer not null
* FK com tabela produtos
** FK com tabela fornecedores


Pergunto: Quando manipulo ITENS_DE_VENDA, tenho um dblookupcombobox que 
lista os fornecedores. Certo. Logo abaixo, tenho outro que lista os 
produtos. Quase certo. Quero que esse último liste apenas os produtos 
cadastrado com o fornecedor selecionado no primeiro dblookupcombobox. 
Sem usar filtro em tabela nem SQL diferente. Eu já fiz isso uma vez 
usando campos lookup e os ditos dblookupcombobox. Porém, não me lembro 
como.

Fabio.

Re: [delphi-br] Relação muitos-para-muitos. . socorro!

[Fabio R Cardoso]

Resolvido. Muito obrigado a Alosi e JB!

abraço a todos.
Fabio.

[delphi-br] Relação muitos-para-muitos.. socorro!

[Fabio R Cardoso]

Senhores, tenho 3 tabelas, Clientes, Modalidades e Codcli. Clientes e 
Modalidades tem relação muitos-para-muitos. Para trabalhar com elas, 
criei a tabela Modcli. As ddls delas estão abaixo:

CREATE TABLE CLIENTES (
CLIEN_CODIGO integer NOT NULL,
CLIEN_NOME VARCHAR(50) NOT NULL);
commit;

CREATE TABLE MODALIDADES (
MODAL_CODIGO INTEGER NOT NULL,
MODAL_CLIENTECODIGO INTEGER,
MODAL_DESCRICAO VARCHAR(50));
commit;

ALTER TABLE MODALIDADES ADD CONSTRAINT PK_MODALCODIGO PRIMARY KEY 
(MODAL_CODIGO) USING INDEX IDX_MODALCODIGO;
commit;

ALTER TABLE MODALIDADES ADD CONSTRAINT FK_MODALCODIGOCLIENTE FOREIGN KEY 
(MODAL_CLIENTECODIGO) REFERENCES CLIENTES (CLIEN_CODIGO) USING INDEX 
IDX_MODALCODIGOCLIENTE;
commit;

CREATE TABLE MODCLI (
MODCL_CODIGO INTEGER NOT NULL,
MODCL_CODIGOCLIENTE INTEGER,
MODCL_CODIGOMODALIDADE INTEGER);
COMMIT;

ALTER TABLE MODCLI ADD CONSTRAINT PK_MODCLICODIGO PRIMARY KEY 
(MODCL_CODIGO)
USING INDEX IDX_MODCLCODIGO;
COMMIT;

ALTER TABLE MODCLI ADD CONSTRAINT FK_MODCLICODIGOCLIENTE FOREIGN KEY 
(MODCL_CODIGOCLIENTE) REFERENCES CLIENTES (CLIEN_CODIGO) USING INDEX 
IDX_MODCLCODIGOCLIENTE;
COMMIT;

ALTER TABLE MODCLI ADD CONSTRAINT FK_MODCLICODIGOMODALIDADE FOREIGN KEY 
(MODCL_CODIGOMODALIDADE) REFERENCES MODALIDADES (MODAL_CODIGO) USING 
INDEX IDX_MODCLCODIGOMODALIDADE;
COMMIT;


A pergunta é: Como faço o select do SQL para trabalhar com a tabela Modcli?


Grato,
Fabio

Re: Res: [delphi-br] ajuda com trigger ou SP - PELAMORDEDEUS

[Fabio R Cardoso]

Olá Coutinho,

Sim, é isso que eu quis dizer, conforme você falou e o Moacir também. Só 
que quero controlar a baixa dos insumos por trigger. O problema é que 
não sei fazer tal trigger.

abraço,

Fabio.


Coutinho - Yahoo escreveu:
>
> Colega... deixa eu pegar o bonde andando...
> Você tem duas instâncias diferentes...
> uma é fabricar o pão... na minha opinião, aí vc deveria dar baixa na
> farinha...
> e a outra é a venda do pão... nela então você daria baixa do pão...
>
> fazer as duas coisas deixa um gap, de não baixar a farinha caso uma
> parte do pão não seja vendida!!!
> Algumas fábricas de pão mandam parte dos pães não vendidos para virarem
> torradas, e aí já é um outro produto
>
> Pense nisso!!!
>
> Sds
> Emanuel Coutinho
>
> Fabinho escreveu:
> >
> > Olá Moacir,
> >
> > Na verdade vou comprar farinha e depois produzir o pão. Comprando
> > farinha, adiciono seu estoque e depois que eu produzir o pão, dou
> > baixa no estoque de farinha e aumento o estoque de pão. Quando eu
> > vender o pão, baixo o estoque do pão.
> >
> > Por isso, tenho os produtos e insumos cadastrados na tabela PRODUTOS e
> > a ficha técnica desses produtos cadastrados na tabela COMPOSICAO.
> >
> > Como o pão tem seus insumos cadastrados na tabela COMPOSICAO, quando
> > eu vender o pão, tenho que varrer a tabela de INSUMOS para verificar a
> > quantidade de farinha de que é feito o pão e dar baixa no estoque
> > dessa farinha, que fica na tabela PRODUTOS.
> >
> > Se não consegui ser bem claro, por favor, me diga que explico melhor.
> >
> > Fabio.
> >
> > 
> > De: Moacir - GMail <[EMAIL PROTECTED] <mailto:prismars%40gmail.com> 
> <mailto:prismars%40gmail.com>>
> > Para: delphi-br@yahoogrupos.com.br 
> <mailto:delphi-br%40yahoogrupos.com.br> 
> <mailto:delphi-br%40yahoogrupos.com.br>
> > Enviadas: Sexta-feira, 31 de Outubro de 2008 7:53:34
> > Assunto: Re: [delphi-br] ajuda com trigger ou SP - PELAMORDEDEUS
> >
> > Fabio,
> >
> > Voce vai comprar pão e quer adicionar estoque em farinha, leite e etc ??
> >
> > Acredito que voce deva estar comprando farinha, leite, etc e depois
> > produzindo o pão, correto ?
> >
> > Se este for o caso voce deve dar entrada dos insumos para fabricação do
> > pão e ao produzi-lo dar baixa dos insumos utilizados.
> >
> > [ ]´s
> >
> > Moacir
> >
> > Fabio R Cardoso escreveu:
> > > Antes agradeço a ajuda do Carlos Cantu pelo problema do IBexpert 
> de não
> > > mostrar mensagens de erro. Porém, não consegui solucioná-lo ainda.
> > >
> > > Vamos lá. Senhores, tenho as tabelas abaixo no meu sistema:
> > >
> > > PRODUTOS
> > > COMPOSICAO
> > > COMPRAS
> > >
> > >
> > > Fiz uma trigger que, quando faço uma compra, ele aumenta o estoque dos
> > > produtos adquiridos na tabela compras. Até aí ok. Porém, há produtos
> > > formados por outros produtos, na qual estes estão na tabela 
> COMPOSICAO.
> > > É assim, por exemplo:
> > >
> > > PRODUTOS (código e descrição)
> > > 1 - coca cola
> > > 2 - pão francês
> > > 3 - farinha de trigo
> > > 4 - leite
> > > 5 - noz moscada
> > >
> > > COMPOSICAO (código, código do produto e qtde)
> > > 1 - 2 (farinha de trigo) - 20g
> > > 2 - 2 (leite) - 1l
> > >
> > > Observem que apenas o produto 2 (pão francês) possui registros na
> > > composição, uma vez que ele é feito de outros produtos.
> > >
> > > Eu quero criar um processo automático para varrer a composição do
> > > produto comprado e adicionar o estoque dos produtos na composição do
> > > produto.
> > >
> > > Espero ter conseguido explicar. Por favor, me ajudem.
> > >
> > > Fabio.
> > >
> > >
> > >  - - --
> > >
> > >
> >
> >
> > Novos endereços, o Yahoo! que você conhece. Crie um email novo com a
> > sua cara @ymail.com ou @rocketmail.com.
> > http://br.new.mail.yahoo.com/addresses 
> <http://br.new.mail.yahoo.com/addresses>
> > <http://br.new.mail.yahoo.com/addresses 
> <http://br.new.mail.yahoo.com/addresses>>
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
>
>  

[delphi-br] ajuda com trigger ou SP - PELAMORDEDEUS

[Fabio R Cardoso]

Antes agradeço a ajuda do Carlos Cantu pelo problema do IBexpert de não 
mostrar mensagens de erro. Porém, não consegui solucioná-lo ainda.

Vamos lá. Senhores, tenho as tabelas abaixo no meu sistema:

PRODUTOS
COMPOSICAO
COMPRAS


Fiz uma trigger que, quando faço uma compra, ele aumenta o estoque dos 
produtos adquiridos na tabela compras. Até aí ok. Porém, há produtos 
formados por outros produtos, na qual estes estão na tabela COMPOSICAO. 
É assim, por exemplo:

PRODUTOS (código e descrição)
1 - coca cola
2 - pão francês
3 - farinha de trigo
4 - leite
5 - noz moscada

COMPOSICAO (código, código do produto e qtde)
1 - 2 (farinha de trigo) - 20g
2 - 2 (leite) - 1l

Observem que apenas o produto 2 (pão francês) possui registros na 
composição, uma vez que ele é feito de outros produtos.

Eu quero criar um processo automático para varrer a composição do 
produto comprado e adicionar o estoque dos produtos na composição do 
produto.

Espero ter conseguido explicar. Por favor, me ajudem.

Fabio.

Re: [delphi-br] Firebird, qual componente usar?

[Fabio R Cardoso]

Eu uso o FIBPlus. Excelente.


sds,
Fabio.


Daniel Bastos escreveu:
>
> Zeos tb da suporte a firebird
>
> 2008/8/15 Darkzad <[EMAIL PROTECTED] >
>
> > Instalei o IBO mas ele vem com vários componentes, vou fazer alguns
> > testes.
> >
> > Valeu
> >
> >
> > - Original Message -
> > From: Andrei Luís
> > To: delphi-br@yahoogrupos.com.br 
>  
> > Sent: Friday, August 15, 2008 3:14 PM
> > Subject: Re: [delphi-br] Firebird, qual componente usar?
> >
> > O IBO não é free como nosso colega falou, mas tem um tipo de licença
> > chamado
> > Trustware, que como o nome fala, é na base da confiança. Você 
> solicita essa
> > licença pro desenvolvedor do IBO e ele te manda o produto full, aí 
> qdo você
> > começar a lucrar com o seu desenvolvimento faz a aquisição do produto.
> >
> > Eu utilizo IBO e é muito bom!
> >
> > []
> > Andrei
> >
> > 2008/8/15 Fellipe Henrique <[EMAIL PROTECTED] 
>  >
> >
> > > Bom, primeiro o IBO não é Free. Se você desenvolver pra ganhar lucro,
> > você
> > > deve comprar uma licença, não sei o valor. Eu uso o IBDAC da CoreLab (
> > > www.crlab.com). Ao meu ver, o melhor de todos.
> > >
> > > []s
> > >
> > > 2008/8/15 Darkzad <[EMAIL PROTECTED] 
>  >
> > >
> > > > Olá pessoal,
> > > >
> > > > Estou em uma duvida tremenda, não consigo escolher um componente 
> para
> > > > acesso ao firebird.
> > > >
> > > > O IB que vem com o Delphi falam que não tem mais tanta 
> compatibilidade
> > > com
> > > > o Firebird, eu uso ele e direto tenho usuário reclamando de dead
> > locking.
> > > >
> > > > Estava testando o Fibplus mas não é free e não tenho grana pra 
> pagar.
> > > >
> > > > o IBO falam que é o mais completo e Free. Será que é bom mesmo? 
> Alguém
> > > usa?
> > > >
> > > > Me ajudem por favor.
> > > >
> > > > Darkzad
> > > >
> > > > [As partes desta mensagem que não continham texto foram removidas]
> > > >
> > > >
> > > >
> > >
> > >
> > >
> > > --
> > > _
> > > T.·.F.·.A.·.
> > > Fellipe Henrique
> > > http://tecfree.wordpress.com/ 
> > >
> > >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> -- 
> Abs
> Daniel A. Bastos
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  

[delphi-br] conectar o firebird

[Fabio R Cardoso]

Senhores, desespero! Não consigo conectar meu firebird pela internet. 
Estou testando conectar ele no meu próprio micro, só que pela internet. 
Vou explicar como configurei minha máquina:

IP na rede: 192.168.1.33
Gateway: 192.168.1.1
IP válido na internet: 189.73.3.29
Porta aberta no modem, na seção NAT: 3050, no IP 192.168.1.33
OBS: É nessa seção que eu abri as portas 4662 e 4672 pro emule, ambas 
também para o IP 192.168.1.33.

Abri a porta 3050 também no firewall do windows. No antivirus avast não 
sei se precisa (se é que tem como fazer isso nele).

Fiz uma conta no no-ip.com, o que não serviu pra nada.

Configurações do meu database (uso fibplus)
Server: 189.73.3.29:c:\banco\banco.fib
Logo abaixo, login e senha, tudo certo.

Agora, quando clico em Test connection, aparece a mensagem
Unsucessfull connection caused by blablabla.
Unable to complete network request to host "189.73.3.29".
Failed to estabilish a connection.

Se eu colocar meu IP da rede no campo Server, a conexão é bem sucedida. 
Se eu pingo o IP válido, ele responde ok.

Senhores, onde errei?


Fabio.