Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как задать в DBGrid русские имена столбцов [D6, MSSQL]


Lenik ©   (2005-08-11 16:30:00) 

procedure TForm1.UdkClick(Sender: TObject);
begin
DBGrid1.Visible:=true;
if OpenDialog1.Execute then
s1:= (OpenDialog1.FileName);

WindowsCopyFile(OpenDialog1.FileName, Wpath+'udk.dbf');
svk1:='Відновл.кас.вид.з';
svk2:= 'поч.року';
svk:=Concat(svk1,' ',svk2 );

ss1:= 'udk.dbf';
Sql:='select udk,kpol,kpk,kekv,oblgen,szorzf,';
Sql:=Sql +'szrrzf,svkvzf as' +svk ;
Sql:=Sql + ' from ' +ss1;

ADOQuery1.Close ;
ADOQuery1.ConnectionString:='Provider=MSDASQL;Data Source=Файлы dBASE;Initial Catalog='+Wpath ;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add( Sql);
ADOQuery1.Open();
end;

Имя поля svkvzf не меняется на 'Відновл.кас.вид.з поч.року'


ANB   (2005-08-11 16:49:00) [1]

Варианты :
1) В запросе as "имя по русски"
2) Использовать DisplayLabel


paul_k   (2005-08-11 16:33:00) [2]

DBGrid1.Columns[0].Title.Caption


Наверх

Титульная страница Поиск, карта сайта Написать письмо