Re: [delphi-br] [OFF-TOPIC] Explicação da velocida de de compilação do Delphi
Pascal é uma linguagem extremamente simples. Por exemplo, você declara todas as variáveis num único lugar. Isso e outras coisas tornam simples ler o fonte pascal e gerar o binário. Já por exemplo C++, você pode declarar uma variável em qualquer lugar, tem variáveis que só existem dentro de um laço e por aí vai, logo é bem mais complicado interpretar o fonte. 2010/7/5 Vinicius Santos vinicius.santos.li...@gmail.com Pessoal boa noite, Alguém sabe a explicação técnica de o compilador Delphi ser TÃO rápido ? Ando(por curiosidade apenas) estudando o funcionamento de compiladores e não consigo entender o porque o Delphi de fato é muito rápido nessa parte. Veja o g++ e o VC++, demoram um tempo consideravelmente maior para compilar um programa que o Delphi/C++ Builder. Estou errado quando digo que as partes mais demoradas são a Análise Léxica e a Semântica ?? Qual seria a explicação técnica ? vinicius.santos.li...@gmail.com?subject=[off-topic]+explica%c3%a7%c3%a3o+da+velocidade+de+compila%c3%a7%c3%a3o+do+delphi|delphi...@yahoogrupos.com.br?subject=[off-topic]+explica%c3%a7%c3%a3o+da+velocidade+de+compila%c3%a7%c3%a3o+do+delphi -- Leodinei Bielak Even a broken clock is right twice a day If the code was pretty, I probably didn't write it. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: PostgreSQL 8.4, não conecta com zeus
Adiciona a pasta bin do pg no teu path Deve ser algo tipo C:Arquivos de Programas\Postgres\8.4\bin 2010/3/4 Eduardo edun...@yahoo.com.br Ola Silvio, Testei um exemplo do proprio ZEOS, que é o ZSIMPLE.EXE e quando eu coloco a configuração abaixo da um erro: Este aplicativo não pôde ser iniciado porque não foi encontrado comerr32.dll. A reistalação do aplicativo pode corrigir o problema. ai clico no OK aparece outra janela None of dynamic libraries can be found: libpg81.dll,libpq.dll O comerr32.dll não existe mesmo, mas o libpg81.dll esta no mesmo diretorio. O PG8.4 esta instalado e funcionando e tambem eu entro normal usando o pgadminIII, alias a configuração esta assim: Descrição PostgreSQL 8.4 / Nome da Máquina localhost / Porta = 5432 / Serviço =postgresql-8.4 / Manutenção do banco de dados = postgres / Nome de usuário =postgres / Vc acha que é melhor eu instalar uma versão mais antiga do pg ou vale a pena perder mais tempo com o 8.4? ps:Desculpe pelo erro no nome do componente!!! Grato Eduardo --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, silvioprog silviop...@... escreveu Oops! :) --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, silvioprog silvioprog@ escreveu database=postgres hostname=127.0.0.1 password=postgres port=5432 protocol=postgres protocol=postgresql-8 user=postgres Modifique de acordo com teu sistema. -- []'s Silvio Clécio -- programmer ObjectPascal - Blog: http://blog.silvioprog.com.br programmer ObjectPascal - Site: http://www.silvioprog.com.br programmer ObjectPascal - Twitter: http://twitter.com/silvioprog -- grupo Lazarus-BR no Google - http://groups.google.com/group/lazarus-br/ -- °oO[ Mensagem assinada digitalmente ]Oo° -- Leodinei Bielak Even a broken clock is right twice a day If the code was pretty, I probably didn't write it. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Ordenar campo calculado
Apenas o TClientDataSet pode fazer isso usando um tipo InternalCalc. 2009/10/16 Gilvan Costa info...@yahoo.com.br Olá Srs Alguém sabe como ordenar campo calculado em um DBGrid? eu Uso TADOQuery Já pesquisei na NET e me deparei com vários post dizendo que não é possível, mas, eu vejo que é tão útil esse recurso que duvido que não existe uma maneira simples de se fazer. Agradeço Gilvan Costa [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Tough times never last, but tough people do. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Passar objeto para dll
Obrigado por toda a ajuda. Eu acabei descobrindo que boa parte do executável é ícones(2mb) e outro tanto é relatórios(8-10mb). Tirando estes do executável compilado eu já vou conseguir reduzir o suficiente pra voltar a rodar em windows 98. Obrigado. 2009/8/13 Joao Morais jcmorai...@gmail.com: 2009/8/13 Leodinei Bielak leodi...@gmail.com: Eu sei que eu posso marcar no delphi nas configurações do projeto para não compilar o projeto com os bpl juntos. É possível anexar no meu executável os bpl dos componentes do delphi e utilizar bpl apenas para as minhas funções ou tenho que utilizar bpl para tudo? As regras de ouro das bpls são as seguintes: - tomado todo o seu conjunto exe+bpl, você não pode ter repetição de unit; quando uma unit está linkada estaticamente em um artefato, todos os demais deverão fazer referência àquele artefato para poder usar aquela unit. - não é possível linkar uma unit estaticamente a um exe e utilizá-la em uma bpl; portanto se você precisa de uma unit em mais de um lugar, você terá que obrigatoriamente colocá-la em uma bpl. - não é possível fazer smartlink em bpl, portanto exe+bpl sempre será maior do que o exe sozinho. - exe e bpl precisam ser compilados com a mesma versão do compilador. E um adendo óbvio, que por sinal também vale para dll - quando você muda alguma assinatura de classe ou método, você tem que recompilar todos aqueles que dependem dessa classe ou método. Joao Morais -- Leodinei Bielak Work smarter, not harder.
Re: [delphi-br] Passar objeto para dll
Eu sei que eu posso marcar no delphi nas configurações do projeto para não compilar o projeto com os bpl juntos. É possível anexar no meu executável os bpl dos componentes do delphi e utilizar bpl apenas para as minhas funções ou tenho que utilizar bpl para tudo? Obrigado. 2009/8/12 Joao Morais jcmorai...@gmail.com: 2009/8/12 Leodinei Bielak leodi...@gmail.com: Olá. Alguém pode me dizer como eu passo um objeto para um dll? É algo assim, na dll eu quero ter um parâmetro que é um objeto. Pode se um dataset, um progressbar, enfim um componente normal do delphi. Eu tentei passar o objeto e como pointer. Mas na hora que acessa da erro de violação de memória. Quando você trabalha com objetos, você precisa de uma estrutura chamada VMT. Essa VMT é um vetor aonde estão relacionadas todas as classes utilizadas na sua aplicação, e que faz com que a mágica da sobrescrita de método funcione. Quando você trabalha com DLL, você tem internamente duas aplicações que compartilham recursos. Cada aplicação, o seu EXE e a sua DLL, tem cada um uma VMT e podem, cada um, trabalhar com objetos individualmente. O problema é jogar objeto de um lado para o outro, você terá uma ligação a uma área de memória que pertence a outra aplicação e isso não tem como dar certo. Você pode solucionar o problema de duas formas: serializar o objeto e reconstrui-lo do outro lado, ou trabalhar com BPL, que é uma feitiçaria do Delphi que transforma uma DLL em uma extensão do seu EXE, fazendo com que os dois tenham um único gerenciador de memória e uma única VMT. Joao Morais -- Leodinei Bielak Work smarter, not harder.
[delphi-br] Passar objeto para dll
Olá. Alguém pode me dizer como eu passo um objeto para um dll? É algo assim, na dll eu quero ter um parâmetro que é um objeto. Pode se um dataset, um progressbar, enfim um componente normal do delphi. Eu tentei passar o objeto e como pointer. Mas na hora que acessa da erro de violação de memória. Obrigado. -- Leodinei Bielak Work smarter, not harder.
Re: [delphi-br] Hora em que o Windows foi iniciado
GetTickCount, essa função conta os millesegundos desde que o windows foi iniciado. Só fazer a conta 2009/7/20 José Mário Silva Guedes jmariogue...@gmail.com: Olá amigos! Há alguma maneira de levantar o horário em que o Windows foi iniciado? Obrigado, -- José Mário Silva Guedes Analista Programador Delphi [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Work smarter, not harder.
Re: [delphi-br] Delphi - Paradox - Como setar valor padrão para DBLookupComboBox?
Você tem que setar no dataset o valor, no OnNewRecord ou coisa assim. 2009/6/25 mtarantjr mtaran...@hotmail.com: Tentei com DBLookupComboBox1.KeyValue:= 1; Essa dica eu peguei na net mas passa por ele, seta o valor mas não aparece no form, preciso que apareça a opção no componente. Alguns indicam ItemIndex, porém é confusão porque esta propriedade existe no dbcombobox apenas. Alguma dica? P.S. Fucei em tudo pela net e não encontrei solução. Achei que essa fosse mais simples. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] uso de query com fildbyname
2008/11/12 luislact [EMAIL PROTECTED]: Boa tarde pessoal. estou tentando migrar aos poucos do uso da table para query com paradox e estou tendo algumas dificuldades. Sei que muitos vao dizer para nao usar o paradox e coisa e tal mas no momento não tenho muita alternativa. Hoje uso uma pesquisa no campo edit1.text e nessa pesquisa uso Table1.FindNearest([Edit1.Text]); .. isso me localiza o registro que quero em uma dbgrid. Com isso eu posso pesquisar o cliente e no evento afterscroll da table consigo fazer com que o nome do cliente apareça completo com o cnpj em edit1.text e edit2.text. Agora vem o meu maior problema .. não consigo fazer isso com a query. Hoje consigo localizar atraves da select sem problema mas não consigo fazer com que ao passear pela dbgrid o nome e o cnpj do cliente apareça nos respectivos edit1 e edit2. Não posso usar dbedit nesse caso. Agradeço alguma ajuda sobre o assunto. procedure TFormCadaOrca.Table2AfterScroll(DataSet: TDataSet); begin edit50.Text := Table2.fieldbyname('descricaoitem').AsString; combobox3.Text := Table2.fieldbyname('und').AsString; edit51.Text := Table2.fieldbyname('pesoitem').AsString; edit52.Text := Table2.fieldbyname('valorkg').AsString; end; Se você está fechando e abrindo a busca após o select, talvez deva utilizar o evento AfterOpen. É o que eu utilizo com o Zeus. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Evitar que sistema seja fechado
2008/8/15 Guionardo Furlan [EMAIL PROTECTED]: No form principal, use o evento onclosequery 2008/8/15 Leodinei Bielak [EMAIL PROTECTED] Olá. Estamos tendo problema com as aplicações de alguns bancos. Elas simplesmente fecham o sistema sem aviso. Tem alguma maneira de evitar isso? Talvez tratar alguma mensagem do windows? Obrigado. -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com Não funciona quando o sistema do banco fecha o programa nem se eu usar o CTRL + ALT + DEL. Obrigado. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Re: Evitar que sistema seja fechado
2008/8/15 Carlos [EMAIL PROTECTED]: Olá, complementado a dica do colega, no evento onCloseQuery você coloca a seguinte linha de código, e assim, antes de fechar, ele lhe pedirá autorização para isto(isto, seguindo a dica do colega que informou para usar este evento). if Application.MessageBox('Quer realmente sair do sistema?', 'Confirmação', MB_YESNO + MB_ICONQUESTION) = IDYES then CanClose := True else CanClose := False; Fraterno abraço, Carlos Saiu estranha a resposta. :D O evento OnCloseQuery funciona quando usuário manda fechar a aplicação, mas não quando eu fecho pelo gerenciador de tarefas do windows. O que os softwares dos bancos fazem é semelhante ao Ctrl + Alt + Del. Eu preciso de uma maneira de bloquear isto. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Campo Calculado
2008/8/8 Bruno Stort [EMAIL PROTECTED] Estou precisando inserir em um campo calculado de uma query, sem usar o OnCalcFields. Qual propriedade devo mexer? Quando tento da um edit na query da um erro que não posso modificar uma query Red-Only. Para um campo calculado tu não precisa precisa chamar o edit/post. Tu deve alterar ele apenas no evento OnCalcFields e nenhum lugar mais. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
[delphi-br] Encontrar Handle de componente em outra aplicação.
Olá. Eu preciso enviar um comando para um ListBox que está em outra aplicação. Eu sei que posso enviar o camando com SendMessage ou PostMessage. Mas para isso eu preciso saber qual o Handle do ListBox. Do programa eu acho com FindWindow. Mas de um componente de outro programa como eu posso achar? Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Vazamento de memória
Então deve ser isso mesmo. Eu vou fazer um teste que é tirar o FastMM para ver se o gerenciador padrão do delphi também faz isso. Valeu. 2008/2/1 Joao Morais [EMAIL PROTECTED]: Leodinei Bielak wrote: Olá. Eu tenho no sistema um formulário MDI e os outros formulários são criados como filhos. Após fechar cada filho eu uso o caFree. Eu tenho o FastMM instalado e ele não mostra nenhum vazamento de memória. Mas se eu acompanhar o uso de memória pelo gerenciador de tarefas cada vez que eu abro um formulário e fecho ele o sistema usa uns 2 megas a mais que antes. Alguém pode me ajudar com este problema. Se o FastMM não detecta vazamento, então não há com o que se preocupar. O que acontece é que o gerenciador de memória não entrega toda a memória desalocada de volta para o SO. Requisição de memória é um processo caro e o gerenciador procura minimizar o uso. -- Joao Morais -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
[delphi-br] Vazamento de memória
Olá. Eu tenho no sistema um formulário MDI e os outros formulários são criados como filhos. Após fechar cada filho eu uso o caFree. Eu tenho o FastMM instalado e ele não mostra nenhum vazamento de memória. Mas se eu acompanhar o uso de memória pelo gerenciador de tarefas cada vez que eu abro um formulário e fecho ele o sistema usa uns 2 megas a mais que antes. Alguém pode me ajudar com este problema. Obrigado. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Destructor da Classe não está sendo chamado
2008/1/21 Joao Morais [EMAIL PROTECTED]: Leodinei Bielak wrote: TLicensa = class(TObject) Licensa : string; Validade : TDate; public constructor Create; destructor Destroy; end; Você está dizendo que, neste código, o compilador emite um erro se você fizer: destructor Destroy; override; É isto? Exatamente. Eu eu clicar com o control no TObject ele mostra que no fonte está como virtual. Se eu deixar sem nada após a declaração ele mostra a mensagem de que o Método Destroy está sendo escondido. Se eu colocar reintroduce ele não mostrar mais o warning. Se eu colocar override dá o erro de compilação. Eu só consigo reproduzir isto quando eu troco destructor por procedure, ainda assim o erro apresentado pelo compilador é que a declaração TObject.Destroy é diferente da declaração TLicensa.Destroy, e não que TObject.Destroy seja um método estático. Outra é que você possa estar usando uma unit System que não a original, e nesta unit o Destroy não é virtual. Muito pouco provável, são muitas classes que utilizam Destroy virtual. Ou talvez você não esteja herdando direto de TObject, mas de alguma outra classe em que o Destroy foi reintroduzido como estático. No entanto isto não bate com o que você declarou, então é só especulação. Fora isto, cabou-se minha criatividade. Fique a vontade em mantar mais um pouco de código a fim de que seja possível ao menos reproduzir o problema. Descobri o meu erro. Eu estava colocando override tanto no Create quanto no Destroy. Obrigado pela ajuda. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
[delphi-br] Destructor da Classe não está sendo chamado
Olá. Eu tenho algumas classes para Pessoa, Cliente, Endereços, etc. Eu criei para estas classes constructors e destructors, mas o destructor da classe não está sendo chamado quando eu uso FreeAndNil e Classe.Free e por isso eu estou tendo vazamento de memória. Alguém pode me ajudar com este problema? Obrigado. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Destructor da Classe não está sendo chamado
2008/1/21 Joao Morais [EMAIL PROTECTED]: Você pode detalhar melhor, colocar algum código exemplo, colocar o que te fez perceber que o destrutor não é chamado, etc? -- Joao Morais Deixa eu tentar de novo. Eu tenho algo assim: TObject - TPessoa; TObject - TEndereco; TCliente = class(TPessoa) Endereco : TEndereco; end; Todas as classes criadas por mim tem um destructor e um constructor criado e chamam inherited dentro deles. O que acontece é que quando eu uso Classe.Free e FreeAndNill(Classe) o destructor não é chamado nunca e a memória não é liberada. Só funciona se eu chamar o Destroy diretamente. Eu não sobrescrevi o método Free. Obrigado. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Destructor da Classe não está sendo chamado
2008/1/21 Joao Morais [EMAIL PROTECTED]: Ainda tá complicado entender o que está acontecendo, mas vamos tentar algumas dicas: - Você precisa colocar override; atras da declaração destructor Destroy; - mesmo que você não declare um destrutor, ou mesmo que você declare sem override (o que é um erro), ou ainda que você declare e não chame o inherited, o seu objeto será destruido assim mesmo; - A chamada ao Free fará com que o Destroy, que é virtual, seja chamado. Quando você usa o override, você informa ao compilador que o seu Destroy deve ser executado, e não aquele declarado em TObject. Quando você não usa o override, o TObject.Destroy é que é chamado, e isto faz com que seu objeto seja destruido, no entanto seu TCliente.Destroy não é chamado; - Use fastmm e tenha certeza de que você tem mesmo um vazamento, e verifique quais são as classes que estão vazando; - O FreeAndNil é usado com a instância, não com a classe. Ou seja, é FreeAndNil(VarQueApontaPraCliente) e não FreeAndNil(TCliente); Por gentileza, manda mais detalhe do que você está fazendo. Eu não sobrescrevi o método Free. Nem tem como, ele é estático. -- Joao Morais Se eu tento colocar override após a declaração do Destroy dá um erro de compilação dizendo que o método é estático. Eu estava usando reintroduce na classe TPessoa para silenciar um warning. Eu tentei sem ele, compila mas não funciona também. Obrigado pela ajuda. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Destructor da Classe não está sendo chamado
2008/1/21 Joao Morais [EMAIL PROTECTED]: Taí, Destroy não é estático. Copy/Paste algum trecho de código, do contrário beira o impossível prestar alguma ajuda decente. Silenciar warnings não é um bom negócio, eles estão lá para te ajudar. Você deve removê-los sem apelar para as vias de fato. -- Joao Morais Pois é. Imagino que essa seja a classe mais simples que eu tenho. TLicensa = class(TObject) Licensa : string; Validade : TDate; public constructor Create; destructor Destroy; end; Mesmo tirando o public que tem ali dá o mesmo erro. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Destructor da Classe não está sendo chamado
2008/1/21 Joao Morais [EMAIL PROTECTED]: Leodinei Bielak wrote: 2008/1/21 Joao Morais [EMAIL PROTECTED]: Taí, Destroy não é estático. Copy/Paste algum trecho de código, do contrário beira o impossível prestar alguma ajuda decente. Silenciar warnings não é um bom negócio, eles estão lá para te ajudar. Você deve removê-los sem apelar para as vias de fato. Pois é. Imagino que essa seja a classe mais simples que eu tenho. TLicensa = class(TObject) Licensa : string; Validade : TDate; public constructor Create; destructor Destroy; end; Mesmo tirando o public que tem ali dá o mesmo erro. Você está dizendo que, neste código, o compilador emite um erro se você fizer: destructor Destroy; override; É isto? -- Joao Morais Exatamente. Eu eu clicar com o control no TObject ele mostra que no fonte está como virtual. Se eu deixar sem nada após a declaração ele mostra a mensagem de que o Método Destroy está sendo escondido. Se eu colocar reintroduce ele não mostrar mais o warning. Se eu colocar override dá o erro de compilação. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Destructor da Classe não está sendo chamado
2008/1/21 Davi Eduardo Borges Wall [EMAIL PROTECTED]: Se isso é D7, os dois estão update 1? Isso eu não sei dizer, vou pedir pro pessoal atualizar. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ The whole point of getting things done is knowing what to leave undone.
Re: [delphi-br] Descobrir classe a partir da variável
On 9/27/07, Joao Morais [EMAIL PROTECTED] wrote: O que você acha desta sintaxe? VMeuForm := TAlgumForm.Instancia; Se VMeuForm não for compatível com TAlgumForm você recebe um erro de compilação. A implementação fica assim: constructor TFormAbstrato.Instancia; begin // procura form da classe ClassType em Screen.Forms; // se existe begin inherited FreeInstance; Self := // form existente; end else Self := inherited Create(AOwner); end; -- Joao Morais Deixa eu ver se eu entendi. Eu deveria sobrescrever o Construtor do meu formulário base para procurar um Form da mesma classe? É isso? Ou eu teria que fazer isso em cada formulário? Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
[delphi-br] Descobrir classe a partir da variável
Olá. Alguém sabe se tem como eu descobrir qual a classe de um objeto passando uma variável? Eu quero criar uma função para descobrir se um formulário está visível ou não, para saber se eu mostro o anterior ou crio um novo. Eu sei como criar um classe a partir da string com o nome, mas eu desejo passar um variável para ter checagem do nome correto ainda em tempo de compilação. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Turbo Delphi - como instalar no cliente?
On 9/26/07, gilsonlongo [EMAIL PROTECTED] wrote: Oi, Estou gerando uma aplicação de teste no Turbo Delphi com acesso a dados, mas testei a instalação em duas estações cliente e o aplicativo gerado pelo turbodelphi não abre, não executa dá erro... Gerei um instalador pelo InnoSetup, como nas demais versões. Será que tem que instalar alguma dll, biblioteca adicional? Agradeço o retorno ... gilsonlongo Palpite: se você usou o ClientDataSet então provavelmente falta colocar na cláusula Uses a MidasLib -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Descobrir classe a partir da variável
O que eu gostaria de saber é se tem alguma maneira de descobrir isto antes de instanciar a variável. Eu não posso acessar nenhuma propriedade antes de instanciar a variável. Dá erro de acesso a memória. Ex: Eu declaro a variável MeuForm do tipo TMeuForm. Eu quero passar a variável pra minha função e ela saber que precisa procurar por um formulário do tipo TMeuForm e se não encontrar nenhum fazer a variável MeuForm receber uma instância nova do TMeuForm. Valeu. On 9/26/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: Eu acho que é mais coerente checar a propriedade ClassType. FindClass() é pra outra coisa. Sds.
[delphi-br] Converter String para SET
Olá. Estou querendo converter uma string para um item de um set. Alguém sabe como? Estou tentando usar StringToSet, mas está dando erro de acesso a memória. Valeu -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: RES: [delphi-br] Mas alguem na lista usa java tb???
On 8/3/07, Fellipe Henrique [EMAIL PROTECTED] wrote: Eu vi Dois problemas graves no Lazarus, quando testei a versão, não tinha suporte fiel à MDI e não tinha suporte visual à Herança de Forms... o que me atrapalhava de vez não sei como está agora, pois faz anos que não mexo com ele... outra coisa que pesa contra é o tamanho do executavel, muito grande... mas não é culpa do Lazarus e sim do FreePascal.. :o) Acho que o LAzarus uma saída ótima, respeitando algumas regrinhas básicas, teu sistema feito no windows, compila pra Linux (ou vice-versa) numa boa... o que aumenta o leque de clientes de uma firma.. :o) Na verdade a culpa do tamanho do executável também não é do FreePascal, mas sim do GTK. :) A propósito, existe algum projeto pensando em portar o JEDIVCL pro lazarus? Saudações. -- Leodinei Bielak.
[delphi-br] Relatórios em Matricial e Jato de Tinta
Olá. Aqui na empresa usamos o FastReport 3 para gerar os relatórios para matricial. Agora o cliente quer em Jato de Tinta também. Mas para isso no FastReport é necessário fazer outro relatório. Existe algum gerador de relatório que me permita criar um relatório só e que possa ser impresso tanto em modo gráfico quanto modo texto, ao mesmo tempo que permita controlar as formatações? No FastReport eu até consigo exportar de maneira que possa ser impresso em modo gráfico, mas onde tem texto em condensado fica muito largo. Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Relatórios em Matricial e Jato de Tinta
Valeu pessoal, vou dar uma olhada nestes. Obrigado On 7/16/07, Daniel [EMAIL PROTECTED] wrote: Sim, com certeza Existe o Fortes Report, da Fortes Informática, parecido com o Quick report, porém muito mais robusto e poderoso. Com ele tem um componeten chamado de draft, que VC coloca...e pode ligar ou desligar se quiser relatorio com matricial ou não
Re: [delphi-br] CRC é um código único pra cada arquivo?
Até onde eu sei CRC é um cálculo aplicado ao arquivo. Por exemplo somar todos os zeros e uns. Embora acredito que seja um pouco mais complexo que isso. :D Tem procurar por cálculos de hash, como o MD5 On 5/30/07, Fellipe Henrique [EMAIL PROTECTED] wrote: Olá, tenho que cadastrar vários arquivos, e tem gente que muda o nome do arquivo, mas ele é o mesmo... então pensei em usar um Método de CRC para verificar se o arquivo é o mesmo, mas minha pergunta é: o CRC é único para cada arquivo? Como gero ele pelo Delphi? Agradeço desde já []s -- _ Fellipe Henrique [EMAIL PROTECTED] Você valoriza a existêcia das pessoas extraordinárias e momentos em que a história avança graças a elas. Tudo o que se imagina pode ser alcançado. Deve-se ousar sonhar. Mas não há substituto para perseverança e trabalho... e trabalho em equipe. Por que ninguém consegue sozinho. Se comemoramos a grandeza desses eventos e as pessoas que os realizam... não podemos esquecer o sacrifício daqueles que tornam possíveis tais realizações. [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Executar EXE no CD-Rom
Tenta parar o DB na tua casa e executa novamente. Usando o zeoslib ele volta e meia fica com a conexão aberta na hora de compilar. On 5/15/07, Tiago de Assis Pimenta [EMAIL PROTECTED] wrote: Galera, fui executar um sistema em um cd-rom no meu cliente e ele deu erro de windows ... que tinha que enviar relátorio e talz ... Cheguei aqui em casa, e executei ele normalmente no cd-rom ... alguem faz ideia do que pode ser ??? Ele não ta fazendo conexão com o banco ainda então o que pode ter faltado ?!?! Tiago de Assis Pimenta MSN: mailto:[EMAIL PROTECTED] tiagopimenta%40hotmail.com [EMAIL PROTECTED] tiagopimenta%40hotmail.com SKYPE: tiagopimenta_skype GTalk: mailto:[EMAIL PROTECTED] tiagopimenta%40gmail.com [EMAIL PROTECTED] tiagopimenta%40gmail.com [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Could not convert variant of type(null) into type(String)
Usa tabela.FieldByName('nomeDoCampo').AsString; On 4/20/07, Ricardo César Cardoso [EMAIL PROTECTED] wrote: Por isso mesmo eu coloquei como não recomendado a solução POG. o melhor mesmo é reestruturar sua base para se adequar a esta situação. Sds, Ricardo. Sérgio T. Uetanabaro [EMAIL PROTECTED]suka%40codaintellisoft.com.br escreveu: O espaco em branco a la POG pode ter problemas em banco oracle pois ele detecta se o campo eh em varchar/branco e soca um NULL nele. []´s Sergio _ 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 Ricardo César Cardoso Enviada em: quinta-feira, 19 de abril de 2007 16:01 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Could not convert variant of type(null) into type(String) Bom... das duas, uma: ou vc muda a base pra aceitar que este campo esteja vazio (Null) ou então vc faz uma POG (não recomendo) para que se o controle da tela estiver vazio, no campo ele grave um espaço em branco. Sds, Ricardo Vinicius Latini [EMAIL PROTECTED] mailto:viniciuslw% viniciuslw%25 40gmail.com com escreveu: Fala galera como que eu resolvo esse problema quando um atributo do meu BD esta vazio estou usando o comando IBQuery.FieldValues[vCampo]; Could not convert variant of type(null) into type(String) desde já agradeço [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger http://br.messenger.yahoo.com/ .yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] _ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] fazer tecla de função FK_10 funcionar em todo o sistema
Trata as mensagens do TApplicationEvents. On 4/24/07, José Mário Silva Guedes [EMAIL PROTECTED] wrote: Saudações. Não tenho a resposta para a sua pergunta, ma, fiquei curioso o porque de você estar abrindo mão do JEDI, porque estou propenso a utilizar esta biblioteca. Grato, [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] JEDI VCL
Você salvou o seu projeto desenvolvido no 7 usando o 2006? Se foi isso ele provavelmente atualizou o projeto pra usar os componentes novos do 2006. Você tem um backup do projeto? On 4/24/07, Leonardo Quinino [EMAIL PROTECTED] wrote: Pessoal, eu uso a Jedi vcl na versão 2.10 e JCL 1.97, resolvi me arriscar no delphi 2006, ae que raiva que passei, obviamente a versão jedi 2.10 para delphi 2006, tive que baixar a versão 3.30 no site oficial do projeto jedi, ae, começou o meu tormento, na instalação do jedi, rodou perfeito, o jedi estava lá no delphi 2006, perfeito, todos os componentes de sempre, a parte ruim, foi que qdo vou no delphi 7, e tento compilar qualquer aplicação que usa a Jedi dá trozentos erros no delphi 7, o treco pirou o cabeção, e começou a mostrar variaveis inválidas no RTLConsts.pas, o treco pirou geral, ae, tentando corrigir o problema, retirei o jedi 3.30, retirei delphi 2006 (lá se foram horas, que vá demorar pra instalar assim em outro canto) aahah, mas mesmo retirando tudo, o negocio agora continua dando problema, alguém já passou por algo semelhante ? Já retirei inclusive tudo relativo ao DELPHI2006, até a pasta retirei, apaguei tbm os .bpl do jedi no delphi 7, e tentei reinstalar a versão 2.10, mas nada, a mesma coisa Quem souber de algo parecido, e poder me ajudar, ficarei grato. -- Leonardo Quinino
[delphi-br] Erros de acesso a memória ocorrendo aleatoriamente
Olá pessoal. Eu estou tendo um problema em cadastro de sistema. Está ocorrendo erros de memória aleatoriamente. Em lugares que não deveria. Por exemplo, eu tenho um clientDataset que eu uso como uma tabela em memória. As vezes quando eu estou lendo o valor de um campo string, mesmo usando o método AsString, ocorre um erro de acesso a memória. Quando eu procuro pelo erro usando o endereço passado o Delphi vai para a unit System. Alguém já passou por isso? Tem alguma idéia do que pode ser. É algo realmente aleatório. Os mesmos dados alguma vezes causam o erro, outras não. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
[delphi-br] Casos de estudos de empresas usando Delphi
Boa tarde. Alguém poderia me indicar algum link que contenha casos de sucessos usando Delphi? Pode ser tanto em português como em inglês. Eu não estou encontrando nada nem mesmo no site da Borland/Code Gear. Obrigado. -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Casos de estudos de empresas usando Delphi
Faleu pela ajuda pessoal. Eu finalmente encontrei este link: http://info.borland.com/about/cases/ Nele há vários casos de empresas que se deram bem usando os produtos da Borland. Valeu. On 4/11/07, Ricardo César Cardoso [EMAIL PROTECTED] wrote: Uns tempos atrás eu vi uma matéria sobre isso no informativo que a Borland/CodeGear manda para os usuários registrados. Se eu ainda tiver isso no meu e-mail posso enviar. Sds, Ricardo.
Re: [delphi-br] (Ninguém Sabe??) Dúvida - como usar Array em FindNearest ou FindKey?
Usa VarArrayCreate. Acho que é isso On 3/27/07, Roger [EMAIL PROTECTED] wrote: Caros, Estou precisando de ajuda em algo um tanto simples, porém não consigo lembrar como fazer. Tenho uma pesquisa da seguinte forma: AdsTable1.FindNearest([ 'AAX', '2']); Mas quero fazer a mesma pesquisa, usando um Array, seria +/- assim: Var PVCColunasPesquisadas : Array[0..1,0..1]of String; Begin PVCColunasPesquisadas[ 1, 0] := 'AX'; PVCColunasPesquisadas[ 1, 1] := '2'; AdsTable1.FindNearest( PVCColunasPesquisadas[ 1]); Porém neste caso, ocorre erro 'Incompatible Types' na compilação. Rogério Ricardo Fernandes Desenvolvimento GS3 Sistemas Tel.:47 3035-6020/Fax:47 3035-6050 [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] icone figura no MainMenu( menu) como faço? =3F?=
Imagelist do MainMenu e ImageIndex do Item do Menu. On 3/12/07, aderson rezende [EMAIL PROTECTED] wrote: como acrescentar figuras no menu? tipo icone do lado esquerdo ao abrir o menu agradeço a todos que colaborarem -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] botao adicional na barra de titulo - como??
O JediVCL tem algo assim. On 3/8/07, Thiago Filiano (America Soft) [EMAIL PROTECTED] wrote: hmm isso nao eh mto interessante para nós aqui, pois temos mtas telas.. para adaptar isso não seria mto legal.. Humberto escreveu: bom.. adicionar um novo botão eu não, mas o que vc pode fazer para contornar essa situação seria não exibir a barra de títulos e criar a sua própria barra.. \o/ - Original Message - From: Thiago Filiano (America Soft) To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Thursday, March 08, 2007 4:55 PM Subject: [delphi-br] botao adicional na barra de titulo - como?? Boa tarde pessial, alguém tem uma dica ai, de como colocar um botãozinho.. ou ícone, semelhante ao Maximizar, minimizar.. na barra de título?? Obrigado! Thiago -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.8/714 - Release Date: 8/3/2007 10:58 [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Pool de Conexões - Delphi 7 + ZeosLib + PostgreSQL
On 3/8/07, José Mário Silva Guedes [EMAIL PROTECTED] wrote: Olá a todos! Amigos, estou precisando usar a técnica de Pool de Conexões nos meus aplicativos. Espero com isso otimizar o acesso ao banco de dados pois esse é um aspecto que está saindo caro para os meus sistemas. Gostaria das opniões dos colegas sobre o assunto bem como alguns cases de sucesso ou insucesso. Um forte abraço e bom código a todos, -- José Mário Silva Guedes Analista Programador Delphi Só por curiosidade. Quantos clientes tem no teu sistema simultaneamente? Quantas conexões o teu sistema abre? -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Saber Posição X e Y da linha selecionada no DBGrid
On 2/19/07, Renato Lorandi [EMAIL PROTECTED] wrote: use o evento onMouseUp dentro desse evento vc tem como pegar as coordenadas do mouse.. valeu. É uma opção. Mas não resolve meu problema porque se o usuário usar as setas do teclado para trocar qual o registro atual não vai chamar a procedure. Valeu. -- Leodinei Bielak http://leodinei.blogspot.com/ In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Utilização de classes
Apenas adicione a pasta onde estão os fontes no path do delphi. Ai é só adicionar na cláusula uses a unit que contém a classe. Declare uma variável do tipo que você quer e instancie ela manualmente Só isso. Saudações. On 2/16/07, Marcos P. M. de Souza [EMAIL PROTECTED] wrote: Boa tarde pessoal, Estive dando um olhada na imprementação de classes e vi e os componentes são na verdade um caso especial de classes. Existem variaos componetes na internet que vem com o código fonte junto. O q eu quero saber é se posso e como devo fazer para utilizar os códigos fonte desses componetes como se fossem classes ...nao como componentes instalados... Desse modo, no turbo delphi, poderia utilizar as classes de um componentes e utiliza-lo sem instalar.. Marcos P. M. de Souza www.mpsoftwares.com http://www.mpsoftwares.com/ [EMAIL PROTECTED]
Re: [delphi-br] Re: Como saber se o valor de um field foi alterado?
Ou tu pode tratar o Evento OnDataChange do Datasource. Ele recebe como parametro o Field que mudou. On 2/15/07, Murillo Proença [EMAIL PROTECTED] wrote: Fala aí Ricardo, aí vai: if (cds1.FieldByName('CAMPOX').Value cds1.FieldByName('CAMPOX').OldValue) then ShowMessage('campo alterado'); Abraço Murillo Proença
[delphi-br] Imprimir em Impressora na Rede
Olá. Tem alguma maneira que eu possa imprimir em uma impressora na rede usando nome da máquina + nome da impressora? Eu gostaria de criar um cadastro de impressoras na rede. Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Bloquear evento AfterScroll
Deve ter como você checar se o mouse está em cima de uma célula no DBgrid ou se está em outro lugar tu bloqueia. On 1/30/07, Alisson Yahoo [EMAIL PROTECTED] wrote: Eu não me expressei bem. Na verdade o que eu quero é que o dataset não mude de registro ao clicar na barra de rolagem, se clicar em uma linha não poderá ser bloqueado a mudança de registro. Se eu colocar o Abort no BeforeScroll vai travar tudo. no BeforeScroll, use Abort;
[delphi-br] Parâmetros opcionais de uma funcao
Olá pessoal. Tem como eu usar o nome de um parâmetros na hora de eu chamar uma função. Algo do tipo. function Funcao(Nome: string = ''; valor : Currency =0; qtde : Double:1); Funcao(valor=100, qtde=10); Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
[delphi-br] Action Toolbar Editável pelo usuário
Olá. Eu já vi um sistema que tinha a opção de mostrar o Editor de um ActionManager e permitia o usuário editar os icones da ActionToolbar. Alguém sabe como fazer isso? Tem outra maneira de permitir o usuário editar uma toolbar baseado em Actions? Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Action Toolbar Editável pelo usuário
Valeu. Era isso que eu queria mesmo. On 1/17/07, Vitor Luiz Redes [EMAIL PROTECTED] wrote: Tem um componente que chama customize dlg... na paleta Additional, você pode chamar o dialogo da sua aplicação e permitir que o usuário faça o que quiser, e salvar as configurações em um campo de um banco de dados, ou num arquivo ini mesmo... Dê uma olhada no componente. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] DBGRID mudando a mascara da coluna !!!
Eu faço o seguinte. Eu trato o evento OnGetText do campo da tabela. É só pegar o tamanho do campo ou o tipo (fisica, juridica) e aplicar a mascara que tu quiser. Você pega o valor do campo com Sender.Asstring e coloca o texto com a máscara na variável Text. T+ On 1/13/07, Leonardo Anselmo [EMAIL PROTECTED] wrote: Pessoal, Tenho um dbgrid com o campo CPF/CNPJ, os dados que estao no grid as vezes sao de pessoas fisicas (CPF) e as vezes de Pessoas Juridicas (CNPJ), o que eu estou tentando fazer eh que no momento que eu va descendo ou subindo a seta de navegacao ele va mudando a mascara de acordo com CPF ou CNPJ, ja tentei em varios eventos do DBGRID para colocar o codigo da mascara, mas nao tive sucesso, alguem poderia mim ajudar ?. Valeu Leonardo Anselmo
Re: [delphi-br] Como arredondar sempre para o primeiro inteiro superior
Tem a função Ceil da Unit Math. On 1/11/07, Paulo Sérgio Dias (GMail) [EMAIL PROTECTED] wrote: Pessoal: Existe alguma funcao pronta do Delphi (7 ou superior) que arredonde um valor decimal (real, extended, etc.) sempre para o valor inteiro mais proximo ? Por exemplo: 12,01 para 13 12,42 para 13 12,05 para 13 12,5para 13 12,9para 13 etc. Ou seja, no caso acima, se o valor e´ maior que 12, a funcao arredonda para 13, que e´ o primeiro numero inteiro maior que 12,xx. Se nao existir algo pronto, vou tentar criar uma rotina. Grato pela atencao de todos Paulo
Re: [delphi-br] Ordenação não funciona ??
Ei cara coloca um SQLMonitor(acho q é esse o nome) e ve qual é o sql que ele tá executando. On 1/6/07, Antonio Pires [EMAIL PROTECTED] wrote: tenho uma select para retornar os produtos mais comprados, a select é feita em uma view: SELECT CODIPROD, NOMEPROD, SUM(QTDAPROD) AS QTDA, SUM(TOTAPROD) AS TOTAL FROM MAISCOMPRADOS GROUP BY CODIPROD, NOMEPROD ORDER BY 3 DESC quando teste no ibexpert funcionou corretamente, retornando do produto mais comprada para o menos comprado. mas quando coloco no delphi, ela retorna do menos comprado para o mais comprado, é como se a opcao DESC não estivesse sendo reconhecida. testei no delphi 2005 e funcionou corretamente, mas preciso dela funcionando no delphi 7. utilizo o seguinte: DELPHI 7 sem nenhum update COMPONENTES DE ACESSO: SqlConnection SQLQuery DataSetProvider ClientDataSet Banco de Dados: FIREBIRD 1.5.2 espero que possam me ajudar Antonio Pires
Re: [delphi-br] Relatório com varias tabelas
Cara, acredito que este sql vai dentro de uma query, o quickreport vai apenas mostrar os dados. On 1/5/07, Joselito Côrtes [EMAIL PROTECTED] wrote: Pessoal é complicado usar este script no quickreport para um relatório? Alguém poderia me ajudar exemplificando como usaria no quickreport? Grato por qualquer ajuda.
Re: [delphi-br] Re: Delphi ainda compensa?
On 12/20/06, Walter Chagas (Yahoo) [EMAIL PROTECTED] wrote: José Henrique, Na verdade, todo e qualquer bom programador aprende qualquer linguagem em poucas horas, porque o que manda mesmo é a lógica. Eu aprendi C na escola e aprendi bem. Mas foi porque primeiro eu já sei lógica de programação de cór e salteado e depois, se você for observar bem, a sintaxe do C é muito parecida com a do Pascal. Mudam algumas coisas faceis de você decifrar. De C# pra C é pouca diferença também. Com a vantagem de você, aprendendo C#, estar aprendendo de tabela Java também, pois as duas linguagens são tão similares que você chega a pensar quem é quem. Embora que aprender a sintaxe de uma linguagem não seja tudo. Mesmo Java e C# sendo parecidos na sintaxe, a biblioteca padrão é complemente diferente. Sds.
Re: [delphi-br] Compara OnClick com NIL
Eu tentei com o componente também. Mas não funcionou. É estranho que eu consiga fazer o evento receber nil mas não comparar. On 12/7/06, Alcir - Listas [EMAIL PROTECTED] wrote: Faltou o componente. if Componente.OnClick = nil then t+ Alcir Leodinei Bielak escreveu: Olá. Tem como eu checar se o evento OnClick é nulo? Eu tentei if OnClick = nil then e está dando a mensagem de Not Enough Actual Parameters. Valeu -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Compara OnClick com NIL
Funcionou. Valeu. On 12/8/06, Elazar Dornelles Ceza [EMAIL PROTECTED] wrote: Pra isso voce pode usar o Assigned Ex. If Assigned(Button1.OnClick) then begin ... End; Aten Elazar
[delphi-br] Compara OnClick com NIL
Olá. Tem como eu checar se o evento OnClick é nulo? Eu tentei if OnClick = nil then e está dando a mensagem de Not Enough Actual Parameters. Valeu -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
Re: [SPAM] [delphi-br] Definir procedure para um evento usando código
Olá. Eu tentei declarar a procedure dentro de uma classe e ela recebe como parâmetro o Sender. Mas continua não aceitando. Dá como identificador não declarado. type TImpressora = class(TVDODmPrinter) public procedure novaLinha(Sender : TObject); private end; procedure TImpressora.novaLinha(Sender : TObject); var imp : TVDODmPrinter; begin imp := Sender as TVDODmPrinter; imp.Print(imp.CurrentLine, IntToStr(imp.CurrentLine) ); end; impressora.OnNewLine := impressora.novalinha; On 12/4/06, Douglas Uesato - Depto. de Informática [EMAIL PROTECTED] wrote: Leodinei, A sua procedure deverá ter o parâmetro (Sender: TObject), caso contrário não irá funcionar. Ex: Procedure TForm1.Teste(Sender: TObject); Begin ShowMessage('Olá!!!'); End; procedure TForm1.FormCreate(Sender: TObject); begin Button1.OnClick := Teste; end; Atenciosamente, Douglas Uesato [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Qual a melhor ferramenta para desenvolvimento WEB?
O mono tem um servidor de asp.net 1.0. Mas eu nunca usei, então não posso dizer se é bom ou ruim ou a compatibilidade com o código gerado pelo delphi. T+. On 12/4/06, fsfilho03 [EMAIL PROTECTED] wrote: Olá, Sei que este assunto já foi discutido na lista, porém, na minha situação específica, gostaria de algumas sujestões dos colegas que já desenvolveram soluções nesta área. Já tenho o sistema funcionando em rede, beleza. Desenvolvi usando Delphi 7 (Paleta interbase) e banco de dados firebird 1.0. Preciso agora disponibilizar alguns serviços via Web para o meu cliente. O banco de dados está hospedado em um servidor Linux. A princípio, pensei em 2 tecnologias: A) Intraweb - Usando o próprio Delphi 7; B) Asp.net - usando Delphi 2005 (ou 2006?) O fato do banco estar em um servidor linux impede a utilização do Asp.net ??? Intraweb é uma tecnologia adequada? Preciso manter meu sistema rodando. Desde já, agradeço.
[delphi-br] Definir procedure para um evento usando código
Olá. Eu estou querendo escrever uma procedure e conectá-la com o evento do meu objeto. Eu estou usando tu dentro de uma unit e o delphi não aceita. Dá a mensagem de que um é um method pointer e o outro regular procedure. A questão é como eu converto de um para o outro? Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
[delphi-br] Formatação de strings
Olá pessoal. O delphi tem funções para formatar strings, algo do tipo, passar uma string, um tamanho, alinhamento e ele retornar a string pronta? Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Formatação de strings
Valeu. On 12/1/06, Rubem Nascimento da Rocha [EMAIL PROTECTED] wrote: Vc pode conseguir isso usando opções especiais que podem ser inseridas na string de formatação passada à função Format(). Informe-se mais sobre isso no próprio help do Delphi, que é excelente. Procure por 'format strings'.
Re: [delphi-br] Re: Usar ou não usar DBWares? Eis a questão!
Isso seria legal. To curioso pra ver. Eu quero começar um projeto pessoal com o Turbo Delphi. Tem como usar isso com ele? On 11/29/06, Walter Chagas (Yahoo) [EMAIL PROTECTED] wrote: João, tá concordo que você tenha seus 10 anos de experiencia e comprovação de que sua metodologia seja tão eficiente como diz. Mas muitos aqui talvez não a conheçem e vamos mesmo de DBWares e Cia. E tão verdade isto é, que um aqui já postou uma pergunta do que vem a ser o Framework MVP que você tanto diz. Então que tal postar um exemplo funcional pra nós? Pode ser coisa básica mesmo. Assim poderemos ver se o mesmo é tão produtivo e eficiente como diz, pois nem eu conheço esta metodologia também. Confesso pra você. Numa boa :) []s
[delphi-br] Célula do DBGrid com caracteres em maiúsculo
Olá. Alguém sabe como deixar uma célula do dbgrid com os caracteres em maiúsculo? Como se fosse no edit. Valeu. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Traduzir ZEOSLIB
Olá. Para traduzir o Zeos é só na hora de compilar o Zeos alterar o arquivo Zeos.inc Trocar a linha: {$DEFINE ENGLISH} por {$DEFINE PORTUGUESE}; Valeu. On 11/11/06, Eduardo [EMAIL PROTECTED] wrote: O Zeos vem com os fontes, simule o erro e verifique as msg de erro q vc quer alterar. Eduardo Leodinei Bielak escreveu: Eu gostaria de traduzir as mensagens de erro. Para não precisar tratar uma a uma. Eu olhei os fontes e não vi nenhum com const no nome. Para traduzir igual os arquivos do delphi. On 11/10/06, Eduardo [EMAIL PROTECTED]ecastroa_edu%40yahoo.com.br mailto:ecastroa_edu%40yahoo.com.br wrote: O Zeos vem com os fontes, mas o q exatamente vc quer traduzir ??? Eduardo Leodinei Bielak escreveu: [As partes desta mensagem que não continham texto foram removidas] ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Mostrar número da linha no dbGrid
Olá. Alguém sabe como eu faço pra mostrar o número da linha do dbGrid em uma coluna. Sem precisar depender do número da linha no dataset? Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Função que retorna array
Calma galera. Tem como retornar o array dinâmico, basta declarar o array como um tipo e depois declarar o retorno da função daquele tipo. E usar o SetLength no Result. Valeu. On 11/6/06, Henrique Netzka (Vetor Sistemas) [EMAIL PROTECTED] wrote: Leodinei, Você não pode criar um Result como array, mas pode passar um parâmetro variável como tal. procedure GeraArray(var Vetor: array...); Henrique - Original Message - From: Leodinei Bielak To: delphi-br Sent: Monday, November 06, 2006 9:35 AM Subject: [delphi-br] Função que retorna array Olá pessoal. Eu quero fazer uma função que retorna um array com o valor das parcelas. De preferência uma array dinâmico. Mas o delphi diz que eu não posso declarar como retorno um array. E se eu eu crio um tipo a partir de um array e defino o retorno da função desde tipo ocorre um erro de runtime. Se alguém puder em ajudar. Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Mostrar número da linha no dbGrid
OK. On 11/7/06, Gabriel Filho [EMAIL PROTECTED] wrote: crie um campo calculado do tipo inteiro, e no Oncalcfields da tabela ou query coloque isso campo.value = tabela.recno; 2006/11/7, Leodinei Bielak [EMAIL PROTECTED]: Olá. Alguém sabe como eu faço pra mostrar o número da linha do dbGrid em uma coluna. Sem precisar depender do número da linha no dataset? Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Link para Base de Dados CEP 2006
Sem querer ser chato. Mas tem algum problema legal de usar esta base? Valeu. On 11/6/06, Omar Marques [EMAIL PROTECTED] wrote: Olá Daniel, Valeu mesmo esta força ai. Tenho sistemas que usam base de CEP e a minha de fato já estava desatualizada faz uns 3 anos. Muito Tks. ;) Fui [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
[delphi-br] Função que retorna array
Olá pessoal. Eu quero fazer uma função que retorna um array com o valor das parcelas. De preferência uma array dinâmico. Mas o delphi diz que eu não posso declarar como retorno um array. E se eu eu crio um tipo a partir de um array e defino o retorno da função desde tipo ocorre um erro de runtime. Se alguém puder em ajudar. Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Duvida Simples
Cara, tu tá criando os SQL das tabelas no braço ou usando algum programa Eu uso o EMS e ele cria o nome dos campos entre aspas. Isso faz com que o banco diferencie entre maiúsculas e minúsculas. Pode ser isso que está acontecendo contigo. T+ On 11/6/06, Campus [EMAIL PROTECTED] wrote: é por causa disso, se tu passar para maiúsculo funciona. Quase desisti do FB até descobrir. Estava fazendo uns testes com Zeos + FB. Só funcionou quando criei a base com o nome das tabelas em maúsculas. [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] Função que retorna array
Realmente isso funciona. Eu tinha tentado e estava dando erro. Mas depois eu descobri que era outro erro na minha unit. Valeu. On 11/6/06, Eduardo [EMAIL PROTECTED] wrote: Voce tera que criar um tipo. Type TMeuTipo : Array of String; function Teste : TMeuTipo; begin SetLength(Result, Tamanho); Faca ... end; Eduardo [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
[delphi-br] Comando de criar Form muito lento.
Olá pessoal. Minha aplicação MDI está demorando muito para criar os formulários em outras máquinas. Eu pensei que era pra abrir as tabelas. Mas eu desabilitei todas e abro em tempo de execução e cronometrei. O tempo está muito pequeno. Ele está demorando entre eu dar o comando de criar o form e começar a abrir as tabelas no evento OnCreate do form. Alguém pode me dar alguma dica do porque? Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Comando de criar Form muito lento.
Nada. Apenas o comando de abrir as tabelas. Uma solução q diminui consideravelmente foi desabilitar o debug na hora de compilar. Isso baixou um tempo de mais de um minuto pra poucos segundos. Só não entendo porque isso não acontece no pc local. Valeu. On 11/3/06, Gabriel Filho [EMAIL PROTECTED] wrote: oq mais tem o oncreate desse form? 2006/11/3, Leodinei Bielak [EMAIL PROTECTED]: Olá pessoal. Minha aplicação MDI está demorando muito para criar os formulários em outras máquinas. Eu pensei que era pra abrir as tabelas. Mas eu desabilitei todas e abro em tempo de execução e cronometrei. O tempo está muito pequeno. Ele está demorando entre eu dar o comando de criar o form e começar a abrir as tabelas no evento OnCreate do form. Alguém pode me dar alguma dica do porque? Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Re: Salários
Tu se referece ao significado? Se for é que são diferentes níveis de experiência na área. Segundo esse link: http://www.rhinfo.com.br/sal-ti.htm#s-um é o seguinte: . junior - de 6 meses a 2 anos de experiência na função ou na tecnologia . pleno - 2 a 4 anos de experiência na função ou na tecnologia . senior - acima de 4 anos de experiência na função ou na tecnologia On 10/29/06, blcksun954 [EMAIL PROTECTED] wrote: Eu segui o link e agora fiquei curioso: qual a diferença entre programador e analista-programador, ofra o salário(que não aparecia pra programador)? E qual a diferença entre analista-programador júnior, senior e pleno? --- Em delphi-br@yahoogrupos.com.br, Gabriel Filho [EMAIL PROTECTED] escreveu pra vc ter uma base http://www.rhinfo.com.br/sal-ti.htm 2006/10/28, Leodinei Bielak [EMAIL PROTECTED]: Olá pessoal. Eu gostaria de saber como anda a faixa salarial dos programadores delphi. Creio que este seja um assunto que interresa a bastante gente. :) Se alguém puder me passar esta informação. Eu sei que varia por região, esperiência, empresa, etc. Mas gostaria de ter uma idéia pra cada tipo: Junior, Pleno e Sênior. Valeu. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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
[delphi-br] Salários
Olá pessoal. Eu gostaria de saber como anda a faixa salarial dos programadores delphi. Creio que este seja um assunto que interresa a bastante gente. :) Se alguém puder me passar esta informação. Eu sei que varia por região, esperiência, empresa, etc. Mas gostaria de ter uma idéia pra cada tipo: Junior, Pleno e Sênior. Valeu. [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
[delphi-br] Sql Injection
Olá pessoal. Vocês sabem se o delphi toma alguma precaução contra SQL Injection? Eu estou usando o ZeosLib e passando parâmetros. Os testes que eu fiz que deveriam funcionar pois eu não estava tratando os dados não deram resultado. Será que o delphi está colocando os caracter de escape antes das aspas? Tem alguma maneira de eu pegar o sql que vai ser executado? Onde aparece o sql todo, eu só consigo pegar o sql onde aparece o nome dos parâmetros. Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Campo Chave no ClientDataset
Cria um índice com o campo que você quer que seja chave e nas propriedados do campo em Provider Flags define como chave. On 10/18/06, ailton Branco [EMAIL PROTECTED] wrote: Criei uma tabela tamporaria com um ClientDataset, e gostaria de testar se um determinado codigo já existe cadastrado na tabela temporaria, isto é antes de gravar beforpost gostaria de testar de o valor ja existe, ou criar algo tipo uma chave na minha tabela temporaria. agradeço a antecipadamente a ajuda. delphi-br@yahoogrupos.com.br [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
[delphi-br] Inserir componentes dentro de dbgrid
Olá galera. Alguém pode me indicar algum link de como colocar dentro de determinadas colunas do dbgrid um botao, checkbox e outros componentes? Tem algo pronto na internet que permita fazer isso? Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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
[delphi-br] String para carácter
Olá pessoal. Eu estou com uma dúvida que pode ser algo simples. Como eu converto uma string de um carácter em uma váriavel do tipo char? Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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
[delphi-br] Consulta SQL em páginas
Olá pessoal. Eu tenho uma tabela de produtos muito grande, algo próximo de 2 linhas. Eu gostaria de saber se tem como eu navegar pelo select como se fosse páginas de tantas linhas. Por exemplo, buscas as primeiras 50 linhas, as próximas 50, poder voltar para a página anterior. Eu estou usando o Zeoslib. Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] ClienteDataset com campo aggregate
Finalmente descobri a causa do problema. Embora ainda não tenha entendido o porquê. Eu criei o campo aggregate no editor de campos do dataset, como eu já havia feito outras vezes e funcionava. Desta vez para funcionar eu tive que criar na propriedade aggregates do dataset, que aparece no object inpector. Alguém sabe o porquê desta diferença? Valeu. On 10/9/06, Bruno Lichot [EMAIL PROTECTED] wrote: vc habilitou a propriedade aggregates active ? e a propriedade active do campo agregate q vc criou? lembre-se q se vc naum estiver usando oaggregates, desabilite-o pois consome mais recurso de processamento abração Leodinei Bielak escreveu: Olá pessoal. Estou com o seguinte problema. Eu criei um ClienteDataset no delphi7, ele tem um campo valor e um campo aggregate total que seria a soma de todos os valores: sum(valor). O problema é que quando eu tento acessar o valor do campo aparece a mensagem: Não é possível acessar o campo Total do tipo float. O dataset está configurado para calcular os campos aggregate, o campo total está habilitado e visível. E tem um índice para o campo valor. Se alguém puder me ajudar eu agradeceria muito. Obrigado. -- -- []´s Bruno Lichot -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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
[delphi-br] ClienteDataset com campo aggregate
Olá pessoal. Estou com o seguinte problema. Eu criei um ClienteDataset no delphi7, ele tem um campo valor e um campo aggregate total que seria a soma de todos os valores: sum(valor). O problema é que quando eu tento acessar o valor do campo aparece a mensagem: Não é possível acessar o campo Total do tipo float. O dataset está configurado para calcular os campos aggregate, o campo total está habilitado e visível. E tem um índice para o campo valor. Se alguém puder me ajudar eu agradeceria muito. Obrigado. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Arrastar formulário pela tela
On 10/8/06, henrique_filet [EMAIL PROTECTED] wrote: Caros colegas da lista, como faço para evitar que o usuário do meu sistema arraste o form principal pela tela...meu form tem q ficar sempre com left 0 e top 0. Entao, se o usuario manter pressionado o mouse sobre a barra de titulo do form e arrastá-lo, essa ação deve ser bloqueada pelo meu sistema...como devo proceder isso?? Aguardo retorno... Obrigado Sérgio Você tem que trabalhar com as mensagens do windows. Insira esta procedure no seu formulário. procedure WMNCHITTEST(var M : TWMNCHitTest); message WM_NCHITTEST; e o seguinte código na implementação: procedure TfrmDevedores.WMNCHITTEST(var M: TWMNCHitTest); begin M.Result := 0; end; T+ -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Re: Arrastar formulário pela tela
Realmente não sei. Teoricamente você poderia testar se o click foi no menu ou na barra de título. Mas nos tests que eu fiz não funcionaram. Dá uma olhada ness página. Tem a documentação desta mensagem: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/mouseinput/mouseinputreference/mouseinputmessages/wm_nchittest.asp On 10/8/06, henrique_filet [EMAIL PROTECTED] wrote: Caro Leodinei, Obrigado pela ajuda cara. Teóricamente, era exatamente isso que eu precisava,porém, tenho um MENUBAR na minha aplicacao que, após implementado o codigo por ti informado, este ficou desabilitado, não permitindo acessar os menus do sistema... Como procedo para corrigir esta incoerência?? Aguardo retorno. Sérgio --- Em delphi-br@yahoogrupos.com.br, Leodinei Bielak [EMAIL PROTECTED] escreveu On 10/8/06, henrique_filet [EMAIL PROTECTED] wrote: Caros colegas da lista, como faço para evitar que o usuário do meu sistema arraste o form principal pela tela...meu form tem q ficar sempre com left 0 e top 0. Entao, se o usuario manter pressionado o mouse sobre a barra de titulo do form e arrastá-lo, essa ação deve ser bloqueada pelo meu sistema...como devo proceder isso?? Aguardo retorno... Obrigado Sérgio Você tem que trabalhar com as mensagens do windows. Insira esta procedure no seu formulário. procedure WMNCHITTEST(var M : TWMNCHitTest); message WM_NCHITTEST; e o seguinte código na implementação: procedure TfrmDevedores.WMNCHITTEST(var M: TWMNCHitTest); begin M.Result := 0; end; T+ -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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
[delphi-br] Re: Hash Table
Obrigado pelas respostas. A solução do Rubem funciona perfeitamente. On 10/7/06, blcksun954 [EMAIL PROTECTED] wrote: No Delphi5 eu costumo usar duas TStringList, uma para as chaves e uma para os valores, tendo o cuidado de garantir que os indíces correspondam. Assim: i := StringList1.IndexOf('AM'); estado := StringList2.Strings[i]; Mas se houver um modo melhor eu gostaria de saber. --- Em delphi-br@yahoogrupos.com.br, Leodinei Bielak [EMAIL PROTECTED] escreveu Olá galera, alguém sabe como eu faço pra usar no delphi 7 um Hash Table ou Dicionário? Eu gostaria de criar um no formato sigla : estado. 'AC' : 'Acre' 'AM' : 'Amazonas' Etc. Valeu. [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
[delphi-br] Hash Table
Olá galera, alguém sabe como eu faço pra usar no delphi 7 um Hash Table ou Dicionário? Eu gostaria de criar um no formato sigla : estado. 'AC' : 'Acre' 'AM' : 'Amazonas' Etc. Valeu. [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
[delphi-br] Janelas de mensagem padrão do windows
Olá galera. Alguém pode me dizer qual é o tipo das janelas de mensagem do delphi? Aquelas que aparecem quando ocorre alguma exceção, tipo quando um valor é digitado errado no maskedit. Valeu. -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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] Relatórios no Turbo Delphi
Pelo que eu vi das respostas relatórios só no Professional, no free não tem como gerar? On 9/27/06, Andreano Lanusse [EMAIL PROTECTED] wrote: Vai ser mais que uma palestra, vai ser um MINI-CURSO From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Bruno Lichot Sent: Wednesday, September 27, 2006 2:14 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Relatórios no Turbo Delphi Só para lembrar que no BorCon deste ano vai ter uma palestra muito boa de Fortes Report!!! http://info.borland.com.br/borcon/ As ordens Abraços Bruno Lichot Bruno Lichot escreveu: vc pode instalar qualquer componente de terceiros na professional com tanto que seja compativel com a versao, o fortes q vc precisa tem que ser referente a versao do BDS 2006 para vcl win32, se não me engano vc o encontra no sourceforge abração Marcio William escreveu: Tem como instalar o FORTES na professional ? Qual seria a versao ? Onde baixar ? Marcio William - Original Message - From: Andreano Lanusse To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 27, 2006 11:18 AM Subject: RE: [delphi-br] Relatórios no Turbo Delphi No Turbo Delphi Professional From: delphi-br@yahoogrupos.com.br [mailto: [EMAIL PROTECTED] On Behalf Of Bruno Lichot Sent: Wednesday, September 27, 2006 10:45 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Relatórios no Turbo Delphi Rave Reports Leodinei Bielak escreveu: Mais uma dúvida sobre o Turbo Delphi. Tem algum componente/ferramenta pra gerar relatórios nele? [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1.1778 (20060927) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br -- -- []´s Bruno Lichot [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1.1778 (20060927) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br -- -- []´s Bruno Lichot [As partes desta mensagem que não continham texto foram removidas] -- Leodinei Bielak Civilization had too many rules for me, so I did my best to rewrite them. _Bill Cosby_ [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
[delphi-br] Relatórios no Turbo Delphi
Mais uma dúvida sobre o Turbo Delphi. Tem algum componente/ferramenta pra gerar relatórios nele? [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