//SALVAR POSIÇÃO DA COLUNA DO DBGRID

DBGrid1->Columns->SaveToFile(ExtractFilePath(Application->ExeName) + "Position.ini" );