Ordenamiento de tabla en base a campo ingresado

[[Lepe]]

la idea es la misma pero ya tienes que usar un Query y añadir:

Código Delphi [-]
var ordenar:string;
begin
Case Radiobutton.ItemIndex of
0: ordenar := 'codigo'
1rdenar :='Descripcion';
end;

query1.sql.text := lo que sea + ' order by ' +ordenar;
query1.open;

Saludos