E aí Michel,
Como vou precisar de algo assim e hoje to meio folgado,
fiz uma funcao que converte um numero na sequencia que vc quer,
eu considerei o seguinte:
1 -- A
2 -- B
...
26 -- Z
27 -- AB
...
dessa forma vc pode usar um numero inteiro para guardar (ou gerar) a
sequencia normalmente, e
.
//
From: Fabiano Arndt [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: delphi-br@yahoogrupos.com.br
Subject: RE: [delphi-br] Incremento diferente
Date: Fri, 07 Jan 2005 13:48:45 +
E aí Michel,
Como vou precisar de algo assim e hoje to meio
Olá Gustavo,
aqui na empresa temos o delphi 4 instalado em um notebook com winXP (SP2) e
tá funcionando legal!!!
agora, se foi feito alguma coisa pra que funcionasse direito eu não sei...
mas acho que não, foi feito apenas o update do windows.
[]'s
Fabiano.
From: [EMAIL PROTECTED]
Reply-To:
Olá pessoal,
Preciso mudar a ordem dos itens de um checklistbox e gostaria de fazer isso
arrastando os itens com o mouse de um posição para outra...
se alguém puder me ajudar agradeço
Valeu obrigado.
Fabiano.
_
Natal no MSN
talvez essa propriedade o ajude:Showing.
if nome_do_form.Showing then
Fabiano.
From: delphi6_2005 [EMAIL PROTECTED]
Reply-To: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: [delphi-br] Como saber se um formulário está aberto na aplicação
Date: Wed, 08 Dec 2004 12:16:12 -
Valcir,
faça o seguinte, no evento onChange do componente vc verifica o tamanho da
propriedade text,
quando atingir o tamanho desejado vc pula de campo.
fiz um exemplo com dois edits e associei o evento onchange dos dois edits
no mesmo procedimento.
quando o tamanho é dez ele pula
Boa tarde pessoal,
estou desenvolvendo um sistema e gostaria de mais tarde disponibilizá-lo em
outros idiomas, por isso gostaria de saber quais são as formas de se fazer
isso e quais as principais dificuldades.
se alguém já fez isso ou tem alguma idéia de como fazer e puder dizer,
ficaria muito
Bom dia,
no evento onexit do edit faça:
procedure TForm1.Edit1Exit(Sender: TObject);
var edt : TEdit;
begin
edt := TEdit(sender);
edt.Text := formatfloat('#,##0.00', strtofloat(edt.Text));
end;
se vc tiver q fazer isso em mais de um TEdit, associe esse procedimento ao
evento dos
edits q
opps, faltou uma coisa, um zero a mais no formato
formatfloat('#,##0.000', strtofloat(edt.Text));
-
no evento onexit do edit faça:
procedure TForm1.Edit1Exit(Sender: TObject);
var edt : TEdit;
begin
edt := TEdit(sender);
edt.Text := formatfloat('#,##0.00', strtofloat(edt.Text));
Olá,
isso q vc tá tentando fazer nao é possível. , vc não pode concatenar o
nome
de um form em uma string e querer chamar o metodo showmodal do form.
string é string e form é form (uma coisa é uma coisa outra coisa é outra
coisa...)
vc vai ter q fazer um if verificando o que tá no
experimenta colocar um edit.Refresh após passar o texto pro edit.
isso deve resolver.
Fabiano.
AssignFile (TarqtblPr, edtArquivo.text);
Reset (TarqtblPr);
while not Eof (TarqtblPr) do
begin
ReadLn (TarqtblPr,Slinha);
edit.text := copy(Slinha,1,10);
Cassiano, acho que isso deve resolver o seu problema.
var
HoraSistema : TSystemTime;
begin
With HoraSistema do
begin
wYear:= 2004;
wMonth:= 11;
wDay:= 10;
wHour:= 11;
wMinute:= 20;
wSecond:= 05;
end;
SetLocalTime(HoraSistema);
end;
Fabiano.
From:
Paulo eu concordo plenamente com o Fábricio,
se o supermercado é grande, a primeira coisa que ele deve fazer é ter uma
boa infra-estrutura física, isso é fundamental! inclusive vc deve exigir
isso dele como desenvolvedor do sistema.
se vc querer desenvolver um sistema em cima de uma
no evento onpopup vc verifica se a qry está vazia, se tiver vc desabilita os
itens, ou os escondem
if qry.isempty then
begin
menuitem1.visible := false;
menuitem2.visible := false
...
ou
menuitem1.enabled := false
menuitem2.enabled := false
...
end;
eu usaria o enabled := false,
vc tem que colocar true na opcao filtered,
mas Usa TQuery, é muito melhor
From: Marcelo Silva [EMAIL PROTECTED]
Reply-To: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: [delphi-br] Qual a melhor maneira de trabalhar com TTable ?
Date: Mon, 8 Nov 2004 11:37:26 -0200
Estou trabalhando
posso te dar uma sugestão, que tal gravar o nome do arquivo no formato
LMMDDHHMM..
aí é só colocar a opção sorted do combobox para true, não tem erro, vai
ordenado pela data.
espero que sirva.
Fabiano.
From: Jeferson Adoryan [EMAIL PROTECTED]
Reply-To: [EMAIL PROTECTED]
To: [EMAIL
Concordo com o r4zor, acho q isso vai te dar bastante dor de cabeça,
se vc quer diminuir tráfego de rede, projete suas SQLs, de forma que elas só
tragam os dados
que o usuário irá usar, e evite os select * from sem where, retorne somente
as colunas que interessam ao usuário, e evite usar
17 matches
Mail list logo