Identifica tipo do campo

11/08/2004

0

Tenho uma função na qual passo o campo da query e gostaria de identificar o tipo de campo...

if s_campo = asstring then
showmessage(´Campo é string)
else if s_campo = asinteger then
showmessage(´Campo é inteiro)
....

isto é possivel ? Procurei em tópicos anteriores e nao consegui...

Alguem pode me ajudar ? Uso o IBX x Firebird.

Grato


Midas

Midas

Responder

Posts

11/08/2004

Vinicius2k

Colega,

Eu trabalho com filtros interativos onde preciso desta identificação para trabalhar a instrução SQL e eu utilizo algo +/- assim...
procedure VerificarTipo (aTField: TField);
var FieldType: String;
begin
  FieldType:= aTField.ClassName;
  if (FieldType = ´TStringField´)     or
     (FieldType = ´TWideStringField´) then
    begin
     { É Texto }
    end;
  if (FieldType = ´TDateField´)     or
     (FieldType = ´TDateTimeField´) or
     (FieldType = ´TTimeField´)     then
    begin
     { É Data / Data/Hora }
    end;
  if (FieldType = ´TIntegerField´)  or
     (FieldType = ´TSmallIntField´) or
     (FieldType = ´TLargeintField´) then
    begin
     { É Inteiro }
    end;
  if (FieldType = ´TFloatField´)    or
     (FieldType = ´TCurrencyField´) or
     (FieldType = ´TBCDField´)      or
     (FieldType = ´TFMTBCDField´)   then
    begin
     { É Numérico ou Valor }
    end;
end;


Espero ter ajudado...
T+


Responder

11/08/2004

Midas

Vinicius....

Muito obrigado companheiro, a dois dias procurei pela resposta....
Ficou perfeito...

Muito obrigado.

[]´s que Deus o Abençoe


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