[delphi-br] :: Base de dados CEP em FireBird ::
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/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] :: Como usar um webservices ::
Pessoal, estou tenato usar o webservice apontado pelo link: http://www.byjg.com.br/xmlnuke/xmlnuke.aspx?xml=onlinecepsite=byjgxsl=pagelang=pt-br#H3 Consegue a unit abaixo gerada pelo Delphi7: Código: // // // The types declared in this file were generated from data read from the // WSDL File described below: // WSDL : http://www.byjg.com.br/xmlnuke/webservice/cepservice.asmx?WSDL // Encoding : utf-8 // Version : 1.0 // (17/5/2005 10:16:01 - 1.33.2.5) // // unit cepservice; interface uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns; type // // // The following types, referred to in the WSDL document are not being represented // in this file. They are either [EMAIL PROTECTED] of other types represented or were referred // to but never[!] declared in the document. The types from the latter category // typically map to predefined/known XML or Borland types; however, they could also // indicate incorrect WSDL documents that failed to declare or import a schema type. // // // !:string - http://www.w3.org/2001/XMLSchema; // !:- http://www.byjg.com.br; ArrayOfAnyType = class; { http://www.byjg.com.br[A] } anyType= array of Variant;{ http://www.byjg.com.br; } // // // Namespace : http://www.byjg.com.br // Serializtn: [xoInlineArrays] // // ArrayOfAnyType = class(TRemotable) private FanyType: anyType; public constructor Create; override; function GetVariantArray(Index: Integer): Variant; function GetVariantArrayLength: Integer; property VariantArray[Index: Integer]: Variant read GetVariantArray; default; property Len: Integer read GetVariantArrayLength; published property anyType: anyType read FanyType write FanyType; end; // // // Namespace : http://www.byjg.com.br // soapAction: http://www.byjg.com.br/%operationName% // transport : http://schemas.xmlsoap.org/soap/http // style : document // binding : ConsultaCEPSoap // service : ConsultaCEP // port : ConsultaCEPSoap // URL : http://www.byjg.com.br/xmlnuke/webservice/cepservice.asmx // // ConsultaCEPSoap = interface(IInvokable) ['{27F8F6FA-71AC-B27A-F216-9F887FD4E868}'] function obterLogradouro(const Cep: WideString): WideString; stdcall; function obterCEP(const Logradouro: WideString; const Localidade: WideString; const UF: WideString): ArrayOfAnyType; stdcall; function obterVersao: WideString; stdcall; end; function GetConsultaCEPSoap(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): ConsultaCEPSoap; implementation function GetConsultaCEPSoap(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): ConsultaCEPSoap; const defWSDL = 'http://www.byjg.com.br/xmlnuke/webservice/cepservice.asmx?WSDL'; defURL = 'http://www.byjg.com.br/xmlnuke/webservice/cepservice.asmx'; defSvc = 'ConsultaCEP'; defPrt = 'ConsultaCEPSoap'; var RIO: THTTPRIO; begin Result := nil; if (Addr = '') then begin if UseWSDL then Addr := defWSDL else Addr := defURL; end; if HTTPRIO = nil then RIO := THTTPRIO.Create(nil) else RIO := HTTPRIO; try Result := (RIO as ConsultaCEPSoap); if UseWSDL then begin RIO.WSDLLocation := Addr; RIO.Service := defSvc; RIO.Port := defPrt; end else RIO.URL := Addr; finally if (Result = nil) and (HTTPRIO = nil) then RIO.Free; end; end; constructor ArrayOfAnyType.Create; begin inherited Create; FSerializationOptions := [xoInlineArrays]; end; function ArrayOfAnyType.GetVariantArray(Index: Integer): Variant; begin Result
Re: [delphi-br] RE: Como usar um webservices
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').GetVariantArray(i)); end; - Original Message - From: Josir [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, May 17, 2005 4:26 PM Subject: [delphi-br] RE: Como usar um webservices Olá Carlos, O que está acontecendo ? está dando algum erro ? Não compila ? -- Pessoal, estou tenato usar o webservice apontado pelo link: http://www.byjg.com.br/xmlnuke/xmlnuke.aspx?xml=onlinecepsite=byjgxsl=pagelang=pt-br#H3 Consegue a unit abaixo gerada pelo Delphi7: -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Ajuda com SQL
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ísicas e jurídicas JUNTAS e organizadas pelo GRUPO. Como fazer? [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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Ajuda com SQL
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 FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO ORDER BY 1, 3; Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA ou da tabela PESSOA JURÍDICA. -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Ajuda com SQL
Resolvido, ficou assim: SELECT G.NOME_GRUPO, F.TRATAMENTO, F.NOME, F.FONE_RESIDENCIAL, F.FONE_COMERCIAL, F.FONE_CELULAR, F.EMAIL, F.BAIRRO, 1 AS TIPO_PESSOA 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 FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE BAIRRO, 2 AS TIPO_PESSOA FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO ORDER BY 1, 3; Obrigado a todos - Original Message - From: Eduardo [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: 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 - 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] Ajuda com SQL 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 FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO ORDER BY 1, 3; Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA ou da tabela PESSOA JURÍDICA. -- 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 PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Ajuda com SQL
Desculpe, mas não entendi a sua colocação. - Original Message - From: Eduardo [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: 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 - 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] Ajuda com SQL 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 FONE_COMERCIAL, J.FONE_CEL FONE_CELULAR, J.EMAIL, J.HOME_PAGE FROM PESSOAJURIDICA J, GRUPO G WHERE J.COD_GRUPO = G.COD_GRUPO ORDER BY 1, 3; Tem como eu saber o que vem de cada tabela. Tipo criar um CAMPO VIRTUAL que me ajudasse a definir se o registro exibido é da tabela PESSOA FÍSICA ou da tabela PESSOA JURÍDICA. -- 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 PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Off Topic: C#
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 mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Off Topic: C#
Amigos, fiz apenas umas perguntas: - alguém poderia me indicar um livro de C# em português para iniciante? - Lista de discussão, site, etc Preciso desenvolver algo e este algo tem que ser em C#. Não tenho escolha, tem que ser C#, logo preciso aprender C#. Entenderam? []'s Carlos - Original Message - From: Maurício Chiarato Vaglieri [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 13, 2005 12:18 PM Subject: Re: [delphi-br] Off Topic: C# Clayton, Se você não quer usar cópias não deve usar JAVA, pois até onde eu sei, JAVA foi baseada em C/C++, que se basearam em JAVA para criar o C#. Portanto, fica complicado dizer o que é ou não pirata. Abraços, Mauricio - Original Message - From: Clayton Bonelli To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 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 delphi-br@yahoogrupos.com.br; Delphi Lista MPS [EMAIL PROTECTED] Sent: Wednesday, April 13, 2005 11:57 AM Subject: [delphi-br] Off Topic: C# 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 mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.9.7 - Release Date: 12/4/05 -- 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 PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.9.6 - Release Date: 11/04/2005 -- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.308 / Virus Database: 266.9.6 - Release Date: 11/04/2005 [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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] :: Fazer FTP de Arquivos com validação ::
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áquinas poderão pegar esse arquivo e ele(o arquivo) no servidor poderá ser atualizado a qquer momento. Na minha aplicação, por exemplo, a cada 30 minutos eu deverei verificar se o arquivo que esta no servidor é diferente do que tenho em minha máquina, se for, baixo, do contrário o FTP não será realizado. Alguém pode me dar uma luz de como fazer isso. Obs.: não posso ao pegar o arquivo deletá-lo do servidor pois outras máquinas deverão pegá-lo também. [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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Message do windos para informar a atualização do relógio?
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 intervalo de tempo verificar se já é o novo dia...mas isso não é legal Alguém pode me ajudar? []'s 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Enviar email via BRTrubo
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.Add(FormatDateTime('Data de envio: dd/mm/ -- hh:nn:ss', now)); Body.Add(FormatDateTime('Início: dd/mm/', U.DataIn)+FormatDateTime(' Término: dd/mm/', U.DataOut)); Body.Add('---'); From.Name := 'Mensahem'; From.Address := '[EMAIL PROTECTED]'; ReplyTo.EMailAddresses:= U.Destino; Recipients.EMailAddresses := U,Destino; { To: header } Subject := 'Titulo'; Priority := mpHigh; //Prioridade end; SMTP.Username := 'meu_Login'; SMTP.Password := 'minha_senha'; {General setup} SMTP.Host := 'smtp.brturbo.com.br'; try try SMTP.Connect; SMTP.Send(IdMsgSend); except showMessage('Erro'); exit; end; finally SMTP.Disconnect; end; e não obtive sucesso O que estou fazendo de errado? [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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Status da Impressora.
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: delphi-br@yahoogrupos.com.br Sent: Thursday, February 24, 2005 11:37 AM Subject: RES: [delphi-br] Status da Impressora. Sim, não funciona mesmo! Não funciona pq os sistemas Windows baseados na plataforma NT (NT/2000 e XP) possui rígidas restrições para acessar recursos de baixo nível do computador, como portas de I/O (como no código Assembly exposto) e endereçamentos de memória. Pra verificar uma porta de I/O de impressora, teria que ser escrito um driver VxD (ou baseado no WDM - Windows Driver Model em plataformas NT) pra acessar a porta e a aplicação Delphi se comunicar com esse driver pra saber o status da impressora. E o Delphi não gera drivers, como o Visual C++ junto com o Drivers Development Kit faz! Isso tudo pra checar o status da impressora local! Boa sorte! -Mensagem original- De: japoneyz [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 24 de fevereiro de 2005 10:32 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Status da Impressora. Bom dia a todos. Gostaria de saber se alguem conhece alguma rotina que pegue o Status da Impressora na porta paralela, mas que funcione no Windows NT/2K/XP. Esse codigo //** Asm mov ah,Portas; {Requisita o acesso as portas} mov dx,Porta; {Define a porta de teste} Int $17; {Chama a interrupção de Impressora} mov nRes,ah; {Guarda em Res o resultado da operação } end; //** não funciona no Windows NT/2K/XP. Agradeço pela ajuda, []s Japoneyz -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.856 / Virus Database: 583 - Release Date: 07/02/2005 -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.4.0 - Release Date: 22/2/2005 -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Erro EOSError 127
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 could not be found. Alguém já passou por este erro...como resolver? Esse erro acontece em algumas máquinas...e em outras não. O que pode ser? Obrigado. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.3.0 - Release Date: 21/2/2005 [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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo
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: delphi-br@yahoogrupos.com.br Sent: Friday, February 18, 2005 12:03 PM Subject: Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo Realmente o pessoal distorceu tudo com esta noticia. Em primeiro lugar, kylix não é delphi. Kylix é um projeto, a ferramenta se chama Delphi for linux e C++Builder for linux. O C++Builder X realmente vai substituir o kylix, mas vai substituir a parte C++ do kylix, a parte delphi continua (parada, mas continua) A principal vantagem do C++Builder X é que com ele vc não perde o que já foi desenvolvido em outras ferramentas. O compilador mais usado em linux atualmente é o GCC. o C++ do kylix não era compativel com o GCC. O C++Builder X consegue trabalhar com o GCC, basta vc configurar o compilador a ser utilizado. Resumindo, com o C++Builder X vc consegue até mexer no kernel do linux. Não sei como está agora, mas quando eu ví o C++BuilderX estavam prometendo integração com o MXWindows. Se ficar simples de trabalhar com MXWindows de dentro do C++BuilderX, esta ferramenta vai ser um sucesso. Marcelo Almeida Walter Alves Chagas Junior wrote: Olha, este tipo de reportagem postada pela mídia, eu não confio muito não. Muitas vezes a Borland disse uma coisa e esses caras distorcem. Nem todos os jornalistas de revistas de informática, costumam entender do assunto e saem publicando anseiras a tordo e adoidado. Sugiro a você que vá no site a borland ou no Borland Community e procure informações LÁ a respeito disto. http://community.borland.com []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Karkaju [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 17 de fevereiro de 2005 19:42 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] [OffTopic] Borland's Kylix in limbo Pessoal, Li no link ( http://www.infoworld.com/article/03/11/04/HNkylix_1.html ) uma materia entitulada Borland's Kylix in limbo . Nela, diz que o Borland C++ BuilderX seria a ferramenta q substituiria o Kylix. ALguem tem alguma informação sobre isto ? O C++ Builder X realmente é multiplataforma e pode substutir o Delphi para Linux (Kylix) ? A questão é que estou desenvolvendo uma aplicacao que deve rodar em Linux ou Windows e , pra rodar em Linux eu pensava em fazer a aplicacao em Kylix. Caso seja isso verdade (Kylix substituido pelo C++B) , terei de fazer a aplicacao em Java. Obrigado. -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo
Marcelo, então qual a alternativa Borland para C++? Por exemplo, uso o Visual C++ e acho MFC uma porcaria, nada produtivo. Acho a VCL muito mais produtiva. O que a Borland me oferece de C++? []'s Carlos - Original Message - From: Marcelo Almeida [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br 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? E de quanto em quanto tempo, em média, sai uma nova versão? Depois do C++Builder 6, passou para o C++Builder X. Mas o X é outro produto, não tem nada a ver com o 6, inclusive não são compativeis. O C++BuilderX é praticamente só uma IDE em java. -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo
concordo com vc! Mas como migrar se a ferramenta esta descontinuada!(Pelo menos foi o que entendi.). - Original Message - From: Rodrigo Othavio Farias [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, February 18, 2005 2:51 PM Subject: Re: RES: [delphi-br] [OffTopic] Borland'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 - From: Carlos Alberto Phelippe To: delphi-br@yahoogrupos.com.br Sent: Friday, February 18, 2005 2:49 PM Subject: Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo Marcelo, então qual a alternativa Borland para C++? Por exemplo, uso o Visual C++ e acho MFC uma porcaria, nada produtivo. Acho a VCL muito mais produtiva. O que a Borland me oferece de C++? []'s Carlos - Original Message - From: Marcelo Almeida [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br 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? E de quanto em quanto tempo, em média, sai uma nova versão? Depois do C++Builder 6, passou para o C++Builder X. Mas o X é outro produto, não tem nada a ver com o 6, inclusive não são compativeis. O C++BuilderX é praticamente só uma IDE em java. -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo
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: delphi-br@yahoogrupos.com.br Sent: Friday, February 18, 2005 3:30 PM Subject: Re: RES: [delphi-br] [OffTopic] Borland's Kylix in limbo Renato Arcon Gaio wrote: o executável que o c++ builder gera é menor que o do delphi, por questão de ao invés da própria linguagem inserir bibliotecas sem utilidades, você mesmo que faz isso, e ele demora na compilação pois a codificação c++ é mais complexa. Errado. O compilador é lento porque é lento. Compare ele com outros compiladores C++. quanto ao programa ser menor, a VCL é em delphi, tem os mesmos problemas do delphi e mais alguns de integração das 2 linguagens. -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.0.0 - Release Date: 18/2/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.0.0 - Release Date: 18/2/2005 -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Componente tipo calendário outLook
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 sempre fica a desejar 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/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Salto de página com o TRichEdit
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 arquivo gerado por mim terá em cada página as informações referentes a um registro na tabela. Como fazer? []'s 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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Criar RichEdit em tempo de execução. Como Proceder?
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 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] :: Importardados dos Arquivos WAB(OutLook Express) ::
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 um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] DataSet Open
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: luciano [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 02, 2005 12:07 PM Subject: Re: [delphi-br] DataSet Open Já tentei isso, continua com a mesma msg. - Original Message - From: Emilio Córdova (pop) [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 02, 2005 9:10 AM Subject: Re: [delphi-br] DataSet Open Bom dia, tenta assim qryProdutos.Close; -- inclua isto antes de limpar a query qryProdutos.Sql.Clear; qryProdutos.SQL.Add ('select * from Produtos'); qryProdutos.SQL.Add ('where TIPCAP = :TIPOP'); qryProdutos.Params [ 0 ].DataType := ftstring; qryProdutos.Params [ 0 ].Value:= dbrSelTipProd.ItemIndex === Emilio Córdova Silva [EMAIL PROTECTED] [EMAIL PROTECTED] (41) 9228-7414 - Original Message - From: lucaoliveira7 [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, February 01, 2005 8:43 PM Subject: [delphi-br] DataSet Open Pessoal é o seguinte, estou montando esse SQL dinâmicamente o problema é que todas as vezes que chega na primeira linha Add aparece msg de erro DataSet Open qryProdutos.Sql.Clear; qryProdutos.SQL.Add ('select * from Produtos'); qryProdutos.SQL.Add ('where TIPCAP = :TIPOP'); qryProdutos.Params [ 0 ].DataType := ftstring; qryProdutos.Params [ 0 ].Value:= dbrSelTipProd.ItemIndex; Grato -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.4 - Release Date: 01/02/2005 -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.8.4 - Release Date: 01/02/2005 -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- 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 PROTECTED] ou [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html