Como pegar o tam. do campo Número numa tabela (.DB ou .DBF)

Delphi

03/12/2003

Quero saber como faço para pegar qual é o tamanho de um campo de uma tabela DB ou DBF , que seja numero . Quando o campo é string o size me retorna corretamente o tamanho dele, mas quando é numero (float, money, ou outro) o size nao retorna nada.
Obrigado desde já.


Mauroab

Mauroab

Curtidas 0

Respostas

Luineumann

Luineumann

03/12/2003

uma forma de você saber o tamanho seria

length(floattostr(valornumerico));

var
valor : extended;
begin
valor := 1;
showmessage(floattostr(valor) + ´ - tamanho ´ + inttostr(length(floattostr(valor)))); // tamanho 1
valor := 100;
showmessage(floattostr(valor) + ´ - tamanho ´ + inttostr(length(floattostr(valor)))); // tamanho 3
valor := 100.24;
showmessage(floattostr(valor) + ´ - tamanho ´ + inttostr(length(floattostr(valor)))); // tamanho 6
valor := -1;
showmessage(floattostr(valor) + ´ - tamanho ´ + inttostr(length(floattostr(valor)))); // tamanho 2
valor := -100; showmessage(floattostr(valor) + ´ - tamanho ´ + inttostr(length(floattostr(valor)))); // tamanho 4
valor := -100.24;
showmessage(floattostr(valor) + ´ - tamanho ´ + inttostr(length(floattostr(valor)))); // tamanho 7


GOSTEI 0
Mauroab

Mauroab

03/12/2003

Quero nao qts caracteres esta preenchido o campo e sim quanto foi definido na tabela.
exemplo.
Tabela XPTO

campo1 float 5 posições.
campo2 float 3 posições.


vamos supor q o campo1 esta com o valor 21 .
eu nao quero o length do campo e sim o valor q foi definido na tabela nesse caso 5.


GOSTEI 0
POSTAR