RE: [delphi-br] tamanho campo.
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 atomaticamente
não testei com leitor, mas acredito q vai funcionar, pois o onchange vai ser
chamado quando o leitor jogar o valor no edit.
o código tá aí em baixo.
espero que sirva.
Fabiano.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
procedure Edit1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Edit1Change(Sender: TObject);
begin
if Length(TEdit(Sender).Text) = 10 then
SelectNext(TEdit(Sender), GetKeyState(VK_SHIFT) >= 0, True);
end;
end.
>From: Valcir José Tasquim <[EMAIL PROTECTED]>
>Reply-To: [EMAIL PROTECTED]
>To: <[EMAIL PROTECTED]>
>Subject: [delphi-br] tamanho campo.
>Date: Thu, 2 Dec 2004 09:26:25 -0200
>
>Bom dia.
>
>Algume poderia me esclarecer como posso limitar os digitos de um campo
>codigo tipo Integer, e faze-lo pular automaticamente para o campo qtde, ou
>seja, é um sistema de mercado (Trabalho de Escola) e estarei utilizando
>leitor optico, e gostaria que após ler o codigo de barras o cursor fosse
>automaticamente para o campo quantidade.
>
>Tasquim
>[EMAIL PROTECTED]
>
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
_
Natal no MSN Shopping: COMPROU, GANHOU $$! Veja Como!
http://shopping.msn.com.br/MSNSHopping/GuiaEspeciais/Natal/conteudo.aspx?cd_guia=20&cd_funcao=238
--
<<<<< 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 [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] tamanho campo.
Tasquim, Como tudo em programação, existe mais de uma forma para fazer isso. Se o seu código de barra conviter algum caracter específico no em seu término, você pode testar por este caracter em um evento OnKeyPress ou OnKeyDown, uma vez que o leitor do código de barra fará as vezes do teclado. Algumas leitoras podem ser programadas para passar um ENTER ao término do leitura. Neste caso faça isso no evendo OnKeyDown do Edit: if Key = VK_RETURN then EditProximo.SetFocus; Att. Rodrigo Américo [EMAIL PROTECTED] On Thu, 2 Dec 2004 09:26:25 -0200, Valcir José Tasquim <[EMAIL PROTECTED]> wrote: > > Bom dia. > > Algume poderia me esclarecer como posso limitar os digitos de um campo codigo > tipo Integer, e faze-lo pular automaticamente para o campo qtde, ou seja, é > um sistema de mercado (Trabalho de Escola) e estarei utilizando leitor > optico, e gostaria que após ler o codigo de barras o cursor fosse > automaticamente para o campo quantidade. > > Tasquim > [EMAIL PROTECTED] > > [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 moderador, envie um e-mail para: > [EMAIL PROTECTED] ou [EMAIL PROTECTED] > > Links do Yahoo! Grupos > > > > > -- < 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 [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] tamanho campo.
Bom dia. Algume poderia me esclarecer como posso limitar os digitos de um campo codigo tipo Integer, e faze-lo pular automaticamente para o campo qtde, ou seja, é um sistema de mercado (Trabalho de Escola) e estarei utilizando leitor optico, e gostaria que após ler o codigo de barras o cursor fosse automaticamente para o campo quantidade. Tasquim [EMAIL PROTECTED] [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 moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
