Текущий архив: 2005.09.25;
Скачать: CL | DM;

Вниз

Как задать в DBGrid русские имена столбцов   Найти похожие ветки 

← →
Lenik   (2005-08-11 16:30) [0]

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 не меняется на "Відновл.кас.вид.з поч.року"

---

← →
paul_k ©   (2005-08-11 16:33) [1]

DBGrid1.Columns[0].Title.Caption

---

← →
ANB ©   (2005-08-11 16:49) [2]

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

---

Страницы: 1 вся ветка

Текущий архив: 2005.09.25;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.04 c