Как программно получить доступ к заголовкам колонок
Delphist
Россия - Воронеж
Как программно получить доступ к заголовкам колонок Cross-Tab'a (TfrxDBCrossTab)?
делать так:
var
frxObj: TfrxComponent;
begin
frxObj := frxReport.FindObject('DBCross');
for i:= 0 to TfrxDBCrossView(frxObj).ColCount - 1 do вот здесь уже выдается ошибка
if TfrxDBCrossView(frxObj).ColumnMemos.Text = 'RAW_NAME' then
TfrxDBCrossView(frxObj).ColumnMemos.Text := 'Группа'
end;
делать так:
var
frxObj: TfrxComponent;
begin
frxObj := frxReport.FindObject('DBCross');
for i:= 0 to TfrxDBCrossView(frxObj).ColCount - 1 do вот здесь уже выдается ошибка
if TfrxDBCrossView(frxObj).ColumnMemos.Text = 'RAW_NAME' then
TfrxDBCrossView(frxObj).ColumnMemos.Text := 'Группа'
end;