Sim, é possivel.
Nem precisa procurar no google, o help do delphi tem alguns exemplos
bons. =)
Procure por TMenu, TMenu.Item.
Abraços e Sucesso!
Ricardo
--- Em delphi-br@yahoogrupos.com.br, "pelebr" <[EMAIL PROTECTED]> escreveu
>
> como faco para ativar um menu da aplicacao via codigo pro
O que voce precisa é referenciar um ponteiro de memoria a classe do
objeto, nao a classe ancestral.
var
zForm: ^TForm1;
begin
zForm:= Addr(TForm1);
if Assigned(zForm) then
zForm.Caption:= 'Este é meu novo caption'
else
zForm:= nil; //é bom sempre limpar o que nao usa mais :)
Fir
O que voce precisa é referenciar um ponteiro de memoria. Mas ao
objeto, nao a classe.
var
zForm: ^TForm1;
begin
zForm:= Addr(Form1);
zForm.Caption:= 'Meu caption mudou';
Firmeza?
Abraços e Sucesso!
Ricardo
--- Em delphi-br@yahoogrupos.com.br, "Leandro" <[EMAIL PROTECTED]>
Nao entendi bem,
mas parece que voce esta fechando, mas nao liberando a variavel
Tela_Cadastro_Credor da memoria
Tente:
Tela_Cadastro_Credor := nil; //apos o close
E, no OnClose do form, colocar:
action: caFree;
Abraços e Sucesso!
Ricardo
--- Em delphi-br@yahoogrupos.com.br, "l_o_ange
Heheheeheh... Familia é familia =)
Eu tentei fazer o mesmo para minha filha.
Mas eu usei shapes e, contendo o handle de cada um era mais fácil
pintar.
Também, para salvar a figura, criei um novo tipo de arquivo que
incluia a coordenada e cor de cada shape.
O desenho era um emaranhado de shapes u
Wesley,
crie uma procedure com os mesmos parametros do OnExit do StringGrid.
Em tempo de execucao use
MinhaStringGrid.OnExit := MinhaProcedure;
Abracos
Ricardo
Obrigado pelas respostas, pessoal.
Vou seguir os conselhos e ver se consigo implementá-lo aqui.
Abraços
Ricardo
Ola, colegas...
Estou precisando implementar o SINTEGRA em meu sistema, mas nao tenho
ideia de como faze-lo.
Sei que o sintegra é um arquivo com posiçoes padronizadas de cada dado
a ser inserido.
Vi que existe um projeto facilitando o trabalho
(www.projetosultan.org), mas para fazer o download é
Gesse,
no OnClose de seu formulario filho, use:
Action:= caFree;
e se voce instanciou-o em uma variavel, nao esqueça de "limpá-la":
frmFilho:= nil;
Abracos
Ricardo
--- Em delphi-br@yahoogrupos.com.br, "Gesse Barros" <[EMAIL PROTECTED]>
escreveu
>
> Ola pessoal
> Sou novo na lista
a
> > > impressora, ou ligue para o fabricantevou ver se encontro
nos meus
> > > backup antigos e qq coisa te aviso...
> > >
> > > -Mensagem original-
> > > De: delphi-br@yahoogrupos.com.br
> > <mailto:delphi-br%40y
Ola, colegas!
Estou precisando imprimir em uma impressora de cheques (Chronos).
Alguém sabe como eu faço para conectar em uma impressora desse tipo?
A impressão é feita do mesmo modo que as matriciais?
E se nessas impressoras também uso códigos de impressão
(comprimido/expandido,etc)?
Grato pel
Obrigado pela rápida ajuda.
Esse código faz parte da unit frxPrinter do FastReport.
Está me dando erro justamente nessa linha, travando inclusive minha IDE.
Tentei utilizar AllocMem, sem sucesso.
Não tenho certeza se pode ser a impressora virtual ou se há falha em
minha memória física.
Att
Ricard
Não sei se ajuda, mas já tentou usar o MadException para ver se ele
pega o erro?
Eu uso o MDO e até agora não me deu (grandes) problemas. :)
Abracos
Ricardo
Talvez, se você criar uma função que encontra url em um texto, poderia
utilizar o evento OnDrawCell para verificar se o conteúdo possui uma
url válida.
Abraços
Ricardo
Ola, colegas.
Meu programa esta travando após o uso da procedure GetMem. Se eu
estiver rodando o aplicativo pelo Delphi, tenho que fechá-lo pelo
gerenciador do windows.
O código em questão tenta enumerar as impressoras do sistema, eu
tenho 2 impressoras virtuais (easypdf, novapdf).
O código
De uma olhada no www.rogercom.com/
Espero que ajude
Ricardo
produto.
Obrigado
Celio Ricardo
[EMAIL PROTECTED]
Putz...
A ânsia de ajudar é tão grande que não percebi que a mensagem é antiga.
Desculpa, pessoal
Eita erva danada!
Ricardo.
--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messag
Octávio,
Dê uma procurada no sourceforge.net.
Ricardo.
--
< 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 PROT
Licério,
Na minha opnião, você nao deveria permitir a deleção de dados
sensíveis aos resultados do programa, você perde a consistência do
resultado; Ou, antes de deletar, gravar esses dados em outra tabela
para seu programa poder calculá-lo.
Ricardo.
--
< FAVOR REMOVER ESTA PARTE AO RESP
Obrigado, Braytiner...
Vou testa-lo.
--
< 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
Salve, lista...
Estou precisando de um componente que gere um codigo para ativar
o meu software.
Eu instalo o sistema e o cliente tem 1 mes para experimenta-lo,
apos isso, de mes em mes, ele precisa pagar uma mensalidade para
continuar utilizando.
Ha algum tempo eu vi um componente que fazia isso,
texto fiscal para cada
REDUCAO com a soma total dos respectivos icms e reducao...
Por exemplo:
Aliquota: 0 7
Base Calculo: 157,6916,80
ICMS: 0,00 1,17
Alguem que ja implementou isso poderia me dar uma dica?
Celio Ricardo
--
<<<<< FAV
Use a funcao ColorToRGB (color: Tcolor),pois as cores no Windows sao
no padrao RGB
--- Em delphi-br@yahoogrupos.com.br, "Softbyte Sistemas"
<[EMAIL PROTECTED]> escreveu
> ja tive esse tipo de prob...acho q naum tem jeito...é a praga do XP
>
>
>
> - Original Message -
> From: "Murill
Amigos, li sobre alguns geradores de codigo (Genexus, X-Maker) e
gostaria de saber se vale a pena trabalhar com eles para gerar um
aplicativo comercial.
Eles realmente aceleram o trabalho ou é daqueles aplicativos onde voce
peerde 6 meses para dominá-lo e depois descobrir que nao valiam a pena?
Tenta este codigo, em algum botao para desabilitar
a insercao de dados =
DBGrid.ReadOnly := True;
--
< 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 mode
Voce esta criando formularios dinamicos?
Caso positivo, esta passando nil como owner na propriedade Create e
"NILando" da memoria ?
Tenta desinstanciar, no OnClose com
FreeAndNil (frmMeuFormulario);
--- Em delphi-br@yahoogrupos.com.br, "Aldinei Simoes"
<[EMAIL PROTECTED]> escreveu
>
> Ola p
Eu estava com a mesma duvida sobre o Rave.
Queria imprimir relatorios em matricial e nao sabia qual componente usar.
Estou usando o Fortes Report (gratuito), vem com o filtro Draft que,
para mim, funcionou bem.
--- Em delphi-br@yahoogrupos.com.br, "Cristiano Rodrigo Gomes"
<[EMAIL PROTECTED]> es
Nao é minha intencao gerar polemica, mesmo porque todos aqui temos um
interesse em comum = ampliar conhecimentos e discutir sobre essa
fabulosa ferramenta : 'O Delphi'.
Eu nao tenho vizinhos, amigos, colegas para perguntar, trocar ideias,
falar.. em Delphi. Meus amigos de Delphi sao voces e outros
Bom, na teoria seria quanto de memoria sua maquina tem,
mas na pratica, nao tenho certeza, como ele usa um numero inteiro na
propriedade lines, acho que deva ser a capacidade de um numero inteiro.
--- Em delphi-br@yahoogrupos.com.br, Rogério <[EMAIL PROTECTED]>
escreveu
> Pessoal,
> Alguém sabe q
Valeu, Bruno...
Era isso mesmo que eu precisava =)
--- Em delphi-br@yahoogrupos.com.br, [EMAIL PROTECTED] escreveu
>
> Há sim.. vc deve cirar um indice com o metodo addindex, e configurar
esse
> indice como unico, os parametros desse metodo vc encontra no help.
em seguida
> invoque o metodo cl
Aqui tem bastante material para lhe ajudar =)
http://www.firebase.com.br/cgi-bin/firebase.cgi/artigos
--- Em delphi-br@yahoogrupos.com.br, "dionatanhenrique"
<[EMAIL PROTECTED]> escreveu
> pessoal uso atualmente tabela em Paradox, gostaria de usar interbase ou
> Firebird, laguem tem algumas dica
Preciso fazer um relatorio de cobranca onde, dependendo da busca do
cliente, vai conter as cobrancas que estao em aberto.
Como é o cliente que vai montar quais cobrancas vencidas serao
impressas, pensei em usar um TClientDataSet, onde vai guardar os dados
para montar o relatorio de impressao.
O p
epois da gravação o certo seria antes.
> Sem mais.
> Madsom.
> -Mensagem original-
> De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
> nome de Celio Ricardo
> Enviada em: segunda-feira, 10 de outubro de 2005 18:00
> Para: delphi-br@yahoogrupos.com
>
>
> --- Em delphi-br@yahoogrupos.com.br, "Eduardo" <[EMAIL PROTECTED]>
> escreveu
> > (Components[i] as TLabeledDBEdit).OnMouseMove := SetCursorLabel
> >
> > Só isso.
> >
> > Eduardo
> >
> >
> > -Mensagem
Elazar, obrigado por responder.
Eu mudei o position para ver se funcionava.
Nao funciona de forma nenhuma, estou desconfiado que, talvez,
meu FB precise de alguma configuracao de acesso para poder executar
triggers (os campos que sao autocalculados funcionam).
Se puder ajudar, agradeco...
---
Estou tentando criar triggers no FB, sem sucesso.
Estou utilizando o EMS IBMANAGER para cria-los.
Fiz esse trigger, que é o único no evento afterinsert da tabela
ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
Os
Estou montando um sistema de digitacao de relatorios, onde duas
tabelas estao relacionadas (NOTASAIDA e ITEMSAIDA) pelo numero do pedido.
Preciso fazer rotinas de inclusao, visualizacao e delecao dos arquivos
digitados, mas nao tenho experiencia com Firebird.
Posso criar STORED PROCEDURES para ap
ehehehe... Tenta debugar o seu aplicativo e veja quantas instrucoes
sao passadas ao redimensionar um simples formulario.
Na minha opniao, skins sao rapidos para aplicacoes pequenas ou onde
voce possa customizar o skin, utilizando o que voce apenas vai usar.
--- Em delphi-br@yahoogrupos.com.br, Fr
Nao tem como voce carregar a localizacao de um arquivo .ini? Ou
utilizar o arquivo LMHOST em %windir% ?
--- Em delphi-br@yahoogrupos.com.br, "<>" <[EMAIL PROTECTED]> escreveu
> Salve Todos,
>
>
>
> Perdoe a santa ignorância.
>
> Preciso de ajuda para parametrizar a conexão do banco de dados n
DataSet.FieldByName('CAMPO').AsString
--- Em delphi-br@yahoogrupos.com.br, "Adriano ( Micro center )"
<[EMAIL PROTECTED]> escreveu
> Olá Pessoal ,
>
> Bom eu estou quebrando a cabeção e ainda não consegui nada
>
> Gostaria de saber se alguém sabe como posso capturar os campos de um
dbgrid.
A nao ser que a aplicacao mande uma mensagem personalizada, em
broadcasting, e espere o servidor retornar (funcionaria somente em
rede classe C). Ou entao, espere o cliente te ligar e COBRE pela
visita (a gente precisa sobreviver, ne?)
--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENS
Ja resolvi, colegas!!!
Mas para quem tambem estiver tendo esse problema, a solucao é pegar o
package do componente que se deseja instalar e adicionar a
designide.dcp . Só compilar e resolvido.
Para ler o artigo explicando isso =
http://community.borland.com/article/0,1410,27717,00.html
--
<<
Estou usando o Delphi7 e ao utilizar a unit DesignEditor, ela pede a
unit proxies.dcu ( que nao veio em meu delphi =/ ).
Sera que alguem tem pra me "emprestar" ? =)))
--
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
Para ver as mensagens antigas, acesse:
http://br.groups.ya
Utilize a funcao Pos (unit system), retornara a posicao da substring
ou zero se nao encontrar.
--- Em delphi-br@yahoogrupos.com.br, "Luciano" <[EMAIL PROTECTED]> escreveu
> Pessoal estou com o seguinte problema
>
> Estou fazendo importação de um arquivo para outro e um dos campos é
campo memo. E
Utilize a mascara no evento OnGetText do campo que se deseja formatar.
--- Em delphi-br@yahoogrupos.com.br, "fernandoaldrighi"
<[EMAIL PROTECTED]> escreveu
> Pessoal como colocar mascara em DBGRID,
> quando este é preenchido de dados
> via SQL em tempo de execucao ?
>
> Sei que tem esta forma:
>
Veja se esta dica te ajuda =)
http://www.firebase.com.br/cgi-bin/firebase.cgi/dica?ID=40
--- Em delphi-br@yahoogrupos.com.br, "Paulo Dias de Souza"
<[EMAIL PROTECTED]> escreveu
>
> Firebird 1.5, Delphi 7, Componentes IB.
>
> Bom dia Pessoal,
>
> Alguem sabe me dizer porque o meus numeros estã
Tenho um Label que desejo mudar o cursor quando o usuario mover sobre
ele.
Sei que devo usar o evento OnMouseMove e que para associar este evento
a um procedimento criado por mim, eu devo criar uma procedure com os
mesmos parametros (Sender,TShiftSate,x,y).
Mas como, em tempo de execução, eu dev
Se voce ja sabe fazer operacoes basicas no banco de dados
(inclusao,exclusao,alteracao,consulta), provavelmente voce ja sabe
logica de programacao visual, entao voce ja trilhou metade do caminho.
Rascunhe em um papel quais informacoes voce vai precisar guardar no
BD. Nao fique pensando "e se...",
Os comandos do dataset estao corretos, talvez seja no comando do
trigger que esteja faltando algo.
Veja esse, e muitos outros, exemplos em
http://www.firebird.com.br/articles.php?id=17
Ha um exemplo de um Trigger (gatilho) para ser executado ANTES de uma
inserção ao FB.
Antes de fazer/adaptar seu
Aqui na lista, ha um tempo atras, foi discutido isso.
Procure nas mensagens anteriores que deve ter o que voce procura =)
sds
Celio Ricardo
--- Em delphi-br@yahoogrupos.com.br, "tmbarcelos" <[EMAIL PROTECTED]>
escreveu
> Quero criar a serial do meu programa através da serial
Tambem estou aprendendo Firebird, mas
veja no help do Firebird
os comandos:
*Commit ou CommitRetaining (grava e fecha o dataset ou grava e nao
fecha)
*Rollback ou RollbackRetaining (desfaz gravacoes caso haja erro)
Lembre-se que voce precisa de um objeto Transaction para cada dataset.
--- Em
Provavelmente, para melhorar a performance, foi desabilitado o
"automatic garbage collection". Faca um backup/restore de tempos em
tempos, para eliminar o lixo, e sua base de dados ficara mais rapida
--- Em delphi-br@yahoogrupos.com.br, "queirozjuniorjr"
<[EMAIL PROTECTED]> escreveu
> Tenho um p
Realmente a verificacao de CRC e a checagem em varias partes do codigo
dificultaria mais a ativacao do programa.
Eu nao me aventuro, por enquanto, a explorar mais esse campo por nao
ter a competencia necessaria para a funcao. Mas continuarei estudando
a respeito =)
--
< FAVOR REMOVER ESTA
no evento do botao incluir,
verifique se o componente ja esta em "modo de insercao"
if not (DataSet.State in [dsInsert] then
DataSet.Insert;
para gravar na tabela utilize DataSet.ApplyUpdates;
para gravar fisicamente, em paradox, utilize
DbiSaveChanges(DataSet.Handle);
--- Em delphi-br@yahoog
55 matches
Mail list logo
