Re: RES: [delphi-br] Fazer aplicação inicial izar com o Windows

2005-10-10 Por tôpico Jeferson Adoryan
Use o Inno Setup para gerar teu install, que ele faz isso... Uma porem, se tua aplicacao usa arquivos ou alguma informacao do diretorio que esta rodando, ela nao vai funcionar pq nao encontra a pasta de trabalho, para resolver crie um atalho na pasta da aplicacao para teu executavel e coloque o

[delphi-br] OFF: Sugestão de Livro

2005-10-10 Por tôpico Álvaro Vieira
Pessoal, Alguém que conheça o livro abaixo, poderia me dizer se vale a pena comprá-lo? Indicam algum outro? METODOLOGIA E PROJETO DE SOFTWARE ORIENTADOS A OBJETOS ALEX DE ARAÚJO SILVA, CARLOS FRANCISCO GOMIDE, FÁBIO PETRILLO Editora: ÉRICA Grato. -- Álvaro Vieira [EMAIL PROTECTED] -- FAVOR

[delphi-br] pegando todos os forms da aplicação

2005-10-10 Por tôpico Luis Lopes
Pessoal, Estou desenvolvendo uma aplicação onde tenho que gravar no banco o form (nome e caption) com todos os seus repectivos objetos visuais (nome e caption). Quero fazer isso de forma automática, tipo assim: uma procedure que descubra quais forms podem ser criados pela aplicação. Assim

[delphi-br] Testar diretorio com IdFTP

2005-10-10 Por tôpico troliveira_net
Pessoal, estou utilizando o componente idFTP da Indy para fazer o upload de um arquivo para o server. Só que preciso testar se um diretório existe. Tentei DirectoryExists mas isso testa apenas um diretório local, e não remoto. Outra dúvida que tenho também é como enviar um CHMOD para um arquivo

Re: [delphi-br] Problema com Access Violation address

2005-10-10 Por tôpico Anderson
Coloque no botao que esta chamando o formulario: if form1 = nill then form1 := form1.create(self) Anderson Rio Claro-SP - Original Message - From: klausbento To: delphi-br@yahoogrupos.com.br Sent: Saturday, October 08, 2005 3:39 PM Subject: [delphi-br] Problema com Access

[delphi-br] Reconhecer CTRL+F

2005-10-10 Por tôpico Leandro
Pessoal, Preciso saber qdo o usuario teclar CTRL+F em um grid, mas o seguinte codigo nao funciona (no evento KeyDown). if (ssCtrl in Shift) and (Key = Ord('F')) then begin //codigo aqui end; A variavel key vem com um valor que nao tem nada a ver com 'F'. Eu teria que fazer isso em outro

Re: [delphi-br] Reconhecer CTRL+F

2005-10-10 Por tôpico O2 Tecnologia em Sistemas
Adicione um popmenu, atrele-o ao Grid, e item dele coloque os HotKeys que deseja. Leandro escreveu: Pessoal, Preciso saber qdo o usuario teclar CTRL+F em um grid, mas o seguinte codigo nao funciona (no evento KeyDown). if (ssCtrl in Shift) and (Key = Ord('F')) then begin //codigo

[delphi-br] programa cartão de ponto!

2005-10-10 Por tôpico danielromabr
ola necessito fazer um programa para cartão de ponto: alguem tem algunm exemplo em object pascal? ou tem algum exemplo em sites? pode ser até em outra linguagem, não tem problema, pois vou ter que desenvolvê-lo em, java muito obrigado pela ajuda -- FAVOR REMOVER ESTA PARTE AO RESPONDER

[delphi-br] Compactador rapido

2005-10-10 Por tôpico yagrool
Olá amigos... Por exemplo, suponhamos que eu tenha um arquivo que em hexadecimal ficaria aki: 23 34 23 53 54 34 34 34 34 FE 56 67 FF FF FF FF FF FF FF 54 34 10 02 00 00 00 00 00 00 34 34 34 34 34 34 34 34 34 34 34 FE FE FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF

Re: [delphi-br] Reconhecer CTRL+F

2005-10-10 Por tôpico Leandro
Ok, Mas nao há uma forma de fazer isso sem o popup??? Nao queria perder o popupmenu padrao do windows (copiar, colar, etc) att, Leandro - Original Message - From: O2 Tecnologia em Sistemas [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, October 10, 2005 1:36 PM

Res: Re: [delphi-br] Reconhecer CTRL+F

2005-10-10 Por tôpico Stock
na palheta standard tem um componente chamado TActionList, use ele para teclas de atalhos tipo ctrl+alguma coisa e outras, veja suas propriedades, deve solucionar o que precisa, quando ao evento funcionar so no grid faça assim no evento execute if grid.focused then begin //coloque seu

[delphi-br] [OFF-TOPIC] - Enviar e-mail

2005-10-10 Por tôpico Cristiano
Boa tarde para todos Alguem tem algum fonte de ASP ou JAVASCRIPT para enviar e-mails ... é de muita urgencia, fico muito grato a quem poder me ajudar ! E como eu faço para formatar 4 casas decimais de calculo utilizando delphi ? Cristiano

[delphi-br] Abrir Internet Explorer

2005-10-10 Por tôpico Eduardo Silva ®
Galera, eu tenho uma rotina para abrir o Internet Explorer. O que eu gostaria é que se ele estiver berto, quando eu clicar em um link, ele abra outra página e não na mesma que esta aberta. Alguém sabe como fazer isso? OBrigado. ~\\|//~ -(o o)-

[delphi-br] Re: [delphi-boleto] Importação de Tabelas (At ualização de Tabela com Aqrivos.TXT )

2005-10-10 Por tôpico Guilherme E. Erzinger
acessar as pesquisas visite o endereço www.yahoogrupos.com.br/groups/delphi-boleto/polls Links do Yahoo! Grupos __ Informação do NOD32 IMON 1.1248 (20051010) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br -- FAVOR REMOVER ESTA

[delphi-br] Componente de BI em Delphi

2005-10-10 Por tôpico Paulo Batalhão
bom dia, Alguem conhece algum componente de BI para Delphi Pago ou Free. muito obrigado. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail

[delphi-br] Erro com Zeos

2005-10-10 Por tôpico HNS Informática
Pessoal, instalei o componente zeos no meu Delphi5, porém, quando fui colocar o componente ZMySqlDatabase no meu formulario deu o erro File Not Fount Zconnect.dcu... o que posso fazer pra resolver o problema? Charles Chiodi HNS Informática [As partes desta mensagem que não continham texto

[delphi-br] Rotina Validação CPF

2005-10-10 Por tôpico HNS Informática
Pessoa, alguém tem uma rotina de validação de CPF? [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

[delphi-br] Delphi + MySQL

2005-10-10 Por tôpico HNS Informática
Estou iniciando o uso do Delphi5 com MySQL, gostaria de saber se alguém sabe onde encontrar um bom componente de acesso ao MySQL para Delphi5 e um materia introdutório de como programar com MySQL, tipo, inserir, excluir, editar registros usando SQL. Abraços Charles Chiodi [As partes desta

Re: [delphi-br] Reconhecer CTRL+F

2005-10-10 Por tôpico TObject
Primeiro fixe a propriedade KeyPreview do Form para TRUE procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (ssCtrl in Shift) and (chr(Key) in ['F', 'f']) then ShowMessage('Ctrl-F'); end; - Original Message - From: O2 Tecnologia em

[delphi-br] Tratamento de Erro

2005-10-10 Por tôpico HNS Informática
Pessoa, criei uma tabela no MySQL com a chave primaria login, quando tento inserir um mesmo login da o seguinte erro: query: duplicate entry 'CHARLES' for key 1 como passar essa mensagem de erro para Usuário já cadastrado!!! ? attt Charles A. Chiodi HNS Informática [As partes desta

Res: [delphi-br] Erro com Zeos

2005-10-10 Por tôpico Stock
veja se foi inserido o path de onde esta a dcu do componente... va em tools--environment options-- library e click em library path, inclua la o caminho para o arquivo [EMAIL PROTECTED] 600 modelos de sites profissionais - Imperdivel http://www.kitsites.com/index.php?ref=50 ---Mensagem

Re: [delphi-br] Reconhecer CTRL+F

2005-10-10 Por tôpico Leandro
Valeu... vou tentar ambas as maneiras... obrigado! Leandro - Original Message - From: TObject [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Monday, October 10, 2005 2:01 PM Subject: Re: [delphi-br] Reconhecer CTRL+F Primeiro fixe a propriedade KeyPreview do Form para TRUE

Re: [delphi-br] Rotina Validação CPF

2005-10-10 Por tôpico Roger
tem em: www.clubedelhpi.net (além de várias outras dicas e exemplos) Rogério Ricardo Fernandes Desenvolvimento http://www.strategies.inf.br - Original Message - From: HNS Informática [EMAIL PROTECTED] To: Lista DelphiBr delphi-br@yahoogrupos.com.br; DelphiTotal [EMAIL PROTECTED] Sent:

Re: [delphi-br] Tratamento de Erro

2005-10-10 Por tôpico Roger
no caso da msg para chave primária, podes fazer um try except. ou antes de tentar o insert, faz um select e verifique se já existe ou não o cadastro. Rogério Ricardo Fernandes Desenvolvimento http://www.strategies.inf.br - Original Message - From: HNS Informática [EMAIL PROTECTED] To:

Re: [delphi-br] Componente de BI em Delphi

2005-10-10 Por tôpico Roger
BI? Desculpe, não liguei. Rogério Ricardo Fernandes Desenvolvimento http://www.strategies.inf.br - Original Message - From: Paulo Batalhão [EMAIL PROTECTED] To: Undisclosed-Recipient:; Sent: Monday, October 10, 2005 8:42 AM Subject: [delphi-br] Componente de BI em Delphi bom dia,

[delphi-br] Trigger no Firebird nao dispara

2005-10-10 Por tôpico Celio Ricardo
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

RES: [delphi-br] Trigger no Firebird nao dispara

2005-10-10 Por tôpico Elazar
nao chegeui a testar, mas tente deixar o POSITION em 0 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio Ricardo Enviada em: segunda-feira, 10 de outubro de 2005 18:00 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Trigger no

Re: RES: [delphi-br] Trigger no Firebird nao dispara

2005-10-10 Por tôpico Celio Ricardo
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... ---

RES: [delphi-br] Trigger no Firebird nao dispara

2005-10-10 Por tôpico Madsom Silva
Celio, tem duas alterações : AFTER por BEFORE e 10 por 0 a alteração está sendo feita depois 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

[delphi-br] Componente Panel com canto arredondado

2005-10-10 Por tôpico bidola99
Alguêm conhece algum componente (panel ou shape) no qual eu possa deixar um canto arredondado e outro não. Eu uso D7. Obrigado. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar

Re: [delphi-br] Abrir Internet Explorer

2005-10-10 Por tôpico TObject
Acho que o código abaixo resolve teu problema, espero que ajude. procedure TCadCliente.SpeedButton1Click(Sender: TObject); var Site: string; begin if HomePage.Text '' then begin Site := trim(HomePage.Text); ShellExecute(GetDesktopWindow, 'open', pchar(Site), nil, nil,

[delphi-br] Linha Muito Grande

2005-10-10 Por tôpico HNS Informática
estou tentando inserir uma linha numa query, porém se eu adicionar todos os campos vai ficar muito grande, como posso fazer pra fazer uma linha para cada campo da tabela? ex: frmacesso.query.Sql.Add ('insert into usuarios (Login)'+'Values('+editusuario.text+')'); quero fazer uma linha para

[delphi-br] SQL: 2 tabelas vários campos

2005-10-10 Por tôpico Marcos Jordão
Gostaria que alguém me ajudasse nessa: Tenho uma tabela de FUNCIONARIO e uma tabela de SETOR Na tabela SETOR tenho os campos: RESPONSAVEL, GERENTE e SUB-GERENTE, os quais armazenam o código das pessoas cadastradas na tabela FUNCIONARIO. Gostaria de pegar o nome deles que está na tabela

Re: [delphi-br] VCL ou Windows form

2005-10-10 Por tôpico João Paulo EsPyl
Boa noite. Tambem não tenho profundo conhecimento sobre o D2005, mas pelo que li e pelo que resolvemos adotar aqui na empresa posso te falar o seguinte: Se for usar para desenvolvimentos de novos projetos, onde não vá querer reutilizar codigos do VCL, adote o padrao windows form, pois é o que

[delphi-br] Re: Linha Muito Grande

2005-10-10 Por tôpico dalmifabio
Muito simples, meu caro ... Var sSQL:string; begin sSQL:='Insert into USUARIOS '+ ' ( LOGIN) '+ ' VALUES (+Quotedstr(Editusuario.text+')'; frmAcesso.Query.Sql.Text:=sSql; Boa sorte... --- Em delphi-br@yahoogrupos.com.br, HNS Informática [EMAIL PROTECTED] escreveu