: [delphi-br] Mudar de campo pelo tamanha do Edit
Esta dica foi passada pelo nosso amigo Márcio Theis e fui eu quem
postei a duvida e então lá vai:
Crie a seguinte procedure
procedure TForm1.SaltaCampos(Sender: TObject);
begin
if (Length((Sender as TEdit).Text) = ((Sender as TEdit
No próprio site do FreeVcs vc encontra uma boa documentação, mas
em português você pode encontrar tb em:
http://www.activedelphi.com.br/modules.php?op=modloadname=Newsfile=articlesid=88
http://www.activedelphi.com.br/modules.php?op=modloadname=Newsfile=articlesid=113
ou se preferir você pode
Na minha opinião se no momento que o usuário preenche o CEP e este carrega
as informações de
logradouro, cidade e bairro, não se deve mais mexer nestes campos, pelo
menos é assim que nós
aqui trabalhamos. Ao menos que o CEP carregue somente a cidade, ai sim
permitir que ele altere
o logradouro e
Eu fiz o seguinte teste e deu certo:
Crie a seguinte procedure
procedure TForm1.SaltaCampos(Sender: TObject);
begin
if (Length((Sender as TEdit).Text) = ((Sender as TEdit).MaxLength)) then
Perform(WM_NEXTDLGCTL,0,0);
end;
depois ligue ela a todos os seus edit's através do OnChange, mas
edtData.Text:=DateToStr(Date);
- Original Message -
From: james nascimento
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 12, 2005 3:34 PM
Subject: [delphi-br] data atual
Como faço para inserir automaticamente a data atual em uma EDIT, quando abrir
um form.
tire o exit abaixo da linha de comando CmbSexo.SetFocus;
pois vc já da um setfocus e depois um exit, acredito ser isto.
- Original Message -
From: frcunhahell
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, January 13, 2005 8:09 PM
Subject: [delphi-br] Exit
Tem um
tabelacampodata.AsString:='';
- Original Message -
From: alisson_delphi
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 12, 2005 3:15 PM
Subject: [delphi-br] Apagar data de tabela paradox
Galera, preciso apagar uma data de uma tabela paradox.
Na tabela esta
Pessoal
Baixei o QuickReport 4.05 Professional para o Delphi 6, mas não
to conseguindo instalar, alguém já instalou ou sabe instalar?
[]'s
/]/[EMAIL PROTECTED]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
O RecordCount na minha opinião é um pouco confiável, dependendo da forma que é
usada. Pois ele pode lhe retornar as vezes o valor de -1, e isto acontece se
você utilizar o ( select * ) na cláusula, caso contrário não acontece, e se vc
não quer mais ter problema faça o seguinte, utilize desta
Alguém conhece um programa ou algum componente que
seja possível manipular os componentes de um QuickReport
no form Ou seja, que eu possa deixar o cliente
manipular os componentes dos meus relatórios da forma que ele quizer...
Obrigado pela atenção
[]'s
t+
[As partes desta mensagem
boa tarde, faça o seguinte, crie uma procedure que receber como parametro um
TObject,
da seguinte maneira:
procedure TForm1.CorrigeData(edt: TObject);
var
n: integer;
begin
n:=0;
while n = (Form1.ComponentCount - 1) do
begin
if TMaskEdit(Form1.Components[n]) = edt then
11 matches
Mail list logo