change text in show title and show corner

John Kuiper

If your put the settings show titles and show corner on in crosstab, the name of the column headers occurs.
I want to change these values to values from my dataset before printing the crosstab.

The helpfile talks about this:

procedure Cross1OnPrintColumnHeader(Memo: TfrxMemoView;
                HeaderIndexes, HeaderValues, Value: Variant);
begin
if (HeaderIndexes[0] = 0) and (HeaderIndexes[1] = 2) then
   Memo.Color := clRed;
end;

But this is not changing the title and corners.

How will I do that?

gpi

Your code works OK for me
See attach

John Kuiper

That's not what I ment
The code is working oke, but I want to change the caption of the cell.
I think that the procedure 'Cross1OnPrintColumnHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant)' is the one I need, but it will not change the caption of the cell.

[edit]
This is my solution:

procedure DBCross1OnPrintColumnHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant);
begin
 if trim(Memo.text) = 'week' then
   memo.text := <frxDBDataset1."tweek">;
end;

It's not a nice one.

[/edit]