Resolvi desta forma:
edtEnde.Text := ( (HR1 as ConsultaCEPSoap).obterLogradouro('04552000') );
for i:=0 to (HR1 as ConsultaCEPSoap).obterCEP('Rua ', 'Cidade',
'UF').GetVariantArrayLength -1 do
begin
showMessage((HR1 as ConsultaCEPSoap).obterCEP('Rua ', 'Cidade',
'UF').GetVa
Pessoal,
estou tenato usar o webservice apontado pelo link:
http://www.byjg.com.br/xmlnuke/xmlnuke.aspx?xml=onlinecep&site=byjg&xsl=page&lang=pt-br#H3
Consegue a unit abaixo gerada pelo Delphi7:
Código:
//
//
Olá Pessoal,
onde posso encontrar a base de dados dos correios em FireBird?
Obrigado.
[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
gt; select 2 AS TIPO BLAH, BLAH ...
>
> Acho q isso deve t ajudar.
>
> Eduardo
>
> - Original Message -
> From: Carlos Alberto Phelippe
> To: delphi-br@yahoogrupos.com.br ; Delphi Lista MPS
> Sent: Monday, May 02, 2005 2:40 PM
> Subject: Re: [delphi-br] A
ent: Monday, May 02, 2005 2:57 PM
Subject: Re: [delphi-br] Ajuda com SQL
> crie um campo fixo.
>
> select 1 AS TIPO BLAH, BLAH ...
> UNION ALL
> select 2 AS TIPO BLAH, BLAH ...
>
> Acho q isso deve t ajudar.
>
> Eduardo
>
> - Original Message -
Pessoal,
com o SQL abaixo:
SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL,
F.FONE_COMERCIAL,
F.FONE_CELULAR, F.EMAIL, F.
FROM PESSOAFISICA F, GRUPO G WHERE F.COD_GRUPO = G.COD_GRUPO
UNION ALL
SELECT G.NOME_GRUPO, J.CNPJ TRATAMENTO, J.NOME, J.FONE FONE_RESIDENCIAL,
J.FONE_FAX
FO
PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO
ORDER BY 1;
Mas, as tabelas não são extamente iguais tem alguns campos que tem numa
e na outra não tem... como posso contornar isso?
[]'s
Carlos
- Original Message -
From: "Carlos Alberto Phelippe" <[EM
Olá pessoal,
estou tentando, ainda sem sucesso, criar uma consulta SQL. Tenhos três tabelas:
GRUPO(COD_GRUPO, NOME_GRUPO)
PESSOAFISICA(COD_PESSOA, COD_GRUPO, NOME, FONE, ...)
PESSOAJURIDICA(COD_PESSOA, COD_GRUPO, NOME, FONE, ...)
Tenho que fazer uma consulta SQL que me retorne as pessoas física
pril 13, 2005 12:02 PM
> Subject: Re: [delphi-br] Off Topic: C#
>
>
> Sugestao: Nao use copias piratas, use sempre o original, Use JAVA
>
>
>
> - Original Message -
> From: "Carlos Alberto Phelippe" <[EMAIL PROTECTED]>
> To: "Delphi-BR" ; &qu
Pessoal,
alguém poderia me indicar um livro de C# em português para iniciante?
Lista de discussão, site, etc
Muito obrigado,
Carlos
[As partes desta mensagem que não continham texto foram removidas]
--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
Para ver as mensagen
Olá Pessoal,
preciso pegar um arquivo via FTP. Até ai tudo bemo meu problema consiste em
verificar se o arquivo que estou baixando é igual ao que já tenho, se for, não
devo fazer o FTP caso seja diferente o FTP deverá ser realizado.
Por exemplo, terei um arquivo no servidor e várias máquina
Olá pessoal,
como fazer para enviar email via o smtp do provedor BRTurbo.
Sou usuário do BRTurbo e não estou conseguindo usar o serviços SMTP.
Já tentei:
with IdMsgSend do
begin
Body.Clear;
Body.Add('---');
Body.Add(U.login+' -- '+U.emai);
Body
Olá pessoa,
existe alguma mensagem do windows que nos informe que o relágio foi atualizado?
É que preciso que minha aplicação, entre outras coisas, no início de cada dia,
mas precisamente no primerio segundo...atualize algumas informação num banco de
dados.
Poderia colocar um time e a cada int
vc pode fazer via API do windows...usando CreateFile e direcionando-o para
LPTI, LPT2, COM1..e assim por diante.
Dá uma pesquisada nisso...é trabalhosomas funciona.
[]'s
Carlos
- Original Message -
From: "Rubem Rocha" <[EMAIL PROTECTED]>
To:
Sent: Thursday, February 24, 2005 11
Olá pessoal,
primeiro deixo o meu ambiente de desenvolvimento:
Delphi 7 -- IBX 7.07 -- Firebird 1.5.
Em algumas máquinas ao iniciar a minha aplicação estou recebendo a mensagem de
erro:
"Excpetion EOSError in Module MeuPalicativo.Exe at EFBA.
System Error. Code 127.
The especifeid procedure
Resumindo:
se quero programar em C++ com uma "boa" IDE devo usar o Visual C++. É isso?
Usando MFCnhecapara ter mais produtividadeé isso?
- Original Message -
From: "Marcelo Almeida" <[EMAIL PROTECTED]>
To:
Sent: Friday, February 18, 2005 3:30 PM
Subject: Re: RES: [delphi-
#x27;s Kylix in limbo
>
> O C++ Builder tem toda a VCL, eu acho ele uma tremenda ferramenta, vc tem
> o
> RAD do Delphi com o poder do C++ nas maos, é uma ferramenta fantastica na
> minha opiniao.
>
>
> []´s
> Rodrigo O. Farias
>
> - Original Message
TECTED]>
To:
Sent: Friday, February 18, 2005 12:57 PM
Subject: Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo
>
> Carlos Alberto Phelippe wrote:
>
>>Uma pergunta que não deveria ser feita aqui...mas:
>>
>>O C++ Builder a Borland continua? Esta em que versão
Uma pergunta que não deveria ser feita aqui...mas:
O C++ Builder a Borland continua? Esta em que versão? E de quanto em quanto
tempo, em média, sai uma nova versão?
[]'s
Carlos
- Original Message -
From: "Marcelo Almeida" <[EMAIL PROTECTED]>
To:
Sent: Friday, February 18, 2005 12:03
Olá pessoal,
no meu aplicativo tenho um cadastro de compromissos e pretendo exibilos como no
outlook. Por semana, mês, etc.
Alguém conhece algum componente que pode me ajudar nesta tarefa?
Estou falando em interface gráfica...os SQL's...e tudo o mais eu consigo
fazer...mas a interface gráfica
Olá pessoal,
como fazer para criar um RichEdit em tempo de execução?
var
RE : TRichEdit;
begin
RE := TRichEdit.Create(nil);
o que mais
try
finally
RE.Free;
end;
end;
[As partes desta mensagem que não continham texto foram removidas]
--
< FAVOR REMOVER ESTA PARTE A
Olá pessoal,
estou colocando dados num componente RichEdit e gostaria de dar um salto de
página. Como fazer isso?
Gostaria de fazer o seguinte:
Pegar os dados de uma tabela e colocar num arquivo RTF e antes de ir para o
próximo registro pular para uma nova página. Quando a pessoa for abrir este
Walter, vc achou o componente que le arquivos WAB(outlook express)?
Alguém sabe como fazer isso?
--
< 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
Tente assim:
with qryProdutos do
begin
Close;
Clear;
SQL.ADD('select * from Produtos where TIPCAP = :TIPOP');
ParamByName('TIPCAP').AsString := recebe um string...
//ou
ParamByName('TIPCAP').AsInteger := dbrSelTipProd.ItemIndex;
Open;
end;
- Original Message -
From: "luc
24 matches
Mail list logo
