Re: [delphi-br] Passar parâmetros para a query!
Higor, Tente assim: With query1 do begin Close; SQL.text:='select c.curso_tx_nome from curso c, turma t where c.curso_cd_codigo = t.curso_cd_codigo and c.curso_cd_codigo=:parametro'; ParamByName('parametro').AsString := Edit1.Text; Open; //--- Aqui manipula os dados retornados... end; [ ]´s Moacir tarcan_se escreveu: Boa noite pessoa, gostaria da ajuda de vocês com uma dúvida Estou fazendo um Sistema e estou querendo buscar o nome de alguns campos de umas tabelas partindo da informação vinda de outra, da seguinte forma. Tenha as tabelas Turma, Curso. Quero pegar o nome do Curso que vou comparar com o código que tenha na tabela de Turma e colocar em outra tela. Direto no banco fiz os seguintes testes e funcionaram sem problema: select c.curso_tx_nome from curso c, turma t where c.curso_cd_codigo = t.curso_cd_codigo Mas para funcionar no sistema preciso passar como referência o código do curso que está no form de turma em um edit para uma query que vai retornar o valor para um edit em outra tela. Estou querendo saber como faço para passar um Componente como Parâmetro em uma sequência de comandos SQL para um Query?? Desde já muito obrigado pela ajuda. []'s Higor
[delphi-br] Thread
Pessoal boa noite. Estou gatinhando no Delphi ainda e gostaria de saber dos senhores se existe algum exemplo de utilização de threads para exeção de Querys. Qualquer ajuda será bem vinda. Valeu []Os Joel [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] DBexpress para Delphi 7 Profissional e MSSQLServer
No source forge tem a suite DBExpress Plus que tem mais recursos que o DBX padrão que vem no Delphi. É gratúito e funciona desde que você tire o DBX que vem no Delphi primeiro. Outra saida é você conseguir aí na WEB um driver proprio pra SQL Server. Agora, se queres uma sugestão, tenta usar o ADO. Ele com SQL Server é compatibilidade 101% garantida já que ambos são farinha do mesmo saco. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphiatcorporerm.blogspot.com MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Wandarlei Michelon [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, March 31, 2008 4:15 PM Subject: [delphi-br] DBexpress para Delphi 7 Profissional e MSSQLServer Boa tarde pessoal da lista. Trabalhei com Delphi DbExpress + Interbase, contudo agora entrei em um novo projeto e que será em DbExpress + MSSQLServer 2000 e MSSQLServer 2005, Até onde eu pude ver nas listas da web, o Delphi 7 profissional não tem a conexão para o DbExpress + MSSQLServer nativa, somente nas versões profissionais. Minha pergunta é a seguinte: como eu faço para poder usar DbExpress + MSSQLServer, sem ter que trocar a licença do Delphi, existe alguma atualização do DbExpress ou alguma biblioteca free para esta conexão? Desde já agradeço a todos. Wandarlei Michelon Programador Delphi Fone: 55 041 3279-2323 Tree Tools Informática Ltda. - Qualidade e Competência a Seu Alcance http://www.treetools.com.br/ http://www.treetools.com.br mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET NOD32 Antivirus, versão da vacina 2988 (20080331) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com
Re: [delphi-br] Thread
Imaginando que vc quer executar uma query de tempos em tempos dentro da Thread, vc pode fazer o seguinte : 1. No seu projeto no delphi, crie uma nova classe : File -New - Other - New - Thread Object Você terá um esqueleto de uma classe que herda de TThread, e será portanto, a sua Thread. 2. No método Execute , implemente algo assim : while not Terminated do begin // Escreva aqui o código p/ executar a sua query Sleep(tempo_mili_segundos); // espera um tempo até a próxima execução end; Ao usar a classe no projeto, vc pode ter o controle da execução através dos métodos Resume, Suspend e Terminate. Em 01/04/08, Joel Alexandre [EMAIL PROTECTED] escreveu: Pessoal boa noite. Estou gatinhando no Delphi ainda e gostaria de saber dos senhores se existe algum exemplo de utilização de threads para exeção de Querys. Qualquer ajuda será bem vinda. Valeu []Os Joel [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] Thread
Recentemente (creio que há no máximo umas 3 edições atrás) saíram 2 artigos tratando exatamente sobre isso na revista ActiveDelphi. Dá uma olhada no site deles que vc pode até achar o link para os arquivos de exemplo das matérias. Atte, Ricardo. Joel Alexandre [EMAIL PROTECTED] escreveu: Pessoal boa noite. Estou gatinhando no Delphi ainda e gostaria de saber dos senhores se existe algum exemplo de utilização de threads para exeção de Querys. Qualquer ajuda será bem vinda. Valeu []Os Joel [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Capturar comandos do Dos
CARACA!!! Já faz um bom tempo que tava procurando por isso ... é bem possível que não estava sabendo procurar (hahahahaha). Vou testar ... muito bom mesmo, valeu Walter! Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacasarg.com.br - Original Message - From: Walter Chagas (Yahoo) To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 01, 2008 3:55 PM Subject: [delphi-br] Re: Capturar comandos do Dos Minha gente, Pesquisando na seção de arquivos da lista sobre como capturar a saída do console e jogá-lo em um Memo, me deparei com esta thread já antiga sobre o assunto. E, pesquisando por aí encontrei estas três perolas DA HORA pra ninguem colocar defeito: http://www.delphi3000.com/articles/article_2112.asp http://www.delphi3000.com/articles/article_2298.asp http://www.delphi3000.com/articles/article_3361.asp E antes que alguém fale, FUNCIONAM! []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphiatcorporerm.blogspot.com MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr --- Em delphi-br@yahoogrupos.com.br, Leandro Carbonera [EMAIL PROTECTED] escreveu E ai galera Alguem sabe se é possivel capturar o resultado de um comando de DOS e joga-lo num memo como por exemplo você executar via delphi um comando do tipo Winexec('dir',sh_Shownormal) e jogar o resultado num memo [As partes desta mensagem que não continham texto foram removidas] -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] Chave de Identificação: 54568,47f28542605551696283040 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Passar parâmetros para a que ry!
Bom dia Seguindo a lógica do amigo Moacir poderia ser feito assim. Você tem um cadastro de Turma e precisa preencher o campo curso, o curso deve ter uma consulta para que possa pesquisar o mesmo. Sendo assim, você pode colocar no events OnDblClick do grid o seguinte código. procedure TfrmConsultaCurso.DBGrid1DblClick(Sender: TObject); begin // DM.CdsCadTurma.Close; DM.CdsCadTurma.Params[0].Value := DM.CdsConsCursoIDCURSO.Value; DM.CdsCadTurma.Open; close; end; Agora você manipula os dados que vão ser retornados infomando que um determinado campo do cadastro turma terá o seu valor (.text) igual a: DM.CdsConsCursoNOMECURSO E demais campos que achar necessário. Espero ter ajudado. Caso alquém tenha uma outra solução, e só posta. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Dengue
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Implementar MVCp
Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED] escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] IBSQL
Pessoal to tentando efetuar uma query através do IBSQL mas não estou conseguindo. Alguém poderia me dar uma força.. Coloquei a query no SQL mas e agora.. como faço pra executa-la e jogar o resultado em um combo?? Valeu. -- Att. Maycon Sanches Amaro
[delphi-br] Som
Lista Me desculpe mas ja procurei no google mas não achei nada, alguem sabe como manipular arquivo wav .. por exemplo pegar a quantidade de bits de som etc... ??? e como faço para saber se a pessoa esta falando no microfone do PCé possível saber isso ??? qualquer ajuda é bem vinda vlw Wesley [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Entendi a sua sugestão e até pensei nisso também. Mas o que eu não sei e como tratar o DataModule. Como faço? Matenho? Como? Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED] escreveu: Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Você poderia, por exemplo, manter o DataModule com o componente de conexão e dentro dele, instanciar os DAOs, já apontando para essa conexão. O DataModule seria o Model, que iria encapsular o acesso aos dados. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED] escreveu: Entendi a sua sugestão e até pensei nisso também. Mas o que eu não sei e como tratar o DataModule. Como faço? Matenho? Como? Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED]consultoressoftware%40gmail.com escreveu: Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com espdeveloper%40gmail.com escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [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] Som
Nunca usei, mas já ouvi falar bem do Audio Component Suite. Dá uma vasculhada no torry.net que vc acha ele facim, facim. O melhor é que é free e vem com os fontes. Atte, Ricardo. BandaLemuel [EMAIL PROTECTED] escreveu: Lista Me desculpe mas ja procurei no google mas não achei nada, alguem sabe como manipular arquivo wav .. por exemplo pegar a quantidade de bits de som etc... ??? e como faço para saber se a pessoa esta falando no microfone do PCé possível saber isso ??? qualquer ajuda é bem vinda vlw Wesley [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] DataModule customizado não herda componentes
Estou criando dois data modules no Delphi 2007: TDMConexao e TDMBasico. O TDMConexao possui somente um componente TSQLConnection, com código no evento OnCreate pra conectar com a base de dados usando o nome de um arquivo que será informado numa propriedade Published do mesmo (TDMConexao). O TDMBasico contém somente um TClientDataSet. Este data module não tem propriedades Published. Pesquisando na web, encontrei códigos de como registrar as classes para que os data modules derivados exibissem as propriedades Published no Objetc Inspector. Sendo assim, criei um pacote e adicionei as units dos dois data modules (TDMConexao e TDMBasico), além de criar uma nova unit responsável por registrar as classes. Esta unit ficou assim: unit FormPropReg; interface procedure Register; implementation uses DesignIntf, DMForm, DMConexao, DMBasico; procedure Register; begin // DataModules RegisterCustomModule(TDMConexao, TDataModuleCustomModule); RegisterCustomModule(TDMBasico, TDataModuleCustomModule); end; end. Após compilar e instalar o pacote, adicionei os dois data modules ao repositório de objetos, para poder usá-los em outros projetos, criando novos data modules (opção inherited). Mas (sempre tem um mas...), quando fui testar, pra minha surpresa, quando crio um data module em File-New-Other selecionando o TDMConexao ou o TDMBasico presentes no repositório, usando a opção inherited, os componentes presentes no data module ancestral não aparecem, ou seja, o novo data module fica vazio, sem componente algum. Entretanto, a propriedade Published do TDMConexao é exibida no Object Inspector. Caso eu use a opção copy ou use ao criar o data module, daí fica tudo normal, como deveria ser. Acredito que o procedimento que registra a classe dos data modules esteja incorreto, já estou há alguns dias pesquisando uma solução e não encontro. Agradeceria muitíssimo se alguém me desse uma dica de como resolver esse problema. Um grande abraço. Daniel Sonda
Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)
Olá. Verifique se vc não está usando a versão do crystal report para web. Caso esteja com a versão win32 então vc precisa importar um activex do crystal report para o seu Delphi. Em 01/04/08, Paulo Pontes [EMAIL PROTECTED] escreveu: fala galera, como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só é possível mesmo com WinForms... valeu! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Som
Procure por MMTools. Obs: Essa Suite de componentes é paga. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de BandaLemuel Enviada em: quarta-feira, 2 de abril de 2008 09:45 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Som Lista Me desculpe mas ja procurei no google mas não achei nada, alguem sabe como manipular arquivo wav .. por exemplo pegar a quantidade de bits de som etc... ??? e como faço para saber se a pessoa esta falando no microfone do PCé possível saber isso ??? qualquer ajuda é bem vinda vlw Wesley [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Vari�vel n�o � Zerada
Olhem a imagem no link: http://www.toolsandcomps.com/temp_louco.gif Temp é uma variável do tipo String e FilterHelper.GetInSentence é um método que retorna uma string. Observe na Watch list que Temp tem um valor antes da execução da linha do Quadro 1. Após a execução da mesma, Temp continua com o valor anterior, adicionando o valor de retorno de FilterHelper.GetInSentence, Ou seja, parece que o que está sendo executado é Temp := Temp + FilterHelper.GetInSentence, mas no código não tem nada disso. Apenas se eu descomento a linha Temp := '', o valor de Temp é 'Zerado' e funciona da forma esperada. Ainda não consegui entender o porquê? Até agora não vi nenhuma lógica, mas posso estar cego. Algum palpite? -- Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Borland http://www.devhost.com.br [EMAIL PROTECTED]
Re: [delphi-br] Som
O ACS eu testeiaki, mas não estou conseguindo fazer o que preciso tipo eu preciso pegar o que esta falando no microfone do PC e colocar em um gráfico , como se fosse um gauge, quanto mais auto a pessoa fala ele vai enchendo o gauge tipo aqueles programas que gravam sons mas mesmo vlw pela atenção Wesley From: Ricardo César Cardoso Sent: Wednesday, April 02, 2008 10:07 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Som Nunca usei, mas já ouvi falar bem do Audio Component Suite. Dá uma vasculhada no torry.net que vc acha ele facim, facim. O melhor é que é free e vem com os fontes. Atte, Ricardo. BandaLemuel [EMAIL PROTECTED] escreveu: Lista Me desculpe mas ja procurei no google mas não achei nada, alguem sabe como manipular arquivo wav .. por exemplo pegar a quantidade de bits de som etc... ??? e como faço para saber se a pessoa esta falando no microfone do PCé possível saber isso ??? qualquer ajuda é bem vinda vlw Wesley [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 2995 (20080402) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [OFF-TOPIC] Navegador padrão no Regedit
Alguém sabe quais as chaves no REGEDIT do Windows determinam o navegador de internet padrão ? Quero que meu aplicativo chame o Microsoft Outlook e este, por sua vez, ao acessar um link o faça SEMPRE usando o Firefox, e não o que estiver no Regedit. Grato Junior [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Acho que seria interessante algo alternativo ao DataModule. Mas não sei. Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED] escreveu: Você poderia, por exemplo, manter o DataModule com o componente de conexão e dentro dele, instanciar os DAOs, já apontando para essa conexão. O DataModule seria o Model, que iria encapsular o acesso aos dados. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com escreveu: Entendi a sua sugestão e até pensei nisso também. Mas o que eu não sei e como tratar o DataModule. Como faço? Matenho? Como? Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED]consultoressoftware%40gmail.com consultoressoftware%40gmail.com escreveu: Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED]espdeveloper%40gmail.com espdeveloper%40gmail.com espdeveloper%40gmail.com escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Implementar MVCp
Saiu um artigo excelente na edição 90 da (perseguida e injustiçada) revista ClubeDelphi falando justamente sobre isso, implementação do modelo MVC em Delphi, sem inclusive perder a facilidade do uso de RAD. O que está ilustrado no artigo foi direcionado para aplicações desktop Windows, mas acredito piamente que o mesmo conteúdo possa ser adaptado para desenvolvimento Web com Delphi, seja em ASP.NET ou mesmo em VCL For The Web (a.k.a. IntraWeb). Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Wed, 2 Apr 2008 11:24:17 -0300 Subject: Re: [delphi-br] Implementar MVCp Acho que seria interessante algo alternativo ao DataModule. Mas não sei. Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED] escreveu: Você poderia, por exemplo, manter o DataModule com o componente de conexão e dentro dele, instanciar os DAOs, já apontando para essa conexão. O DataModule seria o Model, que iria encapsular o acesso aos dados. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED] escreveu: Entendi a sua sugestão e até pensei nisso também. Mas o que eu não sei e como tratar o DataModule. Como faço? Matenho? Como? Edmilson Pontes Em 02/04/08, Consultores Software [EMAIL PROTECTED] escreveu: Sugiro que você crie mecanismos para registrar os controles do form dentro da classe que será a controladora ( armazenando num array de TWincontrol, por exemplo) e assim usar os métodos dessa controladora, para ler e escrever nos controles. Da mesma forma, a controladora terá que passar os valores para a classe Model (pode ser os DAOs) que deverá ter métodos para gravá-los no BD. Além disso,a controladora deverá também, saber obter os valores dos DAOs. Sei que está genérico, mas essa dica de registrar os controles eu vi uma vez num exemplo. Em 02/04/08, Edmilson Pontes [EMAIL PROTECTED] escreveu: Colegas, Estou tentando colocar em prática o modelo mvc usando o Delphi, mas tenho algumas dúvidas. O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Como faço para melhorar isso? Desde já agradeço qualquer pronunciamento. Edmilson Pontes [As partes desta mensagem que não continham texto foram removidas] _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
[delphi-br] Re: DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)
Como utilizo o componente 'CrystalActiveXReportViewer' para visualizar um arquivo '.rpt'? On Tue, Apr 1, 2008 at 6:50 PM, Paulo Pontes [EMAIL PROTECTED] wrote: fala galera, como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só é possível mesmo com WinForms... valeu! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Implementar MVCp
Edmilson Pontes wrote: O que estou fazendo: Interface DAO; Interface BO; Interface VO; Interface View; Onde cada um tem a função, respectivante, de manter um padrão para persistencia, regras de negócio, dados da entidade e ligação com os forms. A dificuldade de estou tendo é em relação aos componentes do Form e sua ligação com a view. Como faço para mater as camadas desacopladas se no meu form tenho componentes ligados a um datamodule através de datasorce? Assim estou pulando as camadas. A intenção e deixar o form independente das outras camadas, e que a view faça o tratamento dos dados e faça a ligação com as outras camadas. Você não tem como usar mvc e dbware ao mesmo tempo, os dois são frameworks para apresentação de dados e são incompatíveis entre si. Enquanto o primeiro é orientado a objetos, o segundo é orientado a tdataset. Minha sugestão é você utilizar controles simples, sem datasource. Na sequência você vai ver que não precisa de data module, mas apenas de um conector (um parente de tquery) na sua interface DAO para mandar as queries para o banco. Estes são os primeiros passos para separar seu sistema em camadas. -- Joao Morais
Re: [delphi-br] Implementar MVCp
Rubem Nascimento da Rocha wrote: Saiu um artigo excelente na edição 90 da (perseguida e injustiçada) revista ClubeDelphi falando justamente sobre isso, implementação do modelo MVC em Delphi, sem inclusive perder a facilidade do uso de RAD. O que está ilustrado no artigo foi direcionado para aplicações desktop Windows, mas acredito piamente que o mesmo conteúdo possa ser adaptado para desenvolvimento Web com Delphi, seja em ASP.NET ou mesmo em VCL For The Web (a.k.a. IntraWeb). Algum link para os mortais? -- Joao Morais
[delphi-br] Res: Re: Re: [Curso_Delphi_Iniciante] Filtro
Obrigado funcionou corretamente ---Mensagem original--- De: Albert Eije Data: 02/04/2008 08:49:42 Para: Sergioinfo SP Assunto: Re: Re: [Curso_Delphi_Iniciante] Filtro OK, Vamos a algumas considerações: - Evento OnChange A cada letra digitada pelo usuário uma consulta será realizada no banco. Se a tabela de produtos tiver muitos registros seu sistema ficará muito lento. - Locate - Não use. Use uma consulta SQL. Insira um botão ao lado do edit com o caption Procurar, algo assim. No código do botão insira o seguinte código: adoQuery.active := false; adoQuery.sql.clear; adoQuery.sql.add('select * from CProd where nome like ' + #39 + edtBusca.txt + '%' + #39); adoQuery.active := true; Veja o resultado e comente conosco. Abraços Albert Eije Em 02/04/08, Sergioinfo SP [EMAIL PROTECTED] escreveu: Eiu utilizava o evento on change de uma edit este codigo DataSourceCProd.DataSet.Locate(DBGridCProd.Columns.Items[1].FieldName EdtBusca.Text,[LoPartialKey, loCaseInsensitive]); para filtrar os produtos assim que fosse digitando... mas hoje estou usando o componente ADOQuery quando mandou este codigo apenas alterei o codigo adoQuery.sql.add('select * from CProd where nome like ' + #39 + edtBusca.txt + '%' + #39); - Mensagem original De: Albert Eije [EMAIL PROTECTED] Para: Sergio - Jundiai / SP [EMAIL PROTECTED] Enviadas: Terça-feira, 1 de Abril de 2008 23:48:40 Assunto: Re: Re: [Curso_Delphi_Iniciante] Filtro Posta o código completo da consulta aqui pra gente ver. Abraços Albert Eije Em 01/04/08, Sergio - Jundiai / SP [EMAIL PROTECTED] escreveu: Boa tarde coloquei uma adquery no formulário mesmo assim nao consegui... quando altero a edit some todos os registro do dbgrid adq2.sql.add('select * from Nome where nome like ' + #39 + edit1.text + '%' + #39); Sérgio - Jundiaí / SP Tel.(11) 3395-7023 [EMAIL PROTECTED] (11) 7698-9566 ---Mensagem original--- De: Albert Eije Data: 31/03/2008 09:09:52 Para: [EMAIL PROTECTED] Assunto: Re: [Curso_Delphi_Iniciante] Filtro Caro Sergio, Trabalhar com SQL é melhor: adoQuery.sql.add('select * from CProd where nome like ' + #39 + edtBusca.txt + '%' + #39); Abraços Albert Eije Em 30/03/08, Sergio - Jundiai / SP [EMAIL PROTECTED] escreveu: Pessoal Bom dia estou utilizando este filtro, para filtrar por nome. DataSourceCProd.DataSet.Locate(DBGridCProd.Columns.Items[1].FieldName EdtBusca.Text,[LoPartialKey, loCaseInsensitive]); O poblema e que usando uma ADO query ele nao esta funcinando alguem poderia me dar uma luz Sérgio - Jundiaí / SP Tel.(11) 3395-7023 [EMAIL PROTECTED] (11) 7698-9566 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] splash screen
bom dia a todos, estou criando uma splash screen, mas esta dando um erro: ela esta funcionando normal, mas a imagem q coloquei no form aparece 1 segundo antes de abrir o form principal (nao estou utilizando timer) o que pode ser? -- Felipe Govoni - Programador Fone 8472-8718 [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Implementar MVCp
A íntegra do artigo está na revista, não tem como lê-lo online. Só tem link pra baixar os exemplos do artigo publicado. Link dos códigos fonte dos artigos da edição 90: http://www.devmedia.com.br/clubedelphi/downloads/ed90/cd90-downloads.zip Nesse zip tem exemplos de outros artigos, além do artigo que eu citei! Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Wed, 2 Apr 2008 12:02:01 -0300 Subject: Re: [delphi-br] Implementar MVCp Rubem Nascimento da Rocha wrote: Saiu um artigo excelente na edição 90 da (perseguida e injustiçada) revista ClubeDelphi falando justamente sobre isso, implementação do modelo MVC em Delphi, sem inclusive perder a facilidade do uso de RAD. O que está ilustrado no artigo foi direcionado para aplicações desktop Windows, mas acredito piamente que o mesmo conteúdo possa ser adaptado para desenvolvimento Web com Delphi, seja em ASP.NET ou mesmo em VCL For The Web (a.k.a. IntraWeb). Algum link para os mortais? -- Joao Morais _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)
João Paulo, consegui instalar o componente 'CrystalActiveXReportViewer', não sei se estou no caminho certo... através dele consegui abrir um arquivo '.rpt' utilizando o seguinte código... var oApp, oRpt: Variant; begin oApp := CreateOleObject('CrystalRuntime.Application'); oRpt := oApp.OpenReport('C:\Report1.rpt', 1); CrystalActiveXReportViewer1.ReportSource := oRpt; CrystalActiveXReportViewer1.ViewReport; end; mas acho que assim eu obrigo o usuário a ter o Crystal Reports instalado na máquina, o que não posso fazer... sabe outro forma de utilizar esse componente, ou devo utilizar outro componente? valeu! 2008/4/2 Açaí [EMAIL PROTECTED]: Olá. Verifique se vc não está usando a versão do crystal report para web. Caso esteja com a versão win32 então vc precisa importar um activex do crystal report para o seu Delphi. Em 01/04/08, Paulo Pontes [EMAIL PROTECTED] pontespaulo%40gmail.com escreveu: fala galera, como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só é possível mesmo com WinForms... valeu! [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] Re: Capturar comandos do Dos
Olha, pra quem usa os componentes JEDI tem um exemplo que faz exatamente o que tu quer. É só ir em jvcl\examples\JvCreateProcess\CreateProcessExample.dpr Mais mastigado que isso, impossível. Ricardo César Cardoso escreveu: Acho que hoje pela manhã, antes de vir para o trabalho eu li um artigo na ActiveDelphi do mês de Fevereiro que falava sobre isso. Vou até dar uma nova olhada quando chegar em casa pra confirmar. Atte, Ricardo. Walter Chagas (Yahoo) [EMAIL PROTECTED] mailto:wchagasj%40bol.com.br escreveu: Minha gente, Pesquisando na seção de arquivos da lista sobre como capturar a saída do console e jogá-lo em um Memo, me deparei com esta thread já antiga sobre o assunto. E, pesquisando por aí encontrei estas três perolas DA HORA pra ninguem colocar defeito: http://www.delphi3000.com/articles/article_2112.asp http://www.delphi3000.com/articles/article_2112.asp http://www.delphi3000.com/articles/article_2298.asp http://www.delphi3000.com/articles/article_2298.asp http://www.delphi3000.com/articles/article_3361.asp http://www.delphi3000.com/articles/article_3361.asp E antes que alguém fale, FUNCIONAM! []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] mailto:wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://www.geocities.com/SiliconValley/Bay/1058 http://delphiatcorporerm.blogspot.com http://delphiatcorporerm.blogspot.com MSN: [EMAIL PROTECTED] mailto:whitesockets%40hotmail.com SKYPE: WalterChagasJr --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br, Leandro Carbonera [EMAIL PROTECTED] escreveu E ai galera Alguem sabe se é possivel capturar o resultado de um comando de DOS e joga-lo num memo como por exemplo você executar via delphi um comando do tipo Winexec('dir',sh_Shownormal) e jogar o resultado num memo [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
RES: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)
O Crystal possui uma vcl para acesso, procure por VCL Crystal Reports, para delphi 2005, veja no site da Business Objects que você vai achar, é bem mais fácil do que mexer com esse activeX. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Paulo Pontes Enviada em: quarta-feira, 2 de abril de 2008 13:20 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32) João Paulo, consegui instalar o componente 'CrystalActiveXRepo-rtViewer'-, não sei se estou no caminho certo... através dele consegui abrir um arquivo '.rpt' utilizando o seguinte código... var oApp, oRpt: Variant; begin oApp := CreateOleObject(-'CrystalRuntime.-Application'-); oRpt := oApp.OpenReport(-'C:\Report1.-rpt', 1); CrystalActiveXRepor-tViewer1.-ReportSource := oRpt; CrystalActiveXRepor-tViewer1.-ViewReport; end; mas acho que assim eu obrigo o usuário a ter o Crystal Reports instalado na máquina, o que não posso fazer... sabe outro forma de utilizar esse componente, ou devo utilizar outro componente? valeu! 2008/4/2 Açaí HYPERLINK mailto:joaopaulo.jpo%40gmail.com[EMAIL PROTECTED]: Olá. Verifique se vc não está usando a versão do crystal report para web. Caso esteja com a versão win32 então vc precisa importar um activex do crystal report para o seu Delphi. Em 01/04/08, Paulo Pontes HYPERLINK mailto:pontespaulo%40gmail.com[EMAIL PROTECTED] pontespaulo%-40gmail.com- escreveu: fala galera, como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só é possível mesmo com WinForms... valeu! [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] No virus found in this incoming message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.4/1355 - Release Date: 1/4/2008 17:37 No virus found in this outgoing message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.4/1355 - Release Date: 1/4/2008 17:37 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Variável não é Zerada
Jacson, A linha onde está break point ainda não foi executada, por isso é que o valor continua sendo o anterior. [] Andrei Em 02/04/08, Jackson Gomes - ToolsComps[EMAIL PROTECTED] escreveu: Olhem a imagem no link: http://www.toolsandcomps.com/temp_louco.gif Temp é uma variável do tipo String e FilterHelper.GetInSentence é um método que retorna uma string. Observe na Watch list que Temp tem um valor antes da execução da linha do Quadro 1. Após a execução da mesma, Temp continua com o valor anterior, adicionando o valor de retorno de FilterHelper.GetInSentence, Ou seja, parece que o que está sendo executado é Temp := Temp + FilterHelper.GetInSentence, mas no código não tem nada disso. Apenas se eu descomento a linha Temp := '', o valor de Temp é 'Zerado' e funciona da forma esperada. Ainda não consegui entender o porquê? Até agora não vi nenhuma lógica, mas posso estar cego. Algum palpite? -- Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Borland http://www.devhost.com.br [EMAIL PROTECTED]
Re: [delphi-br] Vari�vel n�o � Zerada
A linha onde está break point ainda não foi executada, por isso é que o valor continua sendo o anterior. O problema era um Result em uma função interna que não havia sido inicializado com EmptStr; []'s Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Borland http://www.devhost.com.br [EMAIL PROTECTED]
Re: [delphi-br] Variável não é Zer ada
Jackson Gomes - ToolsComps wrote: O problema era um Result em uma função interna que não havia sido inicializado com EmptStr; A propósito também já tive problema com Result não inicializado ou setado, o Delphi não emite warning. -- Joao Morais
Re: [delphi-br] DBexpress para Delphi 7 Profissional e MSSQLServer
gostei da parte ambos são farinha do mesmo saco Walter Chagas Jr (BOL) [EMAIL PROTECTED] escreveu: No source forge tem a suite DBExpress Plus que tem mais recursos que o DBX padrão que vem no Delphi. É gratúito e funciona desde que você tire o DBX que vem no Delphi primeiro. Outra saida é você conseguir aí na WEB um driver proprio pra SQL Server. Agora, se queres uma sugestão, tenta usar o ADO. Ele com SQL Server é compatibilidade 101% garantida já que ambos são farinha do mesmo saco. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphiatcorporerm.blogspot.com MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Wandarlei Michelon [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, March 31, 2008 4:15 PM Subject: [delphi-br] DBexpress para Delphi 7 Profissional e MSSQLServer Boa tarde pessoal da lista. Trabalhei com Delphi DbExpress + Interbase, contudo agora entrei em um novo projeto e que será em DbExpress + MSSQLServer 2000 e MSSQLServer 2005, Até onde eu pude ver nas listas da web, o Delphi 7 profissional não tem a conexão para o DbExpress + MSSQLServer nativa, somente nas versões profissionais. Minha pergunta é a seguinte: como eu faço para poder usar DbExpress + MSSQLServer, sem ter que trocar a licença do Delphi, existe alguma atualização do DbExpress ou alguma biblioteca free para esta conexão? Desde já agradeço a todos. Wandarlei Michelon Programador Delphi Fone: 55 041 3279-2323 Tree Tools Informática Ltda. - Qualidade e Competência a Seu Alcance http://www.treetools.com.br/ http://www.treetools.com.br mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET NOD32 Antivirus, versão da vacina 2988 (20080331) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com Abraços, Ricardo Cabral - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Thread
Consultores, Obrigado pela dica. Deixa eu só entender. É dentro deste metodo execute que eu coloco aqueles codigos que praticamente travam o programa? Utilizando o codigo pra executar a query como o Sr disse, eu precisaria executar o metodo Syncronize? []Os Joel Consultores Software escreveu: Imaginando que vc quer executar uma query de tempos em tempos dentro da Thread, vc pode fazer o seguinte : 1. No seu projeto no delphi, crie uma nova classe : File -New - Other - New - Thread Object Você terá um esqueleto de uma classe que herda de TThread, e será portanto, a sua Thread. 2. No método Execute , implemente algo assim : while not Terminated do begin // Escreva aqui o código p/ executar a sua query Sleep(tempo_mili_segundos); // espera um tempo até a próxima execução end; Ao usar a classe no projeto, vc pode ter o controle da execução através dos métodos Resume, Suspend e Terminate. Em 01/04/08, Joel Alexandre [EMAIL PROTECTED] escreveu: Pessoal boa noite. Estou gatinhando no Delphi ainda e gostaria de saber dos senhores se existe algum exemplo de utilização de threads para exeção de Querys. Qualquer ajuda será bem vinda. Valeu []Os Joel [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: [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
Res: [delphi-br] Passar parâmetros para a query!
Caro Higor, eu resolveria o teu problema da seguinte maneira Situação Geral Formulário da tabela de cursos: Unit: uCursos Form: frmCursos Componentes citados nesse exemplo: ClientDataSet, DBGrid; Campos da tabela: IdCurso, Curso. Formulário da tabela de turmas: Unit: uTurmas Form: frmTurmas Componentes citados nesse exemplo: SQLQuery, ClientDataSet e DBGrid; Componentes da tabela: IdTurma, Turma, IdCurso Na propriedade SQL da SQLQuery faça o seguinte: Select IdTurma, Turma, IdCurso From Turmas Where IdCurso =:pIdCurso (Observação: A clausula where do teu exemplo, nesse contexto que voce pede, está errada, pois where c.curso_cd_codigo = t.curso_cd_codigo deve deve ter um parâmetro da seguinte maneira: where c.curso_cd_codigo =:pt.curso_cd_codigo (perceba os dois pontos, ele fica junto a primeira letra do parâmetro, use a letra (p) para mostrar que é parâmetro); pIdCurso é o parâmetro que você vai chamar da outra tabela (Cursos) para que seja mostrado apenas os dados do curso selecionado. Agora selecione o clientDataSet, clique com o botão direito e selecione a opção fetch Params (o fetch params permite que você passe o parâmetro pIdCurso do ClientDataSet para a Query - fica mais fácil de trabalhar), agora: Vá na propriedade params do clientDataSet e você verá o pIdCurso lá (selecione-o). Agora configure as seguintes propriedades: DataType: ftString (lembre-se deve ser o mesmo tipo de dado da chave primária da tabela de cursos) ParamType: ptInput OK, sua conexão está configurada e esperando o parâmetro. Próximos passos: 1º - Crie uma variável public, por exemplo - Id:integer ou string (mesmo tipo de dado da chave primária), para capturar a chave primária da tabela de cursos; 2º - No evento double click do dbgrid passar a chave primária para a variável Id := ClientDataSetIdCurso.Value; 3º - No form da tabela de turmas chamar a unit da tabela de cursos. (Para referenciar a variavel Id) uses uCursos; 4º - No evento BeforeOpen ClientDataSet faça o seguinte: var Id: integer ou string begin Id := frmCursos.ClientDataSetIdCurso.Value; ClientDataSet.Params['pIdCurso'].asString := Id; 5º - No evento OnShow do frmTurmas: ClientDataSet.Close; ClientDataSet.Open; Assim toda vez que você der um duplo clique (ou pode ser de outra forma) no dbGrid do frmCuros, abrirá o frmTurmas com um select parametrizado chamando apenas as turmas do curso referido. Todo dia é dia de renovar nosso destino - Mensagem original De: tarcan_se [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 2 de Abril de 2008 0:04:45 Assunto: [delphi-br] Passar parâmetros para a query! Boa noite pessoa, gostaria da ajuda de vocês com uma dúvida Estou fazendo um Sistema e estou querendo buscar o nome de alguns campos de umas tabelas partindo da informação vinda de outra, da seguinte forma. Tenha as tabelas Turma, Curso. Quero pegar o nome do Curso que vou comparar com o código que tenha na tabela de Turma e colocar em outra tela. Direto no banco fiz os seguintes testes e funcionaram sem problema: select c.curso_tx_nome from curso c, turma t where c.curso_cd_codigo = t.curso_cd_codigo Mas para funcionar no sistema preciso passar como referência o código do curso que está no form de turma em um edit para uma query que vai retornar o valor para um edit em outra tela. Estou querendo saber como faço para passar um Componente como Parâmetro em uma sequência de comandos SQL para um Query?? Desde já muito obrigado pela ajuda. []'s Higor Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Thread
Sobre o método Execute, é lá que você deve implementar aquilo que você quer que a Thread faça. A vantagem é que você terá maior controle externo sobre a execução dela, pois pode colocar um botão parar na janela e usar Thread.Suspend , se ela estiver travando. Synchronize vc deve usar para fazer acesso a algum objeto que seja compartilhado dentro da aplicação. Exemplo: vc quer escrever um TLabel que está no form ( portanto externo à Thread ) o andamento da execução. assim, dentro de Execute, use synchronize(EscreverNoLabel); onde : procedure TMyThread.EscreverNoLabel; begin MyLabel.Caption := FloatToStr(FPorcento) + '% concluído'; end; Em 02/04/08, Joel Alexandre [EMAIL PROTECTED] escreveu: Consultores, Obrigado pela dica. Deixa eu só entender. É dentro deste metodo execute que eu coloco aqueles codigos que praticamente travam o programa? Utilizando o codigo pra executar a query como o Sr disse, eu precisaria executar o metodo Syncronize? []Os Joel Consultores Software escreveu: Imaginando que vc quer executar uma query de tempos em tempos dentro da Thread, vc pode fazer o seguinte : 1. No seu projeto no delphi, crie uma nova classe : File -New - Other - New - Thread Object Você terá um esqueleto de uma classe que herda de TThread, e será portanto, a sua Thread. 2. No método Execute , implemente algo assim : while not Terminated do begin // Escreva aqui o código p/ executar a sua query Sleep(tempo_mili_segundos); // espera um tempo até a próxima execução end; Ao usar a classe no projeto, vc pode ter o controle da execução através dos métodos Resume, Suspend e Terminate. Em 01/04/08, Joel Alexandre [EMAIL PROTECTED] escreveu: Pessoal boa noite. Estou gatinhando no Delphi ainda e gostaria de saber dos senhores se existe algum exemplo de utilização de threads para exeção de Querys. Qualquer ajuda será bem vinda. Valeu []Os Joel [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 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] maximizar a tela
Boa tarde amigos estou tentando maximixar o form principal de forma que ele tome toda a tela inclusive a área que está a barra de inicializar do windows. algum amigo sabe como posso fazer? No aguardo Raphael [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] 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] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32)
Vitor, encontrei no site link ( http://www.businessobjects.com/products/reporting/crystalreports/vcl/default.asp) apenas para delphi 7... você tem algum link com os arquivos da VCL? Obrigado! 2008/4/2 Vitor Yahoo [EMAIL PROTECTED]: O Crystal possui uma vcl para acesso, procure por VCL Crystal Reports, para delphi 2005, veja no site da Business Objects que você vai achar, é bem mais fácil do que mexer com esse activeX. Vitor. _ De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Paulo Pontes Enviada em: quarta-feira, 2 de abril de 2008 13:20 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] DELPHI 2005 + CRYSTAL REPORTS XI (WIN32) João Paulo, consegui instalar o componente 'CrystalActiveXRepo-rtViewer'-, não sei se estou no caminho certo... através dele consegui abrir um arquivo '.rpt' utilizando o seguinte código... var oApp, oRpt: Variant; begin oApp := CreateOleObject(-'CrystalRuntime.-Application'-); oRpt := oApp.OpenReport(-'C:\Report1.-rpt', 1); CrystalActiveXRepor-tViewer1.-ReportSource := oRpt; CrystalActiveXRepor-tViewer1.-ViewReport; end; mas acho que assim eu obrigo o usuário a ter o Crystal Reports instalado na máquina, o que não posso fazer... sabe outro forma de utilizar esse componente, ou devo utilizar outro componente? valeu! 2008/4/2 Açaí HYPERLINK mailto:joaopaulo.jpo%40gmail.com joaopaulo.jpo%2540gmail.com [EMAIL PROTECTED]: Olá. Verifique se vc não está usando a versão do crystal report para web. Caso esteja com a versão win32 então vc precisa importar um activex do crystal report para o seu Delphi. Em 01/04/08, Paulo Pontes HYPERLINK mailto:pontespaulo%40gmail.com pontespaulo%2540gmail.com[EMAIL PROTECTED] gmail.com pontespaulo%-40gmail.com- escreveu: fala galera, como faço para rodar um relatório do Crystal no Delphi 2005 Win32... ou só é possível mesmo com WinForms... valeu! [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] No virus found in this incoming message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.4/1355 - Release Date: 1/4/2008 17:37 No virus found in this outgoing message. Checked by AVG. Version: 7.5.519 / Virus Database: 269.22.4/1355 - Release Date: 1/4/2008 17:37 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] TLabel com tags HTML
Boa tarde a todos, Alguém conhece algum componente semelhante ao TLabel que mostre formatado as tags HTML? Sem mais, Marlon David de Souza Desenvolvimento Sysmo Informática Ltda
Re: [delphi-br] DBexpress para Delphi 7 Profissional e MSSQLServer
O ADO tem uma boa compatibilidade com o MSSQL, mas por ter um interface que suporta vários bancos o desempenho não é total, devido a esse flexibilidade, quer uma opção 200% compatível que vai te permitir usufruir de todas as versões do MS SQL Server.. então oq vc procura é isso http://crlab.com/sdac/ e seja feliz. Em 02/04/08, Ricardo Cabral [EMAIL PROTECTED] escreveu: gostei da parte ambos são farinha do mesmo saco Walter Chagas Jr (BOL) [EMAIL PROTECTED] wchagasj%40bol.com.br escreveu: No source forge tem a suite DBExpress Plus que tem mais recursos que o DBX padrão que vem no Delphi. É gratúito e funciona desde que você tire o DBX que vem no Delphi primeiro. Outra saida é você conseguir aí na WEB um driver proprio pra SQL Server. Agora, se queres uma sugestão, tenta usar o ADO. Ele com SQL Server é compatibilidade 101% garantida já que ambos são farinha do mesmo saco. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphiatcorporerm.blogspot.com MSN: [EMAIL PROTECTED] whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Wandarlei Michelon [EMAIL PROTECTED]wandarlei%40yahoo.com.br To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, March 31, 2008 4:15 PM Subject: [delphi-br] DBexpress para Delphi 7 Profissional e MSSQLServer Boa tarde pessoal da lista. Trabalhei com Delphi DbExpress + Interbase, contudo agora entrei em um novo projeto e que será em DbExpress + MSSQLServer 2000 e MSSQLServer 2005, Até onde eu pude ver nas listas da web, o Delphi 7 profissional não tem a conexão para o DbExpress + MSSQLServer nativa, somente nas versões profissionais. Minha pergunta é a seguinte: como eu faço para poder usar DbExpress + MSSQLServer, sem ter que trocar a licença do Delphi, existe alguma atualização do DbExpress ou alguma biblioteca free para esta conexão? Desde já agradeço a todos. Wandarlei Michelon Programador Delphi Fone: 55 041 3279-2323 Tree Tools Informática Ltda. - Qualidade e Competência a Seu Alcance http://www.treetools.com.br/ http://www.treetools.com.br mailto:[EMAIL PROTECTED] wandarlei%40treetools.com.br [EMAIL PROTECTED] wandarlei%40treetools.com.br [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET NOD32 Antivirus, versão da vacina 2988 (20080331) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com Abraços, Ricardo Cabral - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] IBSQL
IBSQL nao e um dataset... usa o IBQUERY Geralmente uso o IBSQL pra fazer correções (criar e alterar tabelas, trigger e outros) no meu banco de dados Maycon Sanches Amaro [EMAIL PROTECTED] escreveu: Pessoal to tentando efetuar uma query através do IBSQL mas não estou conseguindo. Alguém poderia me dar uma força.. Coloquei a query no SQL mas e agora.. como faço pra executa-la e jogar o resultado em um combo?? Valeu. -- Att. Maycon Sanches Amaro - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Som
de uma olhada no MMTools, é uma colecao de componentes que vc faz o que quizer com audio. tudo isso que vc falou e mais alguma coisa Em 02/04/08, BandaLemuel [EMAIL PROTECTED] escreveu: O ACS eu testeiaki, mas não estou conseguindo fazer o que preciso tipo eu preciso pegar o que esta falando no microfone do PC e colocar em um gráfico , como se fosse um gauge, quanto mais auto a pessoa fala ele vai enchendo o gauge tipo aqueles programas que gravam sons mas mesmo vlw pela atenção Wesley From: Ricardo César Cardoso Sent: Wednesday, April 02, 2008 10:07 AM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: Re: [delphi-br] Som Nunca usei, mas já ouvi falar bem do Audio Component Suite. Dá uma vasculhada no torry.net que vc acha ele facim, facim. O melhor é que é free e vem com os fontes. Atte, Ricardo. BandaLemuel [EMAIL PROTECTED] bandalemuel%40yahoo.com.br escreveu: Lista Me desculpe mas ja procurei no google mas não achei nada, alguem sabe como manipular arquivo wav .. por exemplo pegar a quantidade de bits de som etc... ??? e como faço para saber se a pessoa esta falando no microfone do PCé possível saber isso ??? qualquer ajuda é bem vinda vlw Wesley [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 2995 (20080402) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- Cláudio Marconi Delphi/DirectShow Developer 55 61 8406-6451 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Componentes
Olá pessoal, achei um site muito interessante, vários componentes free, vale a pena conferir http://go.to/masdp -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Som
Esqueci de mencionar, qualquer duvida que tiver quanto ao MMTools pode me falar. Se quiser alguma coisa mais pé duro pode ser feito tb usando DirectShow, onde posso dar uma ajuda tb, se precisar. Em 02/04/08, BandaLemuel [EMAIL PROTECTED] escreveu: O ACS eu testeiaki, mas não estou conseguindo fazer o que preciso tipo eu preciso pegar o que esta falando no microfone do PC e colocar em um gráfico , como se fosse um gauge, quanto mais auto a pessoa fala ele vai enchendo o gauge tipo aqueles programas que gravam sons mas mesmo vlw pela atenção Wesley From: Ricardo César Cardoso Sent: Wednesday, April 02, 2008 10:07 AM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: Re: [delphi-br] Som Nunca usei, mas já ouvi falar bem do Audio Component Suite. Dá uma vasculhada no torry.net que vc acha ele facim, facim. O melhor é que é free e vem com os fontes. Atte, Ricardo. BandaLemuel [EMAIL PROTECTED] bandalemuel%40yahoo.com.br escreveu: Lista Me desculpe mas ja procurei no google mas não achei nada, alguem sabe como manipular arquivo wav .. por exemplo pegar a quantidade de bits de som etc... ??? e como faço para saber se a pessoa esta falando no microfone do PCé possível saber isso ??? qualquer ajuda é bem vinda vlw Wesley [As partes desta mensagem que não continham texto foram removidas] _ - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 2995 (20080402) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- Cláudio Marconi Delphi/DirectShow Developer 55 61 8406-6451 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] maximizar a tela
No evento OnCreate adicione Width := Screem.witdh; Height := Screem.Height; Raphael Fonseca escreveu: Boa tarde amigos estou tentando maximixar o form principal de forma que ele tome toda a tela inclusive a área que está a barra de inicializar do windows. algum amigo sabe como posso fazer? No aguardo Raphael [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
[delphi-br] Delphi e DirectX - Dica de Site
http://www.juhara.com/ Sds. _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br
Re: [delphi-br] Thread
Valeu mesmo.. Agora deu pra entender legal. []Os Joel Sobre o método Execute, é lá que você deve implementar aquilo que você quer que a Thread faça. A vantagem é que você terá maior controle externo sobre a execução dela, pois pode colocar um botão parar na janela e usar Thread.Suspend , se ela estiver travando. Synchronize vc deve usar para fazer acesso a algum objeto que seja compartilhado dentro da aplicação. Exemplo: vc quer escrever um TLabel que está no form ( portanto externo à Thread ) o andamento da execução. assim, dentro de Execute, use synchronize(EscreverNoLabel); onde : procedure TMyThread.EscreverNoLabel; begin MyLabel.Caption := FloatToStr(FPorcento) + '% concluído'; end; -- 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] 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