Saludos foristas
Aqui me encontre un codigo para oredanr un dbgrid dando clic en las columnas, aqui lo muestro:
Código Delphi
[-]
procedure TFProximo.RxDBGrid1TitleClick(Column: TColumn);
var
DataSet:TDataSet;
begin
if not FMovingColumn then
begin
DataSet:=Column.Field.DataSet;
if DataSet is TCustomADODataSet then
with TCustomADODataSet(DataSet) do
begin
if (Pos(Column.Field.FieldName, Sort)=1) and (Pos(' DESC', Sort)=0) then
Sort:=Column.Field.FieldName + ' DESC'
else
Sort:=Column.Field.FieldName + ' ASC';
end;
end;
FMovingColumn:=false;
end;
En vez de componentes ADO utilizo los de MySql entonces cambio el TCustomADODataset por TCustomMySqlDataSet, pero me marca un error, que no es valido el TCustomMySQLDataSet.
Alguien me podria decir como es la sentencia en el custom con my sql???
de antemano muchas gracias por su tiempo.