[delphi-br] Re: campo igual com dados de tabela diferente
Utilize union. select nomecliente as nome from cliente union all select nomefornecedor as nome from fornecedor order by 1 Luciano C. Simões --- Em delphi-br@yahoogrupos.com.br, lucianodanilo luci...@... escreveu Boa tarde pessoal Gostaria que minha consulta retornasse no campo 'Nome', tanto cliente como fornecedor porem essa estrutura era feita de uma clausula if, se 1° condicao faça o primeiro left join caso contrario faça o segundo, porem quero que nao aconteça essa condição e apresentar no mesmo campo tato nome cliente como fornecedor. Porém como contorno o erro de Alias devido aos apelido cliente na tabela fornecedor SELECT Notas.Saida, Clientes.Nome , Notas.Condicao, Notas.Cep From Notas LEFT JOIN Clientes fornecedores Clientes ON (Clientes.Codigo = Notas.Cliente) LEFT JOIN Fornecedores Clientes ON (Fornecedores.Codigo = Notas.Cliente ) esse e apenas o trecho da consulta porem a que me ocasiona erro
[delphi-br] Delphi 2009 em netbook
oi, agora que já saiu uma terceira geração de netbooks, inclusive com dual core, alguém aí já testou o mínimo de configuração que dá pra trabalhar razoavelmente em D2009/Win7 ? grato, Carlos
[delphi-br] duvida em Project-Opcoes-Directory/Conditionals
Poderiam me ajudar numa duvida? Tenho os seguintes diretorios C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto1.dpr C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto2.dpr C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto3.dpr C:\NOMEDAMAQUINA\Projetos\EXE (onde caem os 3 exe compilados) Para que os exe já caiam na pasta correta, configurei as opções do projeto (project - Options - Directory/Conditionals - Output Directory = C:\NOMEDAMAQUINA\Projetos\EXE Porem isso fica preso ao projeto e quando é compilado, esse caminho tem que ser alterado a cada maquina que se usa Tem como colocar esse diretorio com uma diretiva que pegue sempre o diretorio Projetos\EXE (sem o driver e o nome da maquina?) como é feito com as library paths onde se coloca $DELPHI ? ex: ..\Projetos\exe Graça
[delphi-br] OFF - Teste automatizado
Como vocês fazem testes automatizados em suas classes do server e nas telas do client? Luciano C. Simões
Res: [delphi-br] Re: Sistema para Builds de projetos
Nessa pagina tem o Axial Build feito pelo Isac Pinheiro :http://cc.embarcadero.com/Author/55953 Mas aqui na empresa estamos usando o want para a compilação, onde fizemos uma interface gráfica par facilitar. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] duvida em Project-Opcoes-Directory/Conditionals
Tente caminhos relativos ao arquivo do projeto. Use .\ para a pasta do projeto e ..\ para cada nível de pasta acima dela. Por exemplo, se o arquivo .dpr fica na pasta C:\NOMEDAMAQUINA\Projetos\Fontes\ e vc quer o executável em C:\NOMEDAMAQUINA\Projetos\EXE, use ..\EXE\. Em 15 de abril de 2010 09:16, dangra2008 dangra2...@yahoo.com.br escreveu: Poderiam me ajudar numa duvida? Tenho os seguintes diretorios C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto1.dpr C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto2.dpr C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto3.dpr C:\NOMEDAMAQUINA\Projetos\EXE (onde caem os 3 exe compilados) Para que os exe já caiam na pasta correta, configurei as opções do projeto (project - Options - Directory/Conditionals - Output Directory = C:\NOMEDAMAQUINA\Projetos\EXE Porem isso fica preso ao projeto e quando é compilado, esse caminho tem que ser alterado a cada maquina que se usa Tem como colocar esse diretorio com uma diretiva que pegue sempre o diretorio Projetos\EXE (sem o driver e o nome da maquina?) como é feito com as library paths onde se coloca $DELPHI ? ex: ..\Projetos\exe Graça -- _ Ricardo Augusto Muitos dos problemas do mundo devem-se ao fato de que os ignorantes estão completamente seguros e os inteligentes cheios de dúvidas (Bertrand Russel) [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] duvida em Project-Opcoes-Directory/Conditionals
Olá! Use as variáveis de ambiente a seu favor: http://eugostododelphi.blogspot.com/2009/12/usando-variaveis-de-ambiente-no-delphi.html [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente cxDBLookupComboBox
Olá menina, esta voz de ternura, saiu a solução para esta versão que usamos... Tks... Funcionou perfeito... E obrigado ao nosso outro amigo, que nós ajudou... []s Marlon Em 14 de abril de 2010 21:13, Elaine Cristina Rocha de Oliveira elaine...@gmail.com escreveu: Olá Meninos Se vocês forem dentro de Properties no combo, vão ver uma opção chamada GridMode, se colocar como true vai atualizar o dataset. Tenta aí pra ver se vai funcionar pra vocês tb =) Em 14 de abril de 2010 15:28, Eduardo Suruagy eduardosuru...@gmail.comescreveu: Marlon, caso vc consiga me avisa por favor. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: [MAF] Memória e processador
Silvio,
é quase isso... Precisava saber o total de memória utilizada por um determinado
programa.
--- Em delphi-br@yahoogrupos.com.br, Silvio Clecio silviop...@... escreveu
Marcos Abreu Ferreira escreveu:
Pessoal,
alguém sabe se tenho como verificar quanto minha aplicação está ocupando
de memória e qual a porcentagem de utilização do processador por ela? E
quanto tenho disponível de memória RAM ainda?
Att,
Marcos Ferreira
FONTE: http://tinyurl.com/y84sqln
Procedure TForm1.Timer1Timer(Sender: TObject);
const cBytesPorMb=1024*1024;
var
M: TMemoryStatus;
T: String;
begin
M.dwLength:=SizeOf(M);
GlobalMemoryStatus(M);
Memo1.Clear;
with Memo1.Lines do
begin
Add(Format('Memória em uso: %d%%', [M.dwMemoryLoad]));
Add(Format('Total de física: %f MB', [M.dwTotalPhys/cBytesPorMB]));
Add(Format('Total máx. paginação: %f MB', [M.dwTotalPageFile/
cBytesPorMB]));
Add(Format('Paginação disponível: %f MB', [M.dwAvailPageFile/
cBytesPorMB]));
Add(Format('Total vitual: %fMB', [M.dwTotalVirtual/cBytesPorMB]));
Add(Format('Virtual disponível: %fMB',
[M.dwAvailVirtual/cBytesPorMB]));
T := formatfloat('#,##',(diskfree(0)));
Add('Espaço Livre do HD: '+ copy(T,1,4)+' MB');
T:= formatfloat('#,##',(DiskSize(0)));
Add('Tamanho do HD: '+copy(T,1,4)+' MB') ;
end;
end;
[delphi-br] Novo arquivo carregado em delphi-br
Olá, Esta mensagem é uma notificação para informá-lo que um novo arquivo foi adicionado no grupo delphi-br. Arquivo : /Exemplos/SmartLowLevelLibSample.rar Carregado por : cartouchebr djpardalro...@hotmail.com Descrição : Exemplo de uso da minha biblioteca COM (SmartLowLevelLib.dll) que desenvolvi para acessar portas de I/O do computador sem a necessidade de drivers de terceiros (InpOut32, DirectIO, PortIO, etc.) Você pode acessar o arquivo pela URL: http://br.groups.yahoo.com/group/delphi-br/files/Exemplos/SmartLowLevelLibSample.rar Para saber mais sobre compartilhamento de arquivos no grupo, leia: http://help.yahoo.com/help/br/groups/files Atenciosamente, cartouchebr djpardalro...@hotmail.com
Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
tente assim:
mysqldump --user=USER --password=SENHA --databases BANCO --opt --quote-names
--allow-keywords --complete-insert C:\SQL.SQL
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 14 de abril de 2010 16:57, dionatanhenrique dionata...@hotmail.comescreveu:
Pessoal estou tentando a varios dias criar uma rotina de backup para
mysql..
porem sem sucesso..
Bom criei um bat com o seguinte comando:
mysqldump.exe -B -c --single-transaction --default-character-set=latin1
BANCO -u root --password=SENHA -h localhost backup.sql
bom ele ate funciona mas para campos que nao seja BLOB.. pois campos que
tenha figura ele detona o campo nao fazendo o backup direito o que esta de
errado neste comando? isso se eu clico direto no icone do bat
outra coisa quando eu uso o delphi para executar ele nao executa ... por
exemplo
WinExec(PChar('backup.bat'),SW_NORMAL);
ele so pisca a tela mas nao faz o backup... e se clico direto no arquivo
backup.bat ele executa faz o backup mas os campos blob não sai todo errado..
alguem pode me auxiliar...
--- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
Carlos gcm3...@... escreveu
Meu camarada, mais uma vez, boa tarde! Como eu havia dito
anteriormente, a sua pergunta é muito vaga, e talvez se vc tivesse
se expressado melhor, teríamos lhe auxiliado melhor!
O que vc quer, seria mais ao menos isso:
1 Form;
1 Label;
1 SpeedButton;
1 TTimer.
No evento onTimer do TTimer, digite o seguinte:
lblDate.Caption := FormatDateTime('dd/mm/ - HH:MM:SS', Now);
No evento onClick do SpeedButton digite o seguinte:
var
__mData: string;
begin
mData := FormatDateTime('dd', Now)+ FormatDateTime('mm', Now)+
FormatDateTime('', Now) + FormatDateTime('hh', Now) +
FormatDateTime('nn', Now) + FormatDateTime('ss', Now)+ '.sql';
WinExec(PChar('cmd.exe /c C:\backup\bin\mysqldump -h NomeDaMáquina' +
' -u root -pSEnha --opt NomeDoBancoCaminho\'
+ mData),SW_HIDE);
showmessage('Backup realizado com sucesso');
end;
É lógico que vc pode incrementar, mas a vantagem é poder colocar um
diretório fixo para salvar, e ele irá salvar o seu backup com o nome
da data e horário que foi feito.
Exemplo:
01012009120516.sql, informa que este backup foi feito no dia 01 de
janeiro de 2009 as 12:05:16 e vc poderá efetuar outro backup neste
diretório sem perder o anterior.
Viu ai...sem crise!!!Conversando a gente se entende!
Fraterno abraço,
Carlos
[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] OFF - Teste automatizado
Eu não faço testes automatizados em Delphi, mas usaria o DUnit se fizesse. Para testes visuais (de interface) não se recomenda testes automatizados e sim um testador humano. [ ]'s Dirlei. Em Qui, 2010-04-15 às 12:53 +, simoesluciano escreveu: Como vocês fazem testes automatizados em suas classes do server e nas telas do client? Luciano C. Simões
[delphi-br] Como usar uma DLL criada pelo DotNet no Delphi
Colegas, boa tarde, tenho que usar em uma aplicação desenvolvida em Delphi 7 uma DLL construída através do DotNet. Alguém poderia me dar umas dicas ou me ajudar | Desde já agradeço a colaboração de todos. Abaço a todos. Marco Antônio. Consultor Analista de Sistemas. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Envio E-Mail
Ah! Se eu não me engano eu estive usando a porta 587 para SMTP. 2010/4/15 Daniel Hiromy hirom...@gmail.com Olá Eduardo! Para enviar email via GMail eu faço o seguinte: IdSSLIOHandlerSocketOpenSSL := TIdSSLIOHandlerSocketOpenSSL.Create; IdSSLIOHandlerSocketOpenSSL.SSLOptions.Method := sslvSSLv2; IdSSLIOHandlerSocketOpenSSL.SSLOptions.Mode := sslmUnassigned; IdSMTP.IOHandler := IdSSLIOHandlerSocketOpenSSL; IdSMTP.UseTLS := utUseRequireTLS; Abraços. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Impressão Bematech (e m rede)
Pode me dar umas dicas de como fazer esse servidor com socket? também
vou precisar criar algo assim pra um sistema, mas no caso recebe o
pedido, e de tempo em tempo imprime os cupons enviados no período.
Em 14/04/2010 21:52, lsbdevelopment escreveu:
Companheiro.
eu resolvi esse problema criando um servidor com socket.
one eu envio o codigo da venda por exemplo, ai o servidor recebe
a mensagem 'codigo', realiza a consulta e monta a impressao
para impressora nao fiscal. o bom é que, com esse servidor vc
pode usar em qualquer sistema.
--- Em delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br, Felipe Oriani fbori...@...
escreveu
Olá pessoal, muito obrigado pela resposta =).
Maikel, mas no meu caso é a impressora não fiscal para impressão de
cupom e
não estou conseguindo acessar da outra máquina na rede para
impressão. Fiz
compartilhamento com drive generic e td bem aparentemente Consigo
localizar a impressora na rede mas no delphi, não sei como configurar a
porta, já tentei ltp1, com1, \\nome_maquina\impressora mas nada
Tentei também comandos no DOS pra redirecionar a porta, por exemplo:
net use ltp1 \\nome_maquina\impressora
ou
net use com1 \\nome_maquina\impressora
Locamente, apenas setando com1 no delphi, imprimi o cupom na bematech
perfeitamente.
Eu queria saber qual comando mantem o redirecionamento correto, e
como devo
setar no delphi para apontar corretamente.
Obrigado desde já a atenção desperdiçada.
[]'s
2010/4/14 Maikel Gabriel maikel_gabr...@...
Olá Felipe,
Eu geralmente compartilho a impressora no windows, dai ela fica
visivel
para toda a rede.
Para criar a impressora, como não tem o Drive com nome Bematech, use o
Fornecedor Generico, opção Somente Texto.
Dai simplesmente teu gerador de relatórios (ex: Fortes, Quick,
etc) manda
para a impressora.
Ou pode mandar direto por linha de comando, sem abrir a caixa de
seleção da
impressora, ou sem ter ela configurada no windows local, por exemplo:
Se fizer isso via linha de comando DOS também funciona.
TYPE nomearquivo.txt \\nomemicro\nomecompartilhamento
Pode melhorar o comando assim:
C:\windows\system32\cmd.exe /C TYPE *
\\nomemicro\nomecompartilhamento
Onde (*) é igual ao nome do arquivo
Espero ter ajudado,
Abraço!
De: Felipe Oriani fbori...@... fboriani%40gmail.com
Para: delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Enviadas: Terça-feira, 13 de Abril de 2010 12:46:08
Assunto: [delphi-br] Impressão Bematech (em rede)
Olá pessoal, como estão?
Estou desenvolvendo um projeto em Delphi7 e atualmente o software
imprimi
na
impressora bematech não fiscal perfeitamente pela portal COM1, porém
gostaria de saber como devo proceder para que outras máquinas na rede
consigam acessar aquela impressora na máquina que está instalada e
imprimir
um cupom ??
Se alguém puder me ajudar agradeço desde já!
Obrigado
Att,
--
_ _
Felipe B. Oriani
fbori...@gmail. com | www.felipeoriani. com.br
...Trabalhe quanto puder, tornando-se útil quanto possível... ,
por André
Luiz
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
__
Felipe B. Oriani
fbori...@... | www.felipeoriani.com.br
...Trabalhe quanto puder, tornando-se útil quanto possível... ,
por André
Luiz
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Editor Html
Boa tarde Tenho um sistema que necessita ter um editor básico de html. Ele é usado para cadastrar as noticias de um site, onde o usuário pode estar modificando a visualização Alguém conhece algum componente que além de ser editor html, seja dataware??? Atenciosamente Juliomar Marchetti [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Gráfico Pizza dentro de Gráfico Pizza - Pizza Detalhado
Aee pessoal ... Estou precisando gerar um grafico em formato de pizza. Esse gráfico só tem um detalhe, teria que ser um grafico pizza dentro de um grafico pizza . Exemplo: Ao clicar numa fatia, mostrar outro gráfico relativo aquela fatia ... Abaixo segue um link de exemplo http://office.microsoft.com/pt-br/excel/HA011179371046.aspx Estou utilizando o componente DBChart porém nao estou conseguindo gerar esse grafico de pizza dentro de pizza, somente uma pizza normal consigo gerar ... Se alguém souber se da pra fazer em delphi ou em outra linguagem Desde já, agradeço. -- Timóteo Matthies Rico [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [1/2OFF] SQL Lento no Firebird
Galera estou executando o sql: SELECT CLI.COD_CLI, CLI.NOME_CLI FROM CLIENTES CLI WHERE CLI.SITUACAO = '2' AND COD_CLI NOT IN ( SELECT DISTINCT(CAB.COD_CLI) FROM SAI_CAB CAB WHERE CAB.DIGITO = 'O' AND CAB.DT_PEDIDO '01/01/2010' ) Nele tem 2 Select executando separadamente da certa de 1s cada um, como podem ver o segundo select é so para filtrar o primeiro. Quando executo o SQL completo o mesmo demora muito como se escutasse o segundo Select para cada registro do primeiro (burrice do firebird) sendo assim como criar uma tabela temporária com os registros do segundo select para fazer o filtro ficar + rápido. Grato Iran. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tabela de preços
Uso da seguinte forma: Tabela Produto - dados pertinentes ao produto/serviço exceto preço de venda (inclui custo) Tabela Tipos de Preços - id e nome de tipos possíveis de preços, da pra acrescentar um campo pra taxa pré-definida se for o caso (%) Tabela ProdutoPrecos - idProduto, idPreco, acrescimo ($ ou % sobre custo do produto), valor de venda tenho um sp que verifica se todos os produtos possuem todos os tipos de preço na tabela ProdutoPreço ao fazer a venda (passar o produto) se escolhe qual o plano de venda (tipo de preço ou termo que for + conveniente) Sds Fabiano Em 14/04/2010 17:51, Samuca ( Yahoo ) escreveu: Paulo, Boa Tarde, Eu acredito que a melhor forma seria ter uma segunda tabela onde vc teria cadastrados cada preço que desejar... você poderia inclusive trabalhar com uma terceira tabela onde teria o nome da lista e aí vc teria nesta sua tabela de preços o produto+lista como chave. Entendido? Samuca - Original Message - From: Paulo Coutinho To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Wednesday, April 14, 2010 5:42 PM Subject: [delphi-br] Tabela de preços Olá a todos, Tenho a seguinte situação: Meu ERP possui 3 preços fixos na tabela de produtos, sendo que alguns clientes novos precisam de 4 preços, então eu quero criar uma forma dentro dos padrões para que exista uma forma forma dele cadastrar quantos preços quiser. Não sei como é feito em outros sistemas, mas aceito sugestões e opniões. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com mailto:paulo%40prsolucoes.com Skype: paulo.prsolucoes Consultor Certificado Bindows [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Envio E-Mail
Olá Eduardo! Para enviar email via GMail eu faço o seguinte: IdSSLIOHandlerSocketOpenSSL := TIdSSLIOHandlerSocketOpenSSL.Create; IdSSLIOHandlerSocketOpenSSL.SSLOptions.Method := sslvSSLv2; IdSSLIOHandlerSocketOpenSSL.SSLOptions.Mode := sslmUnassigned; IdSMTP.IOHandler := IdSSLIOHandlerSocketOpenSSL; IdSMTP.UseTLS := utUseRequireTLS; Abraços. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] campo igual com dados de tabela diferente
ja tentou usar o UNION? Em 14/04/2010 17:59, lucianodanilo escreveu: Boa tarde pessoal Gostaria que minha consulta retornasse no campo 'Nome', tanto cliente como fornecedor porem essa estrutura era feita de uma clausula if, se 1° condicao faça o primeiro left join caso contrario faça o segundo, porem quero que nao aconteça essa condição e apresentar no mesmo campo tato nome cliente como fornecedor. Porém como contorno o erro de Alias devido aos apelido cliente na tabela fornecedor SELECT Notas.Saida, Clientes.Nome , Notas.Condicao, Notas.Cep From Notas LEFT JOIN Clientes fornecedores Clientes ON (Clientes.Codigo = Notas.Cliente) LEFT JOIN Fornecedores Clientes ON (Fornecedores.Codigo = Notas.Cliente ) esse e apenas o trecho da consulta porem a que me ocasiona erro [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [1/2OFF] SQL Lento no Firebird
Amigão, Não usa o IN, usa o NOT Exists. Ex: SELECT CLI.COD_CLI, CLI.NOME_CLI FROM CLIENTES CLI WHERE CLI.SITUACAO = '2' AND NOT EXISTS ( SELECT 1 FROM SAI_CAB CAB WHERE CAB.DIGITO = 'O' AND CAB.DT_PEDIDO '01/01/2010' AND CAB.COD_CLI = CLI.COD_CLI ) Testa aí e vê se resolveu!. Fernando Nati. 2010/4/15 Iran Lima i...@sgisolution.com.br Galera estou executando o sql: SELECT CLI.COD_CLI, CLI.NOME_CLI FROM CLIENTES CLI WHERE CLI.SITUACAO = '2' AND COD_CLI NOT IN ( SELECT DISTINCT(CAB.COD_CLI) FROM SAI_CAB CAB WHERE CAB.DIGITO = 'O' AND CAB.DT_PEDIDO '01/01/2010' ) Nele tem 2 Select executando separadamente da certa de 1s cada um, como podem ver o segundo select é so para filtrar o primeiro. Quando executo o SQL completo o mesmo demora muito como se escutasse o segundo Select para cada registro do primeiro (burrice do firebird) sendo assim como criar uma tabela temporária com os registros do segundo select para fazer o filtro ficar + rápido. Grato Iran. [As partes desta mensagem que não continham texto foram removidas] [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: [MAF] Memória e process ador
Marcos Abreu Ferreira escreveu: Silvio, é quase isso... Precisava saber o total de memória utilizada por um determinado programa. Mai fácil ainda :) Veja se esse isso que esta aqui (observe que o caption do Form bate com a memória utilizada pelo Project1.exe): http://imagebin.org/93206 Fiz a tua pergunta (juro :) ) memória utilizada por um determinado programa em inglês e olha no que deu: http://bit.ly/ayt4li No primeiro link: http://stackoverflow.com/questions/437683/how-to-get-the-memory-used-by-a-delphi-program -- uses PsAPI; function CurrentProcessMemory: Cardinal; var MemCounters: TProcessMemoryCounters; begin MemCounters.cb := SizeOf(MemCounters); if GetProcessMemoryInfo(GetCurrentProcess, @MemCounters, SizeOf(MemCounters)) then Result := MemCounters.WorkingSetSize else RaiseLastOSError; end; procedure TForm1.Button1Click(Sender: TObject); begin Caption := IntToStr(CurrentProcessMemory) end; -- Se quiser aquelas firulas com KB, MB e GB, use a dica do Rubem: http://www.silvioprog.com.br/dicas/representandocapacidadescomputacionaisemstrings -- []'s Silvio Clécio -- programmer ObjectPascal - http://silvioprog.com.br -- twitter - http://twitter.com/silvioprog -- Grupo Lazarus-BR no Google - http://groups.google.com/group/lazarus-br
RE: [delphi-br] Como usar uma DLL criada pelo DotNet no Delphi
Se esse assembly .NET foi gerado para ser acessado também como um componente COM, então basta apenas importar as definições do mesmo no Delphi. Mas se, e somente se, o assembly tiver sido compilado para ser também usado como um componente COM. Certifique-se disso. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: mconta...@yahoo.com.br Date: Thu, 15 Apr 2010 08:36:39 -0700 Subject: [delphi-br] Como usar uma DLL criada pelo DotNet no Delphi Colegas, boa tarde, tenho que usar em uma aplicação desenvolvida em Delphi 7 uma DLL construída através do DotNet. Alguém poderia me dar umas dicas ou me ajudar | Desde já agradeço a colaboração de todos. Abaço a todos. Marco Antônio. Consultor Analista de Sistemas. _ O Internet Explorer 8 te dá dicas de como navegar mais seguro. Clique para ler todas. http://www.microsoft.com/brasil/windows/internet-explorer/?WT.mc_id=1500 [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Editor Html
Caso não encontre componente assim, você pode remediar isso usando TRichEdit. No seu caso, como quer algo data-aware, use TDBRichEdit. Depois, quando for publicar o texto RTF para web, converta-o para HTML. Tem dicas na Internet, voltadas para Delphi, que mostram como converter HTML para RTF e vice-versa. Boa sorte. Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Juliomar Marchetti Enviada em: quinta-feira, 15 de abril de 2010 14:06 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Editor Html Boa tarde Tenho um sistema que necessita ter um editor básico de html. Ele é usado para cadastrar as noticias de um site, onde o usuário pode estar modificando a visualização Alguém conhece algum componente que além de ser editor html, seja dataware??? Atenciosamente Juliomar Marchetti [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Master Detail com Campo Auto-Incremento
Olá amigos, alguém sabe como utilizar Master/Detail com campo auto incremento (generator) ?? Preciso que o campo auto-incremento gerado pelo banco seja atualizado na tela. Utilizo DBExpress , Delphi7 e Firebird. Agradeço. Diego. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] campo igual com dados de tabela diferente
resolvi a soluçao da seguinte maneira funciona porem se nao for o ideial,
coalesce(Clientes.Nome,) || coalesce(Cli.nome,) as nome dentro do select
e nos joins
QueryNotas.Sql.Add('LEFT JOIN Clientes Clientes ON (Clientes.Codigo = Notas
Cliente)');
QueryNotas.Sql.Add('LEFT JOIN Fornecedores Cli ON (Fornecedores.Codigo =
Notas.Cliente)');
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Editor Html
tenho um componente free não dataware... se te interessar posso te enviar, ele é bem pequeno, ou se me ensinar como, coloque nos arquivos do grupo. Em 15/04/2010 15:05, Juliomar Marchetti escreveu: Boa tarde Tenho um sistema que necessita ter um editor básico de html. Ele é usado para cadastrar as noticias de um site, onde o usuário pode estar modificando a visualização Alguém conhece algum componente que além de ser editor html, seja dataware??? Atenciosamente Juliomar Marchetti [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF - Teste automatizado
Owarruma a data do seu micro vai22/11/2009, ninguém merece... Em 22/11/2009 01:16, Dirlei escreveu: Eu não faço testes automatizados em Delphi, mas usaria o DUnit se fizesse. Para testes visuais (de interface) não se recomenda testes automatizados e sim um testador humano. [ ]'s Dirlei. Em Qui, 2010-04-15 às 12:53 +, simoesluciano escreveu: Como vocês fazem testes automatizados em suas classes do server e nas telas do client? Luciano C. Simões [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] - Porta USB
Bom dia pessoal. Queria saber se alguem conhece algum meio de enviar dados a uma porta USB especifica. Hoje eu faço isso com a porta COM, passando comandos string para ela. Mas estou precisando fazer isso para uma porta USB. É possível? Como? Obrigado a todos... Att. MDV
Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
Só uma dica no final não use:
C:\SQL.SQL
use:
--result-file=sql.sql
[]s
Luiz Escobar
--
From: Eduardo Silva dos Santos eduardo@gmail.com
Sent: Thursday, April 15, 2010 12:51 AM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
tente assim:
mysqldump --user=USER --password=SENHA --databases
BANCO --opt --quote-names
--allow-keywords --complete-insert C:\SQL.SQL
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 14 de abril de 2010 16:57, dionatanhenrique
dionata...@hotmail.comescreveu:
Pessoal estou tentando a varios dias criar uma rotina de backup para
mysql..
porem sem sucesso..
Bom criei um bat com o seguinte comando:
mysqldump.exe -B -c --single-transaction --default-character-set=latin1
BANCO -u root --password=SENHA -h localhost backup.sql
bom ele ate funciona mas para campos que nao seja BLOB.. pois campos que
tenha figura ele detona o campo nao fazendo o backup direito o que esta
de
errado neste comando? isso se eu clico direto no icone do bat
outra coisa quando eu uso o delphi para executar ele nao executa ... por
exemplo
WinExec(PChar('backup.bat'),SW_NORMAL);
ele so pisca a tela mas nao faz o backup... e se clico direto no arquivo
backup.bat ele executa faz o backup mas os campos blob não sai todo
errado..
alguem pode me auxiliar...
--- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
Carlos gcm3...@... escreveu
Meu camarada, mais uma vez, boa tarde! Como eu havia dito
anteriormente, a sua pergunta é muito vaga, e talvez se vc tivesse
se expressado melhor, teríamos lhe auxiliado melhor!
O que vc quer, seria mais ao menos isso:
1 Form;
1 Label;
1 SpeedButton;
1 TTimer.
No evento onTimer do TTimer, digite o seguinte:
lblDate.Caption := FormatDateTime('dd/mm/ - HH:MM:SS', Now);
No evento onClick do SpeedButton digite o seguinte:
var
__mData: string;
begin
mData := FormatDateTime('dd', Now)+ FormatDateTime('mm', Now)+
FormatDateTime('', Now) + FormatDateTime('hh', Now) +
FormatDateTime('nn', Now) + FormatDateTime('ss', Now)+ '.sql';
WinExec(PChar('cmd.exe /c C:\backup\bin\mysqldump -h NomeDaMáquina' +
' -u root -pSEnha --opt NomeDoBancoCaminho\'
+ mData),SW_HIDE);
showmessage('Backup realizado com sucesso');
end;
É lógico que vc pode incrementar, mas a vantagem é poder colocar um
diretório fixo para salvar, e ele irá salvar o seu backup com o nome
da data e horário que foi feito.
Exemplo:
01012009120516.sql, informa que este backup foi feito no dia 01 de
janeiro de 2009 as 12:05:16 e vc poderá efetuar outro backup neste
diretório sem perder o anterior.
Viu ai...sem crise!!!Conversando a gente se entende!
Fraterno abraço,
Carlos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
RES: [delphi-br] Master Detail com Campo Auto-Incremento
Quando trabalho com TClientDataSet e tenho campos auto-incremento para gerar as chaves tanto de uma tabela máster como de seus detalhes, gero valores de chave e sub-chave localmente, na aplicação. Só depois deu aplicar o TClientDataSet ao banco de dados (ApplyUpdates) é que mostro (se for aplicável na maioria das vezes, não precisa disso!) as chaves já geradas pelo banco de dados. Faço isso seguindo dicas e orientações do excelente artigo http://av.rds.yahoo.com/_ylt=A0oGkti3l8dLJlQA7QYNGqMX;_ylu=X3oDMTBzdXAxcTho BHBndANhdl93ZWJfYWR2X3Jlc3VsdARzZWMDc3I-/SIG=11s6l03of/EXP=1271458103/**http %3a/edn.embarcadero.com/article/20847 How to use AutoInc fields with DataSnap, de autoria de Dan Miser. Sugiro que faça o mesmo! Boa sorte. Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de diego yahoo Enviada em: quinta-feira, 15 de abril de 2010 16:50 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Master Detail com Campo Auto-Incremento Olá amigos, alguém sabe como utilizar Master/Detail com campo auto incremento (generator) ?? Preciso que o campo auto-incremento gerado pelo banco seja atualizado na tela. Utilizo DBExpress , Delphi7 e Firebird. Agradeço. Diego. [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Master Detail com Campo Auto-Incremento
Ratificando o link do artigo: http://edn.embarcadero.com/article/20847 Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Rubem Rocha Enviada em: quinta-feira, 15 de abril de 2010 18:47 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Master Detail com Campo Auto-Incremento Prioridade: Alta Quando trabalho com TClientDataSet e tenho campos auto-incremento para gerar as chaves tanto de uma tabela máster como de seus detalhes, gero valores de chave e sub-chave localmente, na aplicação. Só depois deu aplicar o TClientDataSet ao banco de dados (ApplyUpdates) é que mostro (se for aplicável na maioria das vezes, não precisa disso!) as chaves já geradas pelo banco de dados. Faço isso seguindo dicas e orientações do excelente artigo http://av.rds.yahoo.com/_ylt=A0oGkti3l8dLJlQA7QYNGqMX;_ylu=X3oDMTBzdXAxcTho BHBndANhdl93ZWJfYWR2X3Jlc3VsdARzZWMDc3I-/SIG=11s6l03of/EXP=1271458103/**http %3a/edn.embarcadero.com/article/20847 How to use AutoInc fields with DataSnap, de autoria de Dan Miser. Sugiro que faça o mesmo! Boa sorte. Sds. 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 diego yahoo Enviada em: quinta-feira, 15 de abril de 2010 16:50 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] Master Detail com Campo Auto-Incremento Olá amigos, alguém sabe como utilizar Master/Detail com campo auto incremento (generator) ?? Preciso que o campo auto-incremento gerado pelo banco seja atualizado na tela. Utilizo DBExpress , Delphi7 e Firebird. Agradeço. Diego. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Gráfico Pizza dentro de Gráfico Pizza - Pizza Detalhado
Caro timóteo, se vc usa delphi 7 atualize a versao do tchart na versao mais atual, tem como vc clicar em uma barra do grafico dai vc pega quem é é ela tipo vendeor x, refaz a consulta apenas para o vendedor x e exibem em outro grafico, como detalhe, se nao me engano no exemplo da nova versao tem esse modelo. --- Em delphi-br@yahoogrupos.com.br, Timóteo M. Rico timote...@... escreveu Aee pessoal ... Estou precisando gerar um grafico em formato de pizza. Esse gráfico só tem um detalhe, teria que ser um grafico pizza dentro de um grafico pizza . Exemplo: Ao clicar numa fatia, mostrar outro gráfico relativo aquela fatia ... Abaixo segue um link de exemplo http://office.microsoft.com/pt-br/excel/HA011179371046.aspx Estou utilizando o componente DBChart porém nao estou conseguindo gerar esse grafico de pizza dentro de pizza, somente uma pizza normal consigo gerar ... Se alguém souber se da pra fazer em delphi ou em outra linguagem Desde já, agradeço. -- Timóteo Matthies Rico [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
Luiz, qual a diferença?
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 15 de abril de 2010 17:13, Luiz Escobar esco...@megasistema.com.brescreveu:
Só uma dica no final não use:
C:\SQL.SQL
use:
--result-file=sql.sql
[]s
Luiz Escobar
--
From: Eduardo Silva dos Santos
eduardo@gmail.comeduardo.drd%40gmail.com
Sent: Thursday, April 15, 2010 12:51 AM
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Subject: Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
tente assim:
mysqldump --user=USER --password=SENHA --databases
BANCO --opt --quote-names
--allow-keywords --complete-insert C:\SQL.SQL
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com eduardo.drd%40gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 14 de abril de 2010 16:57, dionatanhenrique
dionata...@hotmail.com dionatan_b%40hotmail.comescreveu:
Pessoal estou tentando a varios dias criar uma rotina de backup para
mysql..
porem sem sucesso..
Bom criei um bat com o seguinte comando:
mysqldump.exe -B -c --single-transaction --default-character-set=latin1
BANCO -u root --password=SENHA -h localhost backup.sql
bom ele ate funciona mas para campos que nao seja BLOB.. pois campos que
tenha figura ele detona o campo nao fazendo o backup direito o que esta
de
errado neste comando? isso se eu clico direto no icone do bat
outra coisa quando eu uso o delphi para executar ele nao executa ... por
exemplo
WinExec(PChar('backup.bat'),SW_NORMAL);
ele so pisca a tela mas nao faz o backup... e se clico direto no arquivo
backup.bat ele executa faz o backup mas os campos blob não sai todo
errado..
alguem pode me auxiliar...
--- Em delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.brdelphi-br%
40yahoogrupos.com.br,
Carlos gcm3...@... escreveu
Meu camarada, mais uma vez, boa tarde! Como eu havia dito
anteriormente, a sua pergunta é muito vaga, e talvez se vc tivesse
se expressado melhor, teríamos lhe auxiliado melhor!
O que vc quer, seria mais ao menos isso:
1 Form;
1 Label;
1 SpeedButton;
1 TTimer.
No evento onTimer do TTimer, digite o seguinte:
lblDate.Caption := FormatDateTime('dd/mm/ - HH:MM:SS', Now);
No evento onClick do SpeedButton digite o seguinte:
var
__mData: string;
begin
mData := FormatDateTime('dd', Now)+ FormatDateTime('mm', Now)+
FormatDateTime('', Now) + FormatDateTime('hh', Now) +
FormatDateTime('nn', Now) + FormatDateTime('ss', Now)+ '.sql';
WinExec(PChar('cmd.exe /c C:\backup\bin\mysqldump -h NomeDaMáquina' +
' -u root -pSEnha --opt NomeDoBancoCaminho\'
+ mData),SW_HIDE);
showmessage('Backup realizado com sucesso');
end;
É lógico que vc pode incrementar, mas a vantagem é poder colocar um
diretório fixo para salvar, e ele irá salvar o seu backup com o nome
da data e horário que foi feito.
Exemplo:
01012009120516.sql, informa que este backup foi feito no dia 01 de
janeiro de 2009 as 12:05:16 e vc poderá efetuar outro backup neste
diretório sem perder o anterior.
Viu ai...sem crise!!!Conversando a gente se entende!
Fraterno abraço,
Carlos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] - Porta USB
se for pra mandar impressão, abra impressoras no painel de controle, va em propriedades da impressora que tu precisa mandar a impressão, na aba portas marque uma porta COM disponível, depois disso o que for enviado pra porta COM marcada é redirecionado automaticamente pra USB Em 15/04/2010 17:10, marcosdiasvendramini escreveu: Bom dia pessoal. Queria saber se alguem conhece algum meio de enviar dados a uma porta USB especifica. Hoje eu faço isso com a porta COM, passando comandos string para ela. Mas estou precisando fazer isso para uma porta USB. É possível? Como? Obrigado a todos... Att. MDV [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Leitor optico USB
Olá, Hoje fui no cliente ver qual era o problema. E o que descobri? Era a porta USB :( Algumas portas não funcionavam e nem reconheciam, e em outras já funcionavam normalmente. Obrigado a todos. -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com Skype: paulo.prsolucoes Consultor Certificado Bindows Em 14 de abril de 2010 17:56, Samuca ( Yahoo ) samuca_1...@yahoo.com.brescreveu: Paulo, O leitor conectado ao PC pode emular uma porta teclado ou serial, vai depender da configuração. Provavelmente falte somente a configuração do leitor. Abraço Samuca - Original Message - From: Paulo Coutinho To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, April 14, 2010 5:29 PM Subject: [delphi-br] Leitor optico USB Olá a todos, Tenho um cliente que comprou 2 pistolas USB , uma da bematech e outra da elgin, sendo que nenhuma das 2 está lendo o código, eu passo a pistola no código e ela não envia nada para a máquina, testei direto no word, pois como ela só re-digitaliza, então tem que funcionar em qualquer lugar, assim como a ps2 funciona. Alguém tem idéia do que pode ser? -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com Skype: paulo.prsolucoes Consultor Certificado Bindows [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Dear friends! a--b
Dear friends! Keep in touch.I find a website selling various innovative products, such as mobile phone, LCD TV, laptop, motorbike and so on.And all products originate from America, Japan or Korea. This website is www.kicrop11.INFO I have purchased some products from this website.The cost is low, but the quality is high and they delivery products in time.Now they have a promotion, but it only lasts for 45 days. if you need, you can browse. Best wishes!h--) [As partes desta mensagem que não continham texto foram removidas]
