Oi Eny, tudo que os rapazes postaram acima é verdadeiro.
Qualquer banco até mesmo o Firebird ue praticamente não precisa de nenhum
tunning precisa de uma configuração e uma correta forma de se lidar, o Firebird
ainda é tão divulgado por questões históricas ele é uma versão aberta que se
Realmente,
Uso muito o FireBird em ambientes de missão critica, tenho casos de mais de 200
conexões simultâneas em processos que demanda de alta velocidade e segurança.
Grande parte da solução de velocidade está na modelagem, por isso que no inicio
do artigo da edição 74 da Active Delphi
Para o método SetFocus, seria melhor vc chamar direto o método. Por exemplo,
se vc estiver em um form, bastaria chamar
Self.FocusControl(edit1)
ou vc cria um método seu
procedure TForm1.SetFocusComponent(AComponent: TComponent);
begin
if AComponent is TWinControl then
isso é muito diferente do que preciso, mesmo assim obrigado.
--- Em delphi-br@yahoogrupos.com.br, Fabricio Colombo
fabricio.colombo@... escreveu
Para o método SetFocus, seria melhor vc chamar direto o método. Por exemplo,
se vc estiver em um form, bastaria chamar
O que denegre o banco, ao meu ver, é que se ele exige ou pelo menos requeira um
DBA para fazer o trabalho de ajuste e tunnagem do mesmo, aí vem muitas vezes o
próprio desenvolvedor na base da fuçação mesmo pra tentar configurar. Acaba até
configurando corretamente, mas depois de muito penar e
Bom dia.
Gostaria de tirar alguns duvidas a respeito de nota fiscal eletronica com
NFe. Até onde sei notas de serviço eletronica não tem para todos as cidades
mas existe uma informacao que me passaram a respeito que se o contribuinte
tem Inscricao Estadual ele poderá emitir na NFe serviços e
Preciso buscar todos os clientes que não possuem pedidos
tenho a tabela clientes e a tabela clientes
já fiz assim:
SELECT PED.*,CLI.CD_CLIENTE,CLI.FANTASIA
FROM CLIENTE CLI
LEFT OUTER JOIN PEDIDO PED ON (PED.CD_CLIENTE = CLI.CD_CLIENTE)
WHERE CLI.CD_CLIENTE NOT IN
(SELECT
Olhem mais uma matéria que pode ajudar nessa conversa,
Entendendo o 'lixo' no BD
http://www.firebase.com.br/fb/artigo.php?id=2047
http://www.firebase.com.br/fb/artigo.php?id=2047
2010/7/15 Walter Chagas (Bol) wchag...@bol.com.br
O que denegre o banco, ao meu ver, é que se ele exige ou pelo
Taí... gostei!
Realmente acho que o ideal é fazer parcerias com quem realmente entende da
coisa... Mas, vai falar isso pro dono da empresa! Acho que o que aconteceu com
meu amigo foi exatamente isso... Uma pessoa que não está mais na empresa
colocou
o sistema pra rodar com o FB... aí ele foi
A solução não é a melhor, porém funciona. É possível efetuar o select
utilizando-se de joins de várias maneiras.
/* Clientes que não possuem pedidos */
select CLI.*
from CLIENTE CLI
where not exists (select 1 from PEDIDO PED where PED.CD_CLIENTE =
CLI.CD_CLIENTE)
/* Clientes que possuem pedidos
Valeu amigos
resolvido
--- Em qui, 15/7/10, Humberto Oliveira holiveira.wordpr...@gmail.com escreveu:
De: Humberto Oliveira holiveira.wordpr...@gmail.com
Assunto: Re: [delphi-br] sql simples mas nao funciona
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 15 de Julho de 2010, 10:24
É possível abrir um arquivo txt no notepad com uma fonte pré-definida? Eu
gostaria de usar a fonte Courier, pois se cada letra ocupar um tamanho
diferente o texto fica todo desconfigurado.
[As partes desta mensagem que não continham texto foram removidas]
O notepad (bloco de notas) não aceita formatação de texto, é para trabalhar
com texto puro.
Em 15 de julho de 2010 11:03, Alisson alss...@yahoo.com.br escreveu:
É possível abrir um arquivo txt no notepad com uma fonte pré-definida? Eu
gostaria de usar a fonte Courier, pois se cada letra
Não. O Notepad exibe text puro sem formatação alguma.
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://delphitocorporerm.blogspot.com/
http://twitter.com/wchagas
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr
- Original Message -
Alguém tem algum algoritimo para capturar o nome da tabela a que se refere uma
query?
por exemplo um objeto TsqlQuery com a instrução:
' select nome,telefone from CLIENTE where idcliente = :cliente ';
o algoritimo iria retornar 'CLIENTE'.
[As partes desta mensagem que não continham
O problema é que a Query trabalha com um dataset e não específicamente com uma
tabela. E, antes que você pergunte, o dataset depende é da sentença que ce
jogou no banco. Portanto, se voce montou um SQL contendo joins, não dá mais pra
referir a query a uma determinada tabela.
[]s
Walter
Não tem algoritmo ou fórmula mirabolante pra esse caso. Usando a função
Pos(), peque a posição da palavra FROM e a posição da próxima cláusula
seguinte ao FROM (que pode ser WHERE, GROUP BY, HAVING, ORDER BY ou qualquer
uma outra, dependendo do banco de dados que estejas usando). Recorte a
Implementei sem problemas na semana passada em um sistema meu.
Qual o real problema que vc está tendo?
Sua procedure seria assim:
unit Unit2;
interface
uses ...;
type
TForm2 = class(TForm)
...
private
procedure ExecMethod(NoObjecto: TObject; Nome_Metodo: String);
...
var
Form2:
Talvez isso te ajude,
for iAux:=1 to iNum_Parcelas do
begin
gridCronogramaBanda.CreateColumn.DataBinding.FieldName:=
sTitulo+'_'+IntToStr(iAux);
end;
João Carlos
Em 15/07/2010 01:03, Vinicius Santos escreveu:
Em 14-07-2010 17:04, Murilo Cunha escreveu:
Pessoal,
Como
No primeiro caso, acredito que o not exists funciona
SELECT PED.*,CLI.CD_CLIENTE,CLI.FANTASIA
FROM CLIENTE CLI
LEFT OUTER JOIN PEDIDO PED ON (PED.CD_CLIENTE = CLI.CD_CLIENTE)
WHERE NOT EXISTS(SELECT PED.CD_CLIENTE FROM PEDIDO PED
WHERE CLI.CD_CLIENTE = PED.CD_CLIENTE)
ORDER BY
Ok, funcionou
Muito obrigado Fabrício e os demais
[]'s
Em 14 de julho de 2010 14:16, Fabricio Colombo
fabricio.colombo@gmail.com escreveu:
crie um método conforme abaixo, e associe ao stringgrid dinamicamente
procedure TForm1.StringGridDrawCell(Sender: TObject; ACol, ARow:
Alosi,
Desta forma eu também já tinha encontrado na internet e na documentação.
Veja que se você usar sua rotina como exemplifiquei anteriormente, não
funcionará:
ExecMethod( edit1, 'SETFOCUS' )
--- Em delphi-br@yahoogrupos.com.br, jalosii jalo...@... escreveu
Implementei sem problemas na
Eric, se você pensa em implementar algum tipo de automação em seus
aplicativos, envolvendo a manipulação de elementos nele contidos, sugiro
você pesquisar sobre ferramentas de scripting para Delphi. Uma boa
alternativa, free e de código fonte aberto, é o PascalScript, da RemObjects
Desculpe a pergunta um tanto pessoal, mas onde vc está nesse interiorzão de SP,
Eny?
Eu até pensei em insistir na carreira de DBA, mas sempre pinta aquela
insegurança... Eu gosto muito de BD mas gosto bastante de desenvolvimento tb...
Atte,
Ricardo.
1) Evite escrever suas mensagens usando
Colega, não é executar Scripts, por favor veja o que ja postamos.
o pequeno e completo exemplo que foi postado, esta bem claro e fácil, é uma
pena que há restrições e não consegui montar nada equivalente.
O que faço facilmente em outra linguagem estruturada com poucos recursos OOP,
parece ser
Se você quer usar algo parecido com macro-substituição, o Delphi não dá
suporte para isso, porquê simplesmente isso não é previsto na sua
arquitetura. Em linguagens interpretadas, como o PHP, ou
pseudo-interpretadas, como o (ainda vivo) Clipper, isso é possível (ou seja,
pode ser mamão com
estagio em delphi aqui na empresa que fica em recife - pernambuco.
quem tiver disponivel por favor mande seu curriculo para rafajo...@gmail.com
nao esquecer de informar os horarios disponiveis
t+
--
_
Rafael jorge alves
Desenvolvedor/analista
Ativa Soluções em TI.
Recife
Errado Rubem, quando me referi que faço (não é comum outros usarem OOP no nível
que utilizo) em outra linguagem, não é via macro-substituição, e conforme o
caso isso é um péssimo hábito, mas tudo isso não importa.
Ficar nas teorias disso ou aquilo não vamos sair do lugar.
Delphi é uma linguagem
Obrigado, achei que alguém podesse ter um parser para fazer isto.
From: Rubem Rocha rubem.ro...@dtmanaus.com.br
To: delphi-br@yahoogrupos.com.br
Sent: Thu, July 15, 2010 11:52:45 AM
Subject: RES: [delphi-br] Procurar Nome da tabela dentro da query
Não
Pode ser que existam parsers mas, como podes constatar que isso é bem simples,
nada impede que você possa construir o seu próprio parser. Boa sorte. Sds.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome
de Evaldo
Enviada em: quinta-feira, 15 de julho de 2010
Mas é possível trocar a fonte de exibição, Formatar Fonte... (abre o diálogo
padrão do Windows)
Seria isso?
Atte,
Ricardo.
1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor
compreendida.
3) Vamos ajudar o
Tem o método GetTableNameFromSQL da unit DBCommon. Mais tem casos
especificos que não funciona.
Por exemplo, esse sql abaixo funcionar perfeitamente
select *
from tabela1 a
left outer join tabela2 on a.id = b.id
Agora se vc utilizar subqueries no select como o exemplo abaixo, ai não
funciona,
Eric,
Note que a função SetFocus do TWinControl é PUBLIC e não PUBLISHED. Por
isso o METHODADDRESS não vai achar o método na chamada ExecMethod( edit1,
'SETFOCUS' )
[]´s
Sergio Uetanabaro
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de
Mais até agora vc não disse qual o problema que vc quer resolver. Qual a sua
necessidade? Por que vc precisa que os métodos sejam executados pelo nome?
Em 15 de julho de 2010 14:22, eric_developer
developer.syst...@yahoo.comescreveu:
Colega, não é executar Scripts, por favor veja o que ja
Evaldo,
Caso a consulta for baseada somente em uma tabela ou em outra query, basta voce
procurar pela palavra from (com espaços antes e depois) e a palavra
seguinte é o nome do objeto de onde os dados são obtidos.
Em pseudo-código=
1.identificar posição de from na query;
2.identificar o
Se você não define um local apropriado para o método ou propriedade, ele
será por default declarado como published, em se tratando de componentes.
Por isso que o MethodAddress funcionou!
No caso de classes normais, sem serem descendentes de TPersistent ou
TComponent, a declaração default é
No meu notepad tem a opção Formatar\Fonte. Não sei como solucionar seu
problema, mais opção de alterar a fonte tem sim.
Em 15 de julho de 2010 11:25, Walter Chagas (Bol) wchag...@bol.com.brescreveu:
Não. O Notepad exibe text puro sem formatação alguma.
[]s
Walter Alves Chagas Junior
Simples, não acredito que seja por que pode haver algumas querys com muitos
joins
e querys sem a clausula where
Obrigado.
From: Rubem Rocha rubem.ro...@dtmanaus.com.br
To: delphi-br@yahoogrupos.com.br
Sent: Thu, July 15, 2010 3:29:19 PM
Subject: RES: RES:
Sergio,
isso já sabemos, passei um exemplo prático que obviamente não funciona e para
que possam entender e alguem me sugerir uma alternativa que funcione para o
que eu quero, entendeu ??
--- Em delphi-br@yahoogrupos.com.br, Sérgio T. Uetanabaro s...@... escreveu
Eric,
Note que a
altera a fonte do programa e não do texto em si
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://delphitocorporerm.blogspot.com/
http://twitter.com/wchagas
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr
- Original Message -
From: Fabricio
Olá Eric,
Copiei abaixo, duas de suas mensagens:
2010/7/15 eric_developer developer.syst...@yahoo.com:
Colega, não é executar Scripts, por favor veja o que ja postamos.
o pequeno e completo exemplo que foi postado, esta bem claro e fácil, é uma
pena que há restrições e não consegui montar
OK Eric.
Eu entendo que a chamada dinâmica é um recurso que podemos utilizar em
vários casos mas teremos limitações qto ao tipo de declaração do método o
que complica ao ser utilizado nos métodos de componentes padrão do delphi.
Se o problema for realizar a chamada proposta então sugiro a vc
Marcos, espero que esteja bem errado e dê para fazer o que preciso.
Sugiro muito cuidado com certas afirmações NÃO É POSSIVEL ..., mesmo se for
um expert, assim você automaticamente cria diversos limites a si mesmo. Teve
situações parecidas onde um colega pediu algo e outro muito experiente e
Uma coisa que o Marcos disse é verdade. Chamadas de funções dinâmicas
somente podem ser feitas em métodos PUBLISHED pois somente com esse marcador
o compilador coloca na VMT da classe as informações do método. Soluções via
RTTI somente com published.
[]´s
Sergio Uetanabaro
De:
Boa tarde pessoal.
Como o grupo não é somente para postar problemas mas sim postar também
algumas dicas e soluções, talvez para alguem seja irrelevante mais segue
uma dica legal de como ordenar a grid da TMS, TDBAdvGrid.
lembrando a Grid faz a ordenação automática NATIVA, basta clicar na
E ai galera...
É o seguinte, tenho duas tabelas que tem um relacionamento de
um-para-muitos, e tem um alto indice de inserções agrupadas, preciso que
quando for inserido um valor na tabela master me seja retornado o número
exato que foi gerado para o campo chave desta para poder usar nos filhos,
Moderador, porquê não instituímos sorteios de brindes (ou coisa do tipo)
para aqueles colegas da lista que colaborarem com dicas para a lista? Assim,
podemos enriquecer o conteúdo da mesma, afim de que ela fique menos
0-800-HELPDESK e seja mais útil também.
Ah, mas quem poderia providenciar
São João da Boa Vista.. divisa com Poços de Caldas-MG
--
Eny Trova Urias
Somos o que repetitivamente fazemos, portanto, a excelência não é um feito,
mas
um hábito- Aristóteles
De: Ricardo César Cardoso ricardo_engs...@yahoo.com.br
Para:
Pessoal estou montando uma rotina para gerar o sped, em um movimento pequeno ok
a rotina roda legal, mas em um movimento grande ao dar insert no CDS da erro
Out Of Memory, apos processar um grande numero de registros
Eu tenho um CDS onde vou armazenando os dados, para depois fazer um loop e
cara... só fazendo uma stored procedure...
declare o parametro que você quer retornar como OUTPUT
create procedure sp_Gravar
@ID INT OUTPUT,
-- ai vc insere os valores
-- e retorna o ultimo identity gerado pelo SQL
SELECT @id = SCOPE_IDENTITY()
se não for em uma
Se não for published, não dá pra recuperar o nome.
Dá uma pesquisada sobre VMT (Virtual Method Table). O delphi armazena a
quantidade de métodos virtuais e os ponteiros dos respectivos métodos nessa
tabela, mais o nome do método em si, só se estiver no published.
Na unit JclSysUtils.pas da JVCL
Leu o meu post?
Em 15 de julho de 2010 16:07, Evaldo evaldoave...@yahoo.com.br escreveu:
Simples, não acredito que seja por que pode haver algumas querys com muitos
joins
e querys sem a clausula where
Obrigado.
From: Rubem Rocha
Eu já tive problemas utilizando TClientDataSet em memória parecido com isso
devido a grande quantidade de registros, sem falar no desempenho deplorável.
Agora utilizo um componente da devart chamado VirtualTable que vem junto com
o ODAC da devart, mais é pago. Se não me engano, o JEDI VCl tem um
Valdemir, se você prefere jogar os dados num ClientDataset para depois
passar para um TXT, não precisa acumular todos os dados no
ClientDataset para só no final gravar no TXT. Faça isso registro a
registro, assim você só manterá em memória um registro por vez.
--
Dirlei Dionísio
Olá, pessoal gsotaria da opinião de vocês sobre o uso do ClientPDV(DataSnap+
Delphi2010) .
Qual a melhor maneira na opnião de cada um em relação ao tratamento do uso
Off-Line e On-Line?
Tenho o seguinte ambiente:
-AppServer
-AppClient
Quando o AppClient não acha conexão com o AppServer, qual a
55 matches
Mail list logo