Oi Christian,
Eu consegui pintar a linha da tabela com:
procedure TFmCtrlGrid.DBGrid2DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
If gdSelected in State then
begin
Dbgrid2.Canvas.Brush.Color:= clRed;
Bom Dia Pessoal!!!
Desculpem-me pela pergunta de iniciante mas.
Gostaria de agrupar campos de Data por mêses em uma faixa qualquer. Tenho D7, Ado
e access.Já temtei o seguinte :
WHERE DatePart(, DataPedido) = [Vendas de qual ano?]
Bom dia!
Utilize a função DatePart() para agrupar por mês.
Deve ficar assim:
Select CampoQualquer,DatePart(mm,SeuCampoData) as Mes from SuaTabela
Group by CampoQualquer,DatePart(mm,SeuCampoData)
Order By Mes
Boa sorte.
Ulisses
- Original Message -
From: cassiano luz
To:
Alguem conhece esse programa. e se alguém tem a apostila em
português dele. pois estou precisando
Se alguém tiver e puder me ajudar eu agradeceria muito.
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
CONECTIVA 10
Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]
- Original Message -
From: jimmy
To: [EMAIL PROTECTED]
Sent: Monday, October 25, 2004 9:06 PM
Subject: Re: [delphi-br] Bem OFF --- Linux X Windows (em NTFS)
Pode gravar NTFS sim !!! qual
Olá,
Porque você não tenta assim:
procedure TForm1.bConfirmarClick(Sender: TObject);
var
tQry : TQuery;
begin
try
tQry := tQuery.Create(nil); // Cria Query temporaria
tQry.DatabaseName := 'dbTeste';//Alias
try
// Inicia uma
Salvem
A empresa onde trabalho está precisando de profissional para trabalhar dando
manutenção e prosseguimento a novos projetos em ASP com MySQL, e com
conhecimentos em Delphi para dar suportes a sistemas já existentes.
Interessados, favor encaminhar currículo com pretenção salarial para
[EMAIL
Tasquim,
Não sei se é bem o que você pretende mas...
Tem uns componentes da TurboPower que já implementam tudo isso que você quer,
inclusive com uma parte visual bem legal. Como vem com os fontes da para customizar do
jeito que você quiser.
http://sourceforge.net/projects/tpvplanit/
Obs: Só
Bom dia pessoal;
só por curiosidade, alguem usa recibos de instalacao e treinamento dos sistemas que
vc's desenvolvem???
alguem poderia me passar um modelo??? ou onde onde conseguir informacoes?? a respeito
do que posso 'escrever' neles!
Jair
[As partes desta mensagem que não continham
Amigos preciso de uma ajuda, como posso fazer update em tabelas?
pode ser através do componenete query??? eu estou usando command
text da tabela mais estou tendo dificuldades para passar parametros
e formar a string via programação.
Posso usar direto um componente query e passar os
Como faço para criar uma rotina que ao apagar os campos de uma tabela automaticamente
os indices desta tabela sejam excluidos e depois quero recriar esses mesos indices.
PAULO FERNANDES
PORTO ALEGRE RS
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR
Unit Dialogs? Eu já fiz essa tradução, mas foi na unit Conts e deu certo.
Você deve fazer o seguinte: Faça uma cópia do arquivo consts.dcu para
qualquer problema que possa ocorrer. Abra um novo projeto, exclua do projeto
a unit1 que vem por default. Inclua a unit consts.pas no seu projeto, faça a
Tente fazer assim:
with qry do begin
CommandText := 'Update Tabela Set Campo1 = :pCampo1, Campo2 = :pCampo2 Where Chave =
:pChave';
ParamByName('pCampo1').AsString := 'Texto';
ParamByName('pCampo2').AsDateTime := Date;
ParamByName('pChave').AsInteger := 1;
ExecSQL;
end;
Sempre que
Estou scaneando uma imagem bmp com o seguinte codigo abaixo:
if ImgScan1.ScannerAvailable then
try
ImgScan1.OpenScanner;
ImgScan1.ScanTo := 2;
ImgScan1.Image := 'G:\newsys\fotos\teste.bmp';
ImgScan1.StartScan;
Application.ProcessMessages;
finally
Estou tendo que trabalhar em cima de um banco ja existente em DBF ... (nao posso mudar
de base)
O detalhe é que as consultas demoram muito em relação ao clipper, consultas do tipo
...DAT_VEN BETWEEN '01/09/2004' AND '30/10/2004')...
Alguém saberia responder porque no Clipper é rapidinho e com
Já passei por esse problema, mas diminuiu usando uma importação para Access,
vincula tabela, importa dados, desvincula tabela...
Att.
Douglas - CPD.
-Mensagem original-
De: Marcelo Silva [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 26 de outubro de 2004 09:28
Para: [EMAIL
Pessoal,
Preciso formatar um valor em um dbgrid como faço deu branco total...
obrigado
otavio-cidreira/RS
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.782 / Virus Database: 528 - Release Date: 22/10/2004
--
FAVOR
Olá, Alexandre
Agradeço a sua atenção para o meu problema, fiz o teste mas deu o mesmo erro, então
resolvi o problema tirando a transação, acho que vou mudar a forma de atualização ao
inves de atualizar no final vou atualizar item a item direto na inclusão, de qualquer
forma valeu.
[]'s
Ola,
Vc pode fazer commit apos uma quantidade de inserts, se apos 100 ele
nao esta suportando o cache, vc commita a cada 50, nao commit a cada
insert pois ficara lenta a rotina. Embora eu ache q esta operacao tem
q ser efetuada completamente, verifique algo do tipo tamanho de cache
ou coisa
eu tenho uma aplicação em rede, com 15 máquinas, usando o paradox.
O banco de dados de movimento está aproximadamente com 25 mil registros.Uso o delphi
5, paradox 7 e o windows 2000, aconselho a mudar para o windows 2000, ele trabalha
melhor em rede.
Edivaldo David
info.suporte [EMAIL
Luiz Henrique,
Pelo que vi na instalação aqui, acho que vai servir, só falta aprender a manipular...
Obrigado...
- Original Message -
From: Luiz Henrique Severo d Oliveira
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 8:46 AM
Subject: [delphi-br] Re: DUvida
O Sandro valeu, mas é justamente isso essa rotina tem que ser efetuada completamente,
por isso da transação.
- Original Message -
From: sandrobit2000
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 10:50 AM
Subject: [delphi-br] Re: Problemas na Atualização do Estoque
se for o quickreport porque vc nao usa o QRSysData ?
- Original Message -
From: er83pet04
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 11:15 AM
Subject: [delphi-br] Exibir data do sistema no relatório
Estou querendo exibir no meu relatório a data do sistema.
Olá Paulo,
Eu tive o mesmo problema, fiz um monte de testes mais não consegui fazer funcionar com
WinXP e 98 juntos a solução foi deixar tudo 98 ou tudo XP.
[]'s
- Original Message -
From: Edivaldo David
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 10:48 AM
Vc vai ter que criar uma função:
Function DataExtenso(Data : TDateTime):String;
// Retorna a data por extenso
const
vdia : array[1..7] of String = ('Domingo', 'Segunda Feira', 'Terça Feira', 'Quarta
Feira', 'Quinta Feira', 'Sexta Feira', 'Sabado');
vMes : array[1..12] of String = ('Janeiro',
Faça o seguinte:
lbData.caption := formatDateTime('Rio de Janeiro, dd de de
) ;
Júnior Coelho.
Desenvolvimento de Sistemas
* (11) 3266 - 1286
* (11) 7175 - 1885
* [EMAIL PROTECTED]
-Mensagem original-
De: er83pet04 [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 26 de
Serve uma dica de como usar uma planilha como banco de dados? Se servir toma
aí...
www.clubedelphi.net/edicao45/download45.asp
- Original Message -
From: Vicente Lima [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, October 25, 2004 3:09 PM
Subject: [delphi-br] Importação Planilha
Algum colega da lista sabe como tirar raiz cúbica (algoritmo, usando funções simples
do Object Pascal, etc.)?
[]s
Rubem Nascimento da Rocha
Programador Pleno
Fundação Desembargador Paulo Feitosa
http://www.fpf.br - [EMAIL PROTECTED]
+55-92-614-9797, ramal 9875
--
FAVOR REMOVER ESTA PARTE AO
Se alguém conhecer algo a respeito...
Ou Tiver uma Luz à mais...
[ ]'s
- Original Message -
From: Rogério [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, October 18, 2004 4:42 PM
Subject: Re: [delphi-br] Delphi + BIBLIOTECAS C
Legal... Mas...
Num entendí lhufas da primeira
Ei... tem como fazer isso no ADSQuery ao inves de table ?
Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]
- Original Message -
From: Alfeu Marcatto
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 1:23 PM
Subject: Re: [delphi-br] DBF x Performance
Marcos,
Vou te dar uma informação meio imcompleta pois faz um bom tempo que mexi com isso e
não lembro dos detalhes. Desculpe
A algum tempo atrás eu iniciei (mas não terminei) uma aplicação para reconhecer o
número de quem estava ligando.
Eu usei um componente para comunicar com o modem
Dá pra fazer com o componente TSqlQuery também. Seria mais ou menos assim:
with TSqlQuery do
begin
Sql.Clear;
Sql.Add('Update Tabela Set Campo1 = Parametro1, ..CampoN = ParamentoN);
Sql.Add('Where Condições');
ExecSql;
end;
- Original Message -
From: Jefferson (Yahoo)
O que você quer dizer com DESTACAR? Deixar de uma cor diferente? Se for isso
é colocar Options--goRowSelected = True. O que você quer dizer com
marcá-las e desmarcá-las?
- Original Message -
From: delphi6_2005 [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 10:14
Siguinte,
Vou responder a primeira duvida
No calendario , vc pega o DD/MM/ e grava em uma tabela
no texto , vc coloka na msm tabela
e pra procura pravelmente , vc vai querer .. quando o cara clikar no calendario
entao pois eh , quando ele clikar , vc pega o DD/MM/ e
ele quer destacar as celulas pra dizer q aquelas
estao selecionadas... ele nao quer usar a
propriedade rowselection multiselection pq ele
prefere fazer como eu deixar as setas para o
cliente passar a tela para esquerda e direita...
--- Alisson [EMAIL PROTECTED] escreveu:
Pode gravar NTFS sim !!! qual distribuição Linux vc usa ?
Pode nada !!!
Dener
Marcelo Silva escreveu:
A um tempo eu instalei Linux e Windows na mesma máquina para ver como
ficava... funcionava na boa ... aparecia o lilo para eu escolher o
sistema que queria iniciar... hoje só tenho o
Pessoal, estou com dificuldades, criei um relatório mas acontece que esta
faltando alguma coisa, quando coloco pra gerar o relatorio simplesmente ele
não abra, ou esta ficando por traz do principal, mas não consigo visualizar.
procedure TFrmCadBem.Button3ImprimirClick(Sender: TObject);
var
teste
[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
eu estou desenvolvendo um módulo de produção, esse módulo esta integrado com
o módulo de vendas que, quando é efetuado o sistema verifica no meu estoque
e se esse produto não tiver disponível, gera uma ordem de produção. Depois
de gerada a ordem de produção, vc deve fazer a verificação das
tente no lugar de , pois a liguagem interna do accesses é
baseada no inglês
WHERE DatePart(, DataPedido) = 2004
--
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
Alisson, vc esta utilizando uma dbgrid??
se for eu utilizo e faço a seleção utilizando a tecla CTRL..
se for oque vc esta precisando, me mande um e-mail que te passo.
Lindolfo Gomes da Silva Junior
Syscorp Tecnologia
Rua Souza Naves, 9 - 3º andar - Sl. 308
Fone : (0xx43) 3321-9998 / 3027-4575
Olá a todos!!
Que funcão devo usar?
Preciso de uma extrair somente a parte inteira de um double.
ex: 10,78493, deve retornar apenas 10.
Obrigado,
[]s
Juarez
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
Date: Mon, 25 Oct 2004 14:59:29 -0300
To: [EMAIL PROTECTED]
From: Filipe Belchior [EMAIL PROTECTED]
Subject: Suíte UIB, Recomendam?
.
Olá pessoal,
Gosto de usar componentes no-dataAware, e por enquanto, conheço duas.
Conhecia a FBLib, agora achei esta suíte UIB - Unified Interbase.
Esta
ALGUEM SABE ME INFORMAR EXEMPLOS DE CODIGOS DE COMO IMPEDIR QUE O
USUÁRIO INVOQUE O GERENCIADOR DE TAREFAS DO WINDOWS PARA FINALIZAR
O
MEU APLICATIVO?
[]S
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
Já procurei em tudo quanto é canto uma forma de mandar e-mail pelo
Outlook com anexo e não achei nada.
O melhor a fazer é mudar a forma de manda-los.
[]'s
On Tue, 26 Oct 2004 04:05:14 -, ms_goncalves [EMAIL PROTECTED] wrote:
Oi Mariana,
Tenho um projeto de envio de email que foi
www.superdownloads.com.br lá tem já é só pesquisar!!
Abraços,
Fabiano
-Mensagem original-
De: Cesar Montezuma [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 25 de outubro de 2004 09:39
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Controle de Acesso
Bom dia a todos,
Se vc usar um componente ADO poderá trabalhar com a tabela como se fosse um
banco de dados.
Se precisar de mais detalhes privete-me, mas reportei esse assunto na lista.
Abraços,
Fabiano
-Mensagem original-
De: Vicente Lima [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 25 de
Se for no Outloook Express eu tenho uma rotina legal para enviar anexos !
- Original Message -
From: Joubert Rinaldi
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 3:53 PM
Subject: Re: [delphi-br] Re: Envio de email pelo OutLook
Já procurei em tudo quanto é canto
Olá,
É possível disponibilizar para o grupo ?
Alexandre
- Original Message -
From: MOITA [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 5:12 PM
Subject: Re: [delphi-br] Re: Envio de email pelo OutLook
Se for no Outloook Express eu tenho uma rotina legal para
Olá pessoal blz!?
Desculpe pelo off!
Seguinte gostaria de saber se alguém possui uma listagem (em banco de
dados, txt...) com vários
tipos de profissões?
caso possua pode mandar em pvt para o meu e-mail ou mande o link onde eu
possa conseguir.
[EMAIL PROTECTED]
Desde já agradeço a toda e
Aceitaria tbm receber
[]'s
.Rafael Stoever .Desenvolvimento
- Original Message -
From: Sil-jo Evsan [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 4:36 PM
Subject: [delphi-br] [OFF-TOPIC]Profissões
Olá pessoal blz!?
Desculpe pelo off!
Seguinte gostaria de
já foi postado na lista uma forma de criar objetos ole para o outlook, o
outlook express tem um exemplo no DTDelphi 2.6.
Abraços,
Fabiano
-Mensagem original-
De: Joubert Rinaldi [mailto:[EMAIL PROTECTED]
Enviada em: terça-feira, 26 de outubro de 2004 15:53
Para: [EMAIL PROTECTED]
Como o Marcelo mesmo já disse o que ele pega é o número da partição o número
de série do hd é um código armazenado na memória ROM do hd, além do mais é
só um número a passibilidade de criar-se nímeros que não se repetem é imensa
vc pode usar a hora da instalação, converte-la em segundos e usar o
Claro que dá, segue abaixo:
COMO CHAMAR A FUNCTION:
EnviarEMail('De ', 'Para', 'Enviar Arquivo', 'Segue em anexo o arquivo...', seu
arquivo, True)
A FUNCTION:
function EnviarEMail(const De, Para, Assunto, Texto, Arquivo: string; Confirma:
Boolean): Integer;
var
Msg: TMapiMessage;
Joubert,
Uso esta função com de maneira satisfatoria no outlook express. Veja se te
serve.
Inclua a unit MAPI no uses do modulo
==
Function SendMail( pTo,
pCC,
pCCo,
pAssunto,
vc pode usar esta função para elevar um número x a uma
potência n qualquer, basta re-escrever a função assim:
function RaizCubica(Base, Expoente : Double) : Double;
Begin
result := exp(Expoente * ln( Base ));
End;
no exemplo que descrevi para vc apenas considerei a
base = a 1/3, pois x ^
Boa tarde... estou com problemas na minha consulta! É o seguinte:
Tenho 3 tabelas:
- Item (preciso da quantidade de medicamentos)
- Pedido (preciso saber quais itens referem-se ao pedido)
- Medicamento (preciso do nome do medicamento)
Queria listar em um DBGrid os medicamentos contidos nos
Paulo,
usa o clientdataset... Insert, Post, Cancel são operações normais...
Só não esqueça do comando ClientDataSet.ApplyUpdates(0); para enviar
ao servidor as alterações nos registros (até então vc estava
trabalhando com os dados na memória).
SDS
--- delphi6_2005 [EMAIL PROTECTED]
http://delphi.about.com/od/adptips2004/a/bltip1004_5.htm?nl=1
[]s
Rubem Nascimento da Rocha
Programador Pleno
Fundação Desembargador Paulo Feitosa
http://www.fpf.br - [EMAIL PROTECTED]
+55-92-614-9797, ramal 9875
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens
Marcos,
O site do bina que falei é http://www.beena.com.br/
No link Produtos você encontra o B050, que foi o que comprei.
No link Downloads tem coisas interessantes e se quiser saber um pouco mais
sobre o conceito da coisa vá no link Perguntas Freq.
O componente que usei, se não me engano, se
Falae Charles,
experimente trocar o codigo
Application.CreateForm(TFrmRelCapaLote, FrmRelCapaLote);
FrmRelCapaLote.QuickRep1RelCapaLote.Preview;
por este
try
application.createform(TFrmRelCapaLote, FrmRelCapaLote)
FrmRelCapaLote.Showmodal
finally
FreeAndNil(FrmRelCapaLote)
end
evento dblclick
Options-- goRowSelected = true
Alisson [EMAIL PROTECTED] wrote:
O que você quer dizer com DESTACAR? Deixar de uma cor diferente? Se for isso
é colocar Options--goRowSelected = True. O que você quer dizer com
marcá-las e desmarcá-las?
- Original Message -
From:
Erassim...sei que a pergunta eh bmm básica..mas nao tou
conseguindo de forma alguma...
Como insiro uma data atual(data do sistema) num banco paradox,(onde
data tá como tipo date?)
tentei com date() , now() e nada (dá um erro de handle exeption ao
executar) passando uma string( no
tenta por isso no evento
OnNewRecord ou no BeforePost da table:
Tabela.CampoData.value := Date;
[]'s
- Original Message -
From: Erica Kroon [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 26, 2004 8:55 PM
Subject: [delphi-br] data no paradox
Erassim...sei que a
64 matches
Mail list logo