Olá, estou utilizando um componente TListItem, que é
semelhante ao TLIstView e gostaria de saber como que
eu faço para selecionar uma determinada linha, para
simular o clique do mouse.
Por favor.
Obrigado.
__
Do you Yahoo!?
Jazz up your
Coloque o ADODesc_Papel na clausula Group by.
- Original Message -
From: Douglas - CPD
To: Delphi - grupos ; Delphi-Br ; [EMAIL PROTECTED] Com. Br ;
Delphi-No-Brasil ; Delphi-Total ; Lista-Delphi
Sent: Wednesday, December 22, 2004 6:17 PM
Subject: [delphi-br] Problema com o
Poderia me enviar o arquivo com o exemplo da webcam, tenho que desenvolver um
sistema de controle de portaria aqui na empresa e iria precisar usar esta
função.
Atenciosamente,
André Luis - Leitbom
Desenvolvedor
- Original Message -
From: Romario (Delphi)
To:
Poderia me enviar tb, tenho interesse sobre o assunto.
- Original Message -
From: Romario (Delphi)
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, December 23, 2004 12:14 AM
Subject: Re: [delphi-br] WebCam
Perdão! Fui enviar em PVT e acabei enviando para a lista (que
Salve amigos programadores, eu programo faz pouco tempo e estou com
um problema que não estou conseguindo solucionar.
Trabalho com o FireBird 1.5 e delphi 7, está ocorrendo um erro que eu
não estou conseguindo solucionar falando que a minha tabela
tblSAECadastro não está em mode de inserção
Bom dia companheiro.
Aqui tem um procedimento que lê o arquivo linha por linha e em cada
linha verifica caracter por caracter. Se encontra o caracter
procurado (no exemplo o '*') então faz o que for preciso.
{ Para ler o arquivo }
procedure percorreArquivoTexto ( nomeDoArquivo: String );
Me manda direto nesse e-mail [EMAIL PROTECTED] , fazendo o favor.
Ficarei muito agradecido
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
antes da instrucoes de campo coloca isso
SAEData.tblSAECadastro.EDIT; // para editat um registro
ou
SAEData.tblSAECadastro.Insert; // para um registro novo
[EMAIL PROTECTED]
Analista de Sistemas
itamar roloff
---
- Original Message -
From:
PARA AGILIZAR EM MUITO ESTE METODO UTILIZE O FUNCAO POS()
que ao encontrar a primeira ocorrencia de busca descarta o resto da linha
procedure percorreArquivoTexto ( nomeDoArquivo: String );
var
arq: TextFile;
linha: String;
i: integer
begin
AssignFile ( arq, nomeDoArquivo );
Por favor, envie pra mim, ou disponibilize pra nós.
[] Robson Farias
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou
Eu estou utilizando o conteúdo do arquivo num stringlist e nele estou
manipulando o arquivo.
Adaptando a forma que você me passou num stringlist não estou
conseguindo realizar o if, você poderia me dizer como:
Leandro Ferreira
Desenvolvedor - Tecnologia
NEXXERA Tecnologia e Serviços
itamar
Esta faltando colocar no group by a palavra AdoDESC_PAPEL
- Original Message -
From: Douglas - CPD [EMAIL PROTECTED]
To: Delphi - grupos [EMAIL PROTECTED]; Delphi-Br
delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] Com. Br
[EMAIL PROTECTED]; Delphi-No-Brasil
[EMAIL PROTECTED];
Eu gostaria de saber se tem como eu colocar algum digito no
dbloockupcombobox, tipo eu colocar 1 e ele me retornar o valor
correspondente ao valor digitado, onde ele faz a pesquisa em outro
campo. E outra coisa na hora de eu fazer a consulta se tem como eu
fazer atravé so nome pra me trazer
Eu uso o Windows XP.
Quando eu coloco no form um componente TabControl, GroupBox, Edit...
e rodo a aplicação, os componentes ficam no padrão do XP (com
aquelas bordas abixalhadas, tudo colorido...)
eu quero que os componentes fiquem no padrão de cores do Windows
clássico...
--
FAVOR
Gente, decidi que vou comprar o Delphi 2005. Como tenho que comprar 3
licenças pra mim a diferença financeira entre as versões Profetional e
Enterprise é considerável.
Gostaria de saber dos colegas se as diferenças entre as duas serão
limitantes do ponto de vista de desenvolvimento web
eu, particularmente, faria assim..
a classe de regra, como o nome já diz, refere-se apenas as regras,
controlando a estrutura, validando, por exemplo:
Para eu gerar uma nota fiscal, deverei ter produtos em estoque.
para usares os atributos, seria interessante teres uma classe bean/entidade
Please,
Alguém me indica o caminho, uma luz, como posso fazer para executar uma
aplicativo no browse, estava pensando em algo do tipo:
Servidor (com a aplicação)
Cliente (Acessa a aplicação que esta no servidor, através do browse)
Tem como fazer isto usando o D7?
[]s
Nilson Chagas
Segue em anexo o exemplo solicitado.
P.S.: Lembre-se sempre de fazer qualquer solicitação em PVT.
Sds,
Romario
André Argeri escreveu:
Me manda direto nesse e-mail [EMAIL PROTECTED] , fazendo o favor.
Ficarei muito agradecido
Muito Obrigado
--
No virus found in this
Boa tarde a todos..
Em uma tabela tenho 1 único campo onde eu armazeno o CNPJ OU CPF,
dependendo do tipo de pessoa, no caso Pessoa Juridica o CNPJ e pessoa
fisica o CPF.
Existe alguma forma de mudar a propriedade EditMask via programação,
dependendo do tipo da pessoa?
Se sim, como seria esta
Alguem ja desenvolveu um sistema odontologico e fez alguma odontograma.???
Evandro Araujo de Abreu
Uniodonto Campinas
Analista de Sistema
[EMAIL PROTECTED]
Fone: (19) 37314020
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER
Alternativas possíveis:
A) Se sua aplicação já está pronta e rodando em win32 utilize ela num
windows 200x Server com Terminal Server, ai a tua maquina Cliente pode
ser até um linux, que vai beleza. inclusive na web
B) Se vc ainda naum fez a aplicação, use WebBroker/WebSnap/IntraWeb ou
Utilizo o componente MaskEdit para meus campos tipo data, o problema que está
acontecendo é quando já existe uma data cadastrada neste campo e quero deixá-la
em branco. Dá uma mensagem de erro do componente.
Como posso fazer para corrigir isso ???
Atenciosamente,
Marcelo Carvalho
[As partes
usa um dblistbox com os tipo PF ou PJ:
if dblistbox1.selectedIndex = 0 then
nomedatabelanomedocampo.Mask := '999.999.999-99'
Else
nomedatabelaNomedocampo.Mask := '99.999.999/-99';
coloca este código no evento onexit do dblistbox ou no onenter do dbedit de
cpf/cnpj.
-
Concordo que não preciso criar metodos de get e set, posso escrever
direto na variável (é assim que faço).
Mas a pergunta é, se vou APENAS escrever direto na variável, não tendo
métodos get/set, QUAL É A VANTAGEM de usar uma property?
On Thu, 23 Dec 2004 11:37:51 -0200, Romario (Delphi)
[EMAIL
Como sei que vc entende realmente do assunto, por mim dou este assunto por
encerrado e não irei mais perder tempo pesquisando sobre isso. Valeu pelo
esclarecimento, Walter.
[]s
-Mensagem original-
De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 22 de
Adapte para as suas necessidades.
procedure TForm1.BitBtn1Click(Sender: TObject);
var
Texto :WideString;
formato : Word;
Data : THandle;
Palette: HPALETTE;
tudo:string;
begin
//Inicializando o Word
//Insira um componente TWordApplication e utilize o codigo:
W.Connect;
W.Visible :=
Olá povo!!!
Alguém aqui usa o InnoSetup? Já usaram o InnoSetup Form Designer??
Se sim, PVT-me, ou MSN-me ([EMAIL PROTECTED]) :-)
[]'s
Carlos Vitorino
Programalista
CTVoicer - Curitina - PR
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA
Bom Dia Colegas,
Primeiramente gostaria de dizer sou novo aki. :0)
Sou programador mas naum trabalho com Delphi, me inscrevi nessa lista pelo
seguinte motivo: (lah vai o livro...heheheh)
Tenho um cliente que presto serviços de manutenção de servidores de rede e
firewall em linux para ele,
Que que tá pegando aí ô bacana???
[]s
Walter Alves Chagas Junior
Projeto e desenvolvimento
Telemont Engenharia de telecomunicações
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31) 3389-8200
-Mensagem original-
De: Carlos Vitorino [mailto:[EMAIL PROTECTED]
Enviada em:
Walter vc usa o InnoSteup ???
Eu uso mas da forma mais simples possível, mas gostaria de melhorar meus
scripts. Todos os arquivos são instalados no mesmo diretório, como faço para
criá-los em outros diretórios.
Tipo assim:
APLICAÇÃO.EXE ficaria em C:\PROJETO\APLICAÇÃO.EXE
BANCO.GDB ficaria
A única maneira que vejo é vc setar no bde do cliente o endereço IP do
servidor de dados como diretório que os dados estão, mas tem uma coisa, no
paradox não são criadas as tabelas temporárias na memória, o acesso é feito
direto ao disco, talvez por isso o sistema fique tão lento. Uma vez que não
Pessoal é o seguinte:
Tenho que gerar um consulta com todos os fornecedores de um certo produto,
esta consulta tem que me retornar entre as informações do fornecedor
(CNPJ,DESCRICAO,TELEFONE,...) o último preço de compra do produto para cada
fornecedor.
Meu problema é que quando coloco
teste (desculpem o incmodo)
[As partes desta mensagem que no 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
Gostaria de saber como posso criar uma query que me retorne as ultimas compras
de um produto com seus fornecedores.
Quero que me retorne todos os fornecedores de um determinado produto com suas
respectivas datas de ultima compra.
Tenho a seguinte consulta:
SELECTDISTINCT
Galera to usando o Report Builder para fazer um relatório.
Uso ibquery para selecionar os dados que irão sair no relatório.
No primeiro ppdbppllista coloco a query principal. Assim eu seleciono apenas o
registro que eu estou posicionado na grid para gerar o relatório.
Porém quando eu vou para
Ajudem-me
Eu uso o Windows XP.
Quando eu coloco no form um componente TabControl, GroupBox, Edit...
e rodo a aplicação, os componentes ficam no padrão do XP (com
aquelas bordas abixalhadas, tudo colorido...)
eu quero que os componentes fiquem no padrão de cores do Windows
clássico...
estou com um problema...
parece que quando crio um form dentro de um panel, o código que
dentro dos eventos OnKeyDown OnKeyPress não é executado...
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
Pessoal como converter de String ou Inteiro para char.
[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
Pessoal preciso de um algoritmo que dado um numero de letras X, me apresente
todas as combinções.
Exemplo: Se eu forneço: sutvgao
O algoritmo tem que calcular (adicionar num memo) todas as combinações.
sutvgao
sutvgoa
...
stuvgoa
vutsaog
...
gustavo
...
...
E todas as outras.
--
FAVOR
Voce pode bloquear algumas funcoes na versao de demonstracao ou faze-lo
completo mas que funcione apenas por um periodo de tempo.
Fernando
Marcelo Carvalho wrote:
Como criar uma versão de demonstração de meu sistema ??
Atenciosamente,
Marcelo Carvalho
[As partes desta mensagem que
Eu tambem ja tive problemas de memoria com relatorios. Eu consegui
amenizar criando os relatorios em tempo de execucao e liberando da
memoria logo em seguida.
Quanto a esses arquivos, sao arquivos temporarios que o BDE cria para
rodar querys. Isso e normal.
Fernando
Cássio wrote:
Bom
Voce reiniciou o micro com o banco aberto? Talvez tenha corrompido.
Utilize algum utilitario do FB (gfix ou gbak se nao me engano) para
tentar resolver.
Outra coisa: Nunca copie o arquivo do banco se ele estiver sendo
acessado por algum usuario. Sempre faca um backup transportavel para
Olá amigos da lista!
Estou com um problema que é o seguinte:
estou tentando usa a seguinte rotina para a exclusão de meus registros:
begin
if MessageDlg('Deseja realmente excluir o'+#13+
'Cliente: '+DBEdit3.Text,
mtConfirmation,[mbYes, mbNo],0) = mrYes then
Nao sei se ha limite, mas o recomendavel e fazer com que as transacoes
durem pouco.
Quanto ao tamanho do banco, acho que depende do sistema operacional. Se
voce acha que o banco ira ficar muito grande, divida-o em varios
arquivos. O FB permite que um mesmo banco fique em varios arquivos
Veja se isso ajuda. Supondo que o nome do componente seja CheckListBox1.
Programe no evento OnDragOver:
if Source is TCheckListBox then Accept := True;
Programe no evento OnEndDrag:
var Ponto: TPoint;
Aux: String;
Chk: Boolean;
i: Integer;
begin
Ponto.x := X;
Ponto.y := Y;
45 matches
Mail list logo