...
var i:integer;
texto,varletras,varnumeros:string;
begin
texto := 'SUA STRING';
varletras := ´´;
varnumeros := ´´;
for i:=1 to Length(Texto) do
if (Texto[i] in [´0´..´9´]) then
varnumeros := varnumeros+Texto[i]
else
varletras := varletras + Texto[i];
end;
Ao final desse código a variável numletras terá as letras e a variável varnumeros terá os números.
OBJETIVO DO SITE : COMPARTILHAR CONHECIMENTO ENTRE OS QUE UTILIZAM LINGUAGEM DE PROGRAMAÇÃO OBJECT PASCAL E FERRAMENTA DE DESENVOLVIMENTO BORLAND/EMBARCADERO DELPHI. AQUI SERÃO POSTADAS DICAS PARA RESOLUÇÃO DE PROBLEMAS QUE SÃO COMUNS ENTRE OS QUE ESTÃO INICIANDO NO MUNDO DA PROGRAMAÇÃO. OBRIGADO PELA SUA VISITA !
Total de visualizações de página
terça-feira, 25 de dezembro de 2012
quarta-feira, 5 de dezembro de 2012
coalesce : obrigar select filtrar valores nulos para determinados campos (FIREBIRD)
Muitos iniciantes não sabem mas o comando SELECT simples muitas vezes não traz como resultado registros que possuem valor nullo num determinado campo indicado na pesquisa.
para obrigar a seleção resultar campos com valores nulos :
select * from CLIENTES
where coalesce (codigo,'') like :0 and
coalesce (nomerazao,'') like :1 and
coalesce (apelfant,'') like :2 and
coalesce (cpfcnpj,'') like :3 and
coalesce (tipopessoa,'') like :4 and
coalesce (cidade,'') like :5
order by codigo
Esse exemplo foi inserido num componente do tipo Query .
O argumento coalesce seguido da sintaxe (CAMPO,'') , onde campo é o campo sugerido na pesquisa e o espaco me branco marcado com '' substitui os valores nulos por valor em branco (somente durante a pesquisa) e retorna os resultados.
para obrigar a seleção resultar campos com valores nulos :
select * from CLIENTES
where coalesce (codigo,'') like :0 and
coalesce (nomerazao,'') like :1 and
coalesce (apelfant,'') like :2 and
coalesce (cpfcnpj,'') like :3 and
coalesce (tipopessoa,'') like :4 and
coalesce (cidade,'') like :5
order by codigo
Esse exemplo foi inserido num componente do tipo Query .
O argumento coalesce seguido da sintaxe (CAMPO,'') , onde campo é o campo sugerido na pesquisa e o espaco me branco marcado com '' substitui os valores nulos por valor em branco (somente durante a pesquisa) e retorna os resultados.
obrigar uma string receber caracter maiúsculo
objeto que vai receber o valor maiúsculo := AnsiUpperCase(elemento que vai ser transformado em maiúsculo);
sábado, 1 de dezembro de 2012
erro : O programa de instalação do SQL Server não pode instalar arquivos na pasta compactada ou criptografada
Hoje fui tentar instalar o sql server numa máquira rodando windows XP e me deparei com o seguinte erro durante a instalação :
O programa de instalação do SQL Server não pode instalar arquivos na pasta compactada ou criptografada: c:\Arquivos de programas\Microsoft SQL Server\. Para continuar, certifique-se de que os diretórios de instalação não estão compactados ou criptografados ou especifique um diretório diferente e execute o programa de instalação do SQL Server novamente
Para resolver o problema fui até a pasta de instalação do sql server : c:\Arquivos de programas\Microsoft SQL Server , clique com o botão direito do mouse nela, em seguida selecione Propriedades , em seguida clique no botão avançado. Depois é só desmarcar a opção "Compactar o conteúdo para economizar espaço em disco" e dar OK.
Pronto , resolvido o problema.
Assinar:
Postagens (Atom)