Tem duas formas, uma é renomeando as colunas e outra é pelo indice da coluna:
Primeira:
Select Sum(BcITEM) AS SOMA1, Sum(VR_ITEM) AS SOMA2
From ITENS
Where Codigo5
Group by Aliquota
Order By Aliquota
variavel1 := qry.fieldbyname('soma1').asFloat;
variavel2 := qry.fieldbyname('soma2').asFloat;
Pessoal,
Estamos com uma vaga para desenvolvedor Delphi, *que conheça a linguagem*.
Quem tiver interesse, pode entrar em contato comigo pelo e-mail, ou pelo
GTalk.
[]'s
--
/*
* Edson Marco Ferrari Junior
* [EMAIL PROTECTED]
* http://www.edmafer.com.br
*/
[As partes desta mensagem que não
Esse erro e devido ao tentar acrescentar um componente com o mesmo nome
de um ja instalado, vc deve remover a package deste componente e seu path.
inacio_mecena escreveu:
Ola pessoal to com o seguinte erro abaixo:
[Error] WARNING. Duplicate resource(s):
[Error] Type 2 (BITMAP), ID
Amigo quando vc utiliza apenas funções no select vc não precisa utilizar o
group by.
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Bollasette
Enviada em: quarta-feira, 20 de agosto de 2008 23:00
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Sum(item)
Olá pessoal.
Aqui na empresa estamos precisando de um programador Delphi pra fazer um freela.
O que precisamos é o desenvolvimento de uma DLL para comunicação
através de Socket.
Os únicos requisitos são o conhecimento da tecnologia Sockets, e a
manipulação de Array de Bytes no Delphi, assim
Amigo geralmente na query q está este select vai aparecer os fiels F1,F2.
Daí vc pode pegar assim:
Edit1.text := query1.fieldbyname(F1).asstring;
Espero tem ajudado.
Um abraço.
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Bollasette
Enviada em:
Estou precisando fazer uma espécie de extrato bancário,
Na tabela valores tenho os campos tbCredito, tbdebito, etc
Gostaria de saber como posso mostrar no formato abaixo
Credito Debito Saldo Data
1000,00 Null 1000,00 05/08/2008
Null
Alessandro, depende do resultado esperado. Se não colocar o GROUP BY ALIQUOTA
ele fará uma soma geral, no caso do colega, parece que ele está querendo soma
por alíquota. Mesmo quando o campo não é exibido será agrupadamente normalmente
pelo campo que está no GROUP BY.
Luciano Calenzani Simões
Basta adaptar a setença abaixo para os nomes de tabela e campos que estão no
seu banco. Essa setença foi testada em Sybase SQL Anywhere 9.
Outra coisa, se o campo de valor do débito já estiver com o sinal de negativo,
basta trocar os - (sinal de subtração) por um + (sinal de adição).
select
Bom dia.
No próprio select vc pode mondar uma coluna com o nome de saldo.
faça assim:
select
credito,
debito,
(credito-debito) as saldo,
data
from
nome da tabela que conta os atibutos
2008/8/21 oscarnjr [EMAIL PROTECTED]
Estou precisando fazer uma espécie de extrato bancário,
Na
Alison, o saldo que o colega citou, é igual a um extrato de conta corrente, são
os valores do dia somados aos valores de todos os dias anteriores. Da forma que
você sugeriu, só será exibido a soma dos lançamentos do dia.
Luciano Calenzani Simões
- Mensagem original
De: Alison Zen
Primeira coisa, qual o seu banco de dados?
É que podemos usar recursos do banco pra te ajudar. No sqlanywhere, seria
bem fácil.
Zote
http://gofrom.us
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de oscarnjr
Enviada em: quinta-feira, 21 de agosto de 2008 09:26
Para:
Aproveitando que o Luciano também usa o ASA, montei o exemplo abaixo usando
a versão 9.
Nele, faço union all na mesma tabela (mas separando as linhas) pra simular o
uso de 2 tabelas conforme foi descrito.
Esse union, gera uma view virtual, chamada de f. Depois faço no select nesta
view usando
Isso mesmo Luciano, tive que manter a cláusula GROUP BY para
a seleção por alíquotas.
[ ]s, Henrique
- Original Message -
From: Luciano Calenzani Simões
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 21, 2008 9:30 AM
Subject: RES: [delphi-br] Sum(item)
Engraçado que, se eliminar AS SOMA1 da cláusula
posso pegar o valor total assim:
sFloat:=dataset.fieldbyname('SUM(BC_ITEM)').AsFloat;
[ ]s, Henrique
- Original Message -
From: Bollasette
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 21, 2008 12:35 PM
Subject:
Sim. Se você rodar essa sentença (sem os alias) em um editor de comandos SQL,
vai notar que o nome da coluna será o própria função agregada, mas não é
aconselhável, imagine uma função agregada com um alto grau de complexidade ou
uma subquery.
Luciano Calenzani Simões
- Mensagem
Olá pessoal!
Estou apanhando de um componente ListView que estou utilizando para mostrar um
mapa de mesas no meu sistema. O que ocorre é que eu utilizava o código abaixo
para formulár o mapa a cada alteração que uma mesa era adicionada ou alterada:
procedure TfrmFrente.CompoeMapa(Sender:
Olá sou novo no delphi e estou com o seguinte problema, tenho 2 datas, uma
inicial e outra final, gostaria que o programa me retornasse o numero de
meses entre essas duas datas, ja tentei a função MonthsBetween sendo que a
mesma me retorna valores totalmente fora da realidade, se alguem puder me
Galera,
Tenho três vagas imediatas e cinco em análise para desenvolvedor Delphi
Win32/.NET.
Não é uma vaga para estágio e nem para iniciantes. É necessário conhecimento em
.NET e banco de dados relacional.
Interessados e maiores detalhes devem mandar email com currículo para [EMAIL
DataInicial:=MonthCalendar1.date;
DataFinal:=MonthCalendar2.date;
selecionei 01/08/2008 no primeiro calendario e 01/12/2008 no segundo
calendario
e coloquei ShowMessage(DatetoStr(MonthsBetween(DataInicial, DataFinal)));
e a caixa de dialago me manda o valor 01/01/1900... nao entendi esse
Tem uma Unit chamada DateUtils que tem várias funções para manipulação de datas.
Podes utilizar a função IncMonth da seguinte forma:
procedure ContaMesesEntreDatas(DataInicial, DataFinal: TDate) : integer;
var DataAuxiliar : TDate;
begin
NroDeMeses := 0;
DataAuxiliar := DataInicial;
Dá uma olhada nestes dois textos, neles você vai ter a solução do seu problema
e entender mais sobre datas no Delphi.
http://dn.codegear.com/article/33729
http://www.devmedia.com.br/articles/viewcomp.asp?comp=356
Mas não deixe de ler o help do Delphi que explica o porque o MonthsBetween está
No caso de separar por alíquota e não somar tudo ele usaria um DISTINCT em
vez do group by não seria?
Não tenho certeza mas acho q seria.
Me desculpe se eu estiver enganado amigo.
Um abraço.
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luciano Calenzani
Query.close;
query.sql.clear;
query.sql.add('Select Sum(BcITEM) AS BC, Sum(VR_ITEM) AS VR From ITENS Where
Codigo5 Group by Aliquota Order By Aliquota');
query.open;
label1.caption := query.fieldbyname('bc').text;
label2.caption := query.fieldbyname('vr').text;
Ats,
Alcione Guimarães
muito boa essa dica ...
Cícero Fernandes
Eng. Eletricista
Eng. de Segurança do Trabalho
CREA-SC 27.958-0
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Alison Zen
BOm dia pessoal,
Estou precisando da seguinte ajuda,
Tenho um edit e nele coloco na propriedade text,
dd/mm/, por exemplo,gostaria que quando o usuário clicasse nesse
edit esse texto sumisse ou então ficasse todo selecionado facilitando
assim a inserção de dados do usuário.
Alguém tem como
Ola Antonio,
Observer que a função MonthsBetween retorna um valor inteiro. Corrigindo
ShowMessage(IntToStr(MonthsBetween(DataInicial, DataFinal)))
Att.:
_
Fernando Leal
mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Programador de Sistemas
Coordenadoria de Informática
Centro
faça a subtração das datas e divida por 30
Cícero Fernandes
Eng. Eletricista
Eng. de Segurança do Trabalho
CREA-SC 27.958-0
P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE!
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
agora sim me retornou o numero de meses correto... valeuz !!
2008/8/21 Fernando Leal [EMAIL PROTECTED]
Ola Antonio,
Observer que a função MonthsBetween retorna um valor inteiro. Corrigindo
ShowMessage(IntToStr(MonthsBetween(DataInicial, DataFinal)))
Att.:
_
Fernando Leal
Pessoal
Não sei se o assunto é OFF, mas alguém sabe se existe algum plugin do
StarTeam para o Delphi 7, no Delphi 2005 e Delphi 2006 ele vem integrado na
IDE...
[As partes desta mensagem que não continham texto foram removidas]
Sugiro que mude de componente para trabalhar com data, exemplo de nativo da
VCL: TDateTimePicker...
Mas usando um Tedit, exatamente da forma que você quer:
No evento onEnter:
if edit1.text = 'dd/mm/' then
edit1.clear;
no evento onExit
if trim(edit1.text) = '' then
edit1.text :=
Cara, só o fato do foco entrar no Edit, já seleciona o conteúdo que estiver
nele, então no evento OnExit, caso o Edit esteja vazio, volte dd/mm/,
não acho muito legal esta utilização, talvez se você falar qual é a
funcionalidade total podemos pensar em algo melhor, tem também o componente
no onclick coloque text:='';
Uberdam Cavaletti
Formado em Tecnologia da Informação - Unoesc - Xxe
Pós-graduado em desenvolvimento Java - Unoesc - Xxe
http://www.curricular.com.br/berdam
Visite
Vai dar problema se fizer entre as seguinte datas: 01/02/2008 e 01/03/2008.
Leia o e-mail que enviei que entenderá o porque.
Luciano Calenzani Simões
- Mensagem original
De: Antonio Mateus [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 21 de Agosto de
So, try it:
function MesesEntreDatas(pData1, pData2: TDate): Integer;
begin
if FormatDateTime('mm/', pData1) = FormatDateTime('mm/', pData2) then
//se data1 e data2 estao no mesmo mes...
Result := 1
else
begin
pData1 := strtodate(FormatDateTime('15/MM/', pData1));
Pessoal,
Aproveitando a dica, pergunto: existe alguma maneira de trabalhar com o
TDateTimePicker ligado a um dataset?
Alexandre Trindade
2008/8/21 Luciano Calenzani Simões [EMAIL PROTECTED]
Sugiro que mude de componente para trabalhar com data, exemplo de nativo
da VCL:
Só criando um componente descendente de TDateTimePicker data-aware. Neste novo
componente, ele teria que trabalhar com datalinks. Informe-se sobre isso no
help do Delphi. Mais especificamente, para este caso, sobre a classe
TFieldDataLink.
Sds.
To:
Olá pessoal!
Mandei a mensagem respondendo de forma equivocada a mensagem de um colega.
Estou apanhando de um componente ListView que estou utilizando para
mostrar um mapa de mesas no meu sistema. O que ocorre é que eu
utilizava o código abaixo para formulár o mapa a cada alteração que uma
mesa
O problema é que o saldo sempre estará no registro anterior,
Credito Debito Saldo Data
1000,00 0 1000,00 05/08/2008
0 200,00 800,00 06/08/2008
Veja que o cáculo ficou na segunda linha da seguinte forma
1000 - 200 igual 800
select
credito,
debito,
oscarnjr, se você fizer da forma que eu e o José Henrique sugerimos, irá
funcionar.
Luciano Calenzani Simões
- Mensagem original
De: oscarnjr [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 21 de Agosto de 2008 20:27:40
Assunto: Re: RES: [delphi-br]
40 matches
Mail list logo