[ilichhernandez]

Podria ser con

Código Delphi [-]
vartexto :=table1.fieldbyname('nombre').AsString;
largo_vartexto := length(vartexto);
If largo_vartexto > 20 then
     Begin
         hacer algo
     end
     Else
     Begin
          hacer otra cosa
     end;

ojala te sirva...
salu2.