[delphi-br] Update

2005-06-16 Por tôpico Adalberto Sousa Monteiro
Como faço um update com os resultados desse select, em uma outra tabela ?
Isso dentro de uma Procedure dentro do Firebird.


SELECT EXTRACT(YEAR  FROM PED.DT_PEDIDO),
   EXTRACT(MONTH FROM PED.DT_PEDIDO),
   ITEM.CD_FORNECEDOR,
   ITEM.CD_PRODUTO,
   PED.CD_CLIENTE,
   NM_CLIENTE,
   PED.CD_REPRESENTANTE,
   SUM((ITEM.QT_VENDA * ITEM.PR_UNITARIO)) VL_TOTVENDABRT,
   SUM(ITEM.VL_TOTAL) VL_TOTVENDALIQ,
   SUM(ITEM.QT_VENDA) QT_TOTVENDA,
   SUM(ITEM.VL_COMISSAO) VL_TOTCOMIS,
   SUM(ITEM.VL_DESCONTO) VL_TOTDESC
FROM   ITEMPEDIDO ITEM, PEDIDO PED, CLIENTE CLI
WHERE  ITEM.NR_PEDIDO = PED.NR_PEDIDO AND
   CLI.CD_CLIENTE = PED.CD_CLIENTE
GROUP BY EXTRACT(YEAR  FROM PED.DT_PEDIDO),
 EXTRACT(MONTH FROM PED.DT_PEDIDO),
 ITEM.CD_FORNECEDOR,
 ITEM.CD_PRODUTO,
 PED.CD_CLIENTE,
 NM_CLIENTE,
 PED.CD_REPRESENTANTE

[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] saber a coluna que esta na grid

2005-06-16 Por tôpico Adalberto Sousa Monteiro
EU ESTANDO EM UMA DBGRID, TENHO COMO SABER EM QUAL COLUNA ESTOU POSICIONADO 
(FOCADO) ??
AO TECLAR F2, PRECISO EXECUTAR UM PROCEDIMENTO, POREM SO QUANDO EU ESTIVER NA 
COLUNA ESPECIFICA.



[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] Arredondamento ??

2005-06-16 Por tôpico Adalberto Sousa Monteiro
COMO RESOLVER PROBLEMA DE ARREDONDAMENTO NO DELPHI E FIREBIRD ?


[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] Configurações Regionais

2005-06-16 Por tôpico Adalberto Sousa Monteiro
COMO RESOLVER PROBLEMA DE '.' E ',' NAS CONFIGURAÇÕES REGIONAIS PARA
SEPARADOR DE VALORES E CASA DECIMAL ?

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

2005-06-16 Por tôpico Adalberto Sousa Monteiro
alguem poderia me dizer como posso melhorar esse 'relacionamento' entre as 
tabelas ?
Seria melhor utilizar Join ? Como fazer ?

SELECT EXTRACT(YEAR  FROM PED.DT_PEDIDO),
   EXTRACT(MONTH FROM PED.DT_PEDIDO),
   ITEM.CD_FORNECEDOR,
   ITEM.CD_PRODUTO,
   PED.CD_CLIENTE,
   NM_CLIENTE,
   PED.CD_REPRESENTANTE,
   SUM((ITEM.QT_VENDA * ITEM.PR_UNITARIO)) VL_TOTVENDABRT,
   SUM(ITEM.VL_TOTAL) VL_TOTVENDALIQ,
   SUM(ITEM.QT_VENDA) QT_TOTVENDA,
   SUM(ITEM.VL_COMISSAO) VL_TOTCOMIS,
   SUM(ITEM.VL_DESCONTO) VL_TOTDESC
FROM   ITEMPEDIDO ITEM, PEDIDO PED, CLIENTE CLI
WHERE  ITEM.NR_PEDIDO = PED.NR_PEDIDO AND
   CLI.CD_CLIENTE = PED.CD_CLIENTE


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



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

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

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

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

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

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

 




[delphi-br] Delphi + flash

2005-05-17 Por tôpico Adalberto Sousa Monteiro
Tenho uma apresentação em Flash, gostaria de saber se tenho como
apresenta-la em uma tela de inicialização do meu sistema ?
E como faria isso, se for possivel claro.

Obrigado
Adalberto



-- 
< 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] Teste ... ??

2005-05-16 Por tôpico Adalberto Sousa Monteiro
Gostaria de saber se meus emails nao estao chegando ao grupo ???
Ja mandei 2x uma duvida e nada de aparecer ...

Valeu


-- 
< 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] Como alinhar um MaskEdit

2005-05-16 Por tôpico Adalberto Sousa Monteiro
Bom dia a todos,
Gostaria de saber se alguem sabe me dizer como faço para mostrar um campo
numerico/valor em um MaskEdit alinhado a direita?

E tambem, como faço para a digitação nesse maskedit, vir da direita para
esquerda.

Se alguem puder me dar uma força

Desde ja agradeç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

<*> 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] Como alinhar um MaskEdit

2005-05-16 Por tôpico Adalberto Sousa Monteiro
Bom dia a todos,
gostaria de saber se alguem sabe me dizer como faço para mostrar um campo
numerico/valor em um MaskEdit alinhado a direita?

E tambem, como faço para a digitação nesse maskedit, vir da direita para
esquerda.

Se alguem puder me dar uma força

Desde ja agradeç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

<*> 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] Query Read-Only

2005-05-02 Por tôpico Adalberto Sousa Monteiro
Bom dia pessoal,
alguem poderia me dizer como posso resolver essa mensagem de erro que tem dado 
no programa ?
Nao tenho como usar uma dbgrid ligada a uma query e editar os registros ??

Fiz o mesmo procedimento com uma TTable e funcionou normalmente, mas quanto 
passo para uma query, me da a mensagem

Obrigado e uma boa semana a todos
Adalberto

[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] Ajuda com tabela PAI x FILHO

2005-04-26 Por tôpico Adalberto Sousa Monteiro

Bom dia a todos,
Alguem poderia me dar uma força, na seguinte duvida:

Tenho uma tabela pai PEDIDO, e a tabela filha ITEM DOS PEDIDOS, relacionadas 
pelo numero do pedido.
No programa, estou usando edits e uma Dbgrid.

Antes de entrar na Dbgrid, confirmo a geração do pedido, e se Ok, faço um 
insert na tabela, gerando o numero do pedido, internamente no firebird atraves 
de uma Trigger.

Como faço, para cada linha da minha dbgrid, quando for inserir um novo 
registro, eu utilizar o mesmo numero do pedido ?
Preciso fazer o insert na mão, atraves da aplicação para cada linha que for 
digitada na Dbgrid, ou tenho como atraves de uma trigger, procedure, pegar o 
numero do pedido que acabou de ser gerado ?

Desde ja agradeço,

Abraços
Adalberto

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



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

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

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

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

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

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

 





Re: [delphi-br] Apostilas para download...

2005-04-11 Por tôpico Adalberto Sousa Monteiro

Bom dia meu caro,
Estou tentando acessar seu link, desde as 8, porem nao consigo executar

Abraços
Adalberto

- Original Message -
From: "Eduardo C. Nicácio" <[EMAIL PROTECTED]>
To: "[DELPHI-BR]" 
Sent: Monday, April 11, 2005 7:18 AM
Subject: [delphi-br] Apostilas para download...



Para aqueles que se interessarem, muito material sobre Delphi, VB, Oracle,
algoritmos estruturados, Assembly, etc.
Apenas até as 10:00, com limite máximo de 10 usuários. Este é meu servidor
caseiro 3M (Meu Micro Mesmo...)

Link 1: http://edunicacio.myftp.org ou ftp://edunicacio.myftp.org

Link 2: http://201.1.23.65/ ou ftp://201.1.23.65

Espero que desta vez funcione.

Abraços e bons downloads :o)





Eduardo Cláudio Nicácio
Mantenedor do PDFLivre Front
http://www34.brinkster.com/ecnsoft

[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] Liberar Excel da Memoria

2005-04-06 Por tôpico Adalberto Sousa Monteiro

Valeu Itamar pela ajuda, mas esse .QUIT nao funcionou, ele retorna erro
quando tenta executar o QUIT.

Adalberto

- Original Message -
From: "itamar" <[EMAIL PROTECTED]>
To: 
Sent: Tuesday, April 05, 2005 9:43 PM
Subject: Re: [delphi-br] Liberar Excel da Memoria


>
> TENTA NO FINAL
> EXCELAPPLICATION.QUIT
>
> e-mail - [EMAIL PROTECTED]
> MSN  - [EMAIL PROTECTED]
> Analista de Sistemas
> itamar roloff
> ---
> ----- Original Message -
> From: "Adalberto Sousa Monteiro" <[EMAIL PROTECTED]>
> To: 
> Sent: Tuesday, April 05, 2005 6:20 PM
> Subject: [delphi-br] Liberar Excel da Memoria
>
>
> >
> > Estou montando uma rotina para exportar dados automaticamente para o
> Excel.
> >
> > Segue a rotina abaixo
> >
> > lcid := GetUserDefaultLCID; //pega o usuário logado
> > Path := ExtractFilePath(Application.ExeName) + 'pedido.xls';
> > WkBk := ExcelApplication1.Workbooks.Open(Path , EmptyParam, EmptyParam,
> > EmptyParam,
> > EmptyParam, EmptyParam, EmptyParam, EmptyParam,
> > EmptyParam, EmptyParam, EmptyParam,
> > EmptyParam, EmptyParam, LCID);
> >
> > ExcelApplication1.Visible[lcid] := true; //torna a aplicação visível
> > //ExcelApplication1.Visible[lcid] := False; //torna a aplicação visível
> > ExcelApplication1.DisplayAlerts[lcid] := false; //remove alertas do
excel
> > ExcelWorksheet1.ConnectTo(WkBk.Worksheets[2] as _Worksheet);
> > ExcelWorksheet1.Activate(LCID); //ativa a planilha conectada
> > ExcelApplication1.ScreenUpdating[lcid] := true; //torna possível fazer
> > alterações
> >
> > For vi_ContaLinha := 1 to vi_TotLinha Do
> > Begin
> > .. rotina ..
> > End;
> >
> > ExcelApplication1.disconnect;
> > ExcelWorksheet1.SaveAs( ExtractFilePath(Application.ExeName) +
> > EditNameArq.Text + '.xls');
> > ExcelApplication1.Free;
> > Meu problema é o seguinte, quando deixo assim:
> > ExcelApplication1.Visible[lcid] := False; //torna a aplicação visível
> >
> > O excel nao libera dos processos do windows, ficando preso e não consigo
> > abrir novamente o excel, mesmo utilizando a rotina
ExcelApplication1.Free;
> >
> > Alguem teria uma ideia?
> > Obrigado
> > Beto
> >
> >
> >
> > --
> > <<<<< 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] Liberar Excel (ou qualquer form) da memória...

2005-04-06 Por tôpico Adalberto Sousa Monteiro

Bom dia Eduardo,
Valeu pela ajuda, mas o componente que estou utilizando (TExcelApplication)
não tem .RELEASE

Teria alguma outra ideia ?
Tentei fazer apenas movendo NIL, e mesmo assim ele nao libera
Desculpa estar novamente perguntando, mas é que não encontro uma forma de
liberar isso

Obrigado
Adalberto

- Original Message -
From: "Eduardo C. Nicácio" <[EMAIL PROTECTED]>
To: 
Sent: Tuesday, April 05, 2005 11:16 PM
Subject: Re: [delphi-br] Liberar Excel (ou qualquer form) da memória...



Antes de dar:

  ExcelApplication.Free;

Coloque esta linha:

  ExcelApplication.Release;

E para limpar da memória:

  ExcelApplication := nil;

Pelo menos comigo nunca falhou.

Abraços





Eduardo Cláudio Nicácio
Mantenedor do PDFLivre Front
http://www34.brinkster.com/ecnsoft

[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] Liberar Excel da Memoria

2005-04-05 Por tôpico Adalberto Sousa Monteiro

Estou montando uma rotina para exportar dados automaticamente para o Excel.

Segue a rotina abaixo

lcid := GetUserDefaultLCID; //pega o usuário logado
Path := ExtractFilePath(Application.ExeName) + 'pedido.xls';
WkBk := ExcelApplication1.Workbooks.Open(Path , EmptyParam, EmptyParam,
EmptyParam,
EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, LCID);

ExcelApplication1.Visible[lcid] := true; //torna a aplicação visível
//ExcelApplication1.Visible[lcid] := False; //torna a aplicação visível
ExcelApplication1.DisplayAlerts[lcid] := false; //remove alertas do excel
ExcelWorksheet1.ConnectTo(WkBk.Worksheets[2] as _Worksheet);
ExcelWorksheet1.Activate(LCID); //ativa a planilha conectada
ExcelApplication1.ScreenUpdating[lcid] := true; //torna possível fazer
alterações

For vi_ContaLinha := 1 to vi_TotLinha Do
Begin
.. rotina ..
End;

ExcelApplication1.disconnect;
ExcelWorksheet1.SaveAs( ExtractFilePath(Application.ExeName) +
EditNameArq.Text + '.xls');
ExcelApplication1.Free;
Meu problema é o seguinte, quando deixo assim:
ExcelApplication1.Visible[lcid] := False; //torna a aplicação visível

O excel nao libera dos processos do windows, ficando preso e não consigo
abrir novamente o excel, mesmo utilizando a rotina ExcelApplication1.Free;

Alguem teria uma ideia?
Obrigado
Beto



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

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

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

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

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

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

 





[delphi-br] Duvida em Excel

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

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

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

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

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

Exemplo:
Pedido do sistema

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

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


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



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

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

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

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

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

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

 





[delphi-br] Sistema Comercial Integrado com Delphi 7 - Cadastro e Estoque

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

Bom dia todos do grupo,
Alguem tem ou ja leu um desses livros ?
Gostaria de saber se vale a pena compra-lo ??? E se alguém tem e gostaria de 
vende-lo ?

Abraços a todos
Adalberto.

   

[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