Validação

03/11/2005

0

Amigos:
Gostaria de contar com a ajuda de vocês para resolver o seguinte problema:
Tenho um campo definido como caracter que pode ser populado com numeros, alpha ou ambos, devendo os mesmo ficarem alinhados a direita. Fiz a função abaixo.
function TDbFunction.fAlinha(sCampo: String): String;
var
i,tamanho: integer;
aux: string;
begin
aux := trim(sCampo);
tamanho:= length( trim (sCampo));
sCampo:=´´;
for i:= 1 to (7 - tamanho) do
sCampo:= sCampo + ´ ´;
aux:= sCampo + aux;
Result:= aux;
end;

Faço sua chamada atravez do evento OnKeyDown que quando saio do campo com ENTER funciona belezinha, mas quando saio com TAB não funciona (obvio). Fiz tambem a chamada com OnKeyPress, mas tambem não funciona com TAB. Tentei colocar esta chamada no OnValidade do campo, mas dá erro ao validar
Vocês tem alguma sujestão para ajudar-me a resolver o problema?

Grato


Zekas


Zekas

Zekas

Responder

Posts

03/11/2005

Michael

Vc diz um campo de tabela de banco de dados? Se vc estiver usando um campo através da classe TField, há uma propriedade Align que define o alinhamento visual dos dados. Isso não serve para seu caso?

[]´s


Responder

03/11/2005

Zekas

Neste caso, necessito que o mesmo seje gravado no banco já alinhado a direita.

Grato

Zekas


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar