[WeG]

Всем Привет у меня такая проблема есть DBGrid мне нужно программно настроить свойства т.е.
чтобы заголовок столбца отображался по русски,
установить ширину столбца

procedure TfrmZprstSemest1.FormShow(Sender: TObject);
begin
dmdModule.ADOQuery1.Active:=false;
dmdModule.ADOQuery1.SQL.Clear;
dmdModule.ADOQuery1.SQL.Add('SELECT persons.Fam, persons.Name, Semestr.nom_semestra, [Payment for accommodation].oplata');
dmdModule.ADOQuery1.SQL.Add('FROM persons INNER JOIN (Semestr INNER JOIN [Payment for accommodation] ON Semestr.[id] = [Payment for accommodation].[id_semstra]) ON persons.[id] = [Payment for accommodation].[id_persons]');
dmdModule.ADOQuery1.SQL.Add('WHERE (((Semestr.nom_semestra)=1));');
dmdModule.ADOQuery1.Active:=true;
frmZprstSemest1.dbGrOplata1.DataSource.DataSet:=dm dModule.ADOQuery1;
// тут настройки DBgrida
end;