TAdvTreeView: translating (all) in filter list

VCL TMS VCL UI Pack
1

Hello,

I'm trying to translate the (all)-Text in the filter of TAdvTreeView.
I've tried it with the OnNeedFilterDropDown the follwoing way

procedure TDMSichtenTreeHelper.AdvTreeViewOnNeedFilterDropDownData
(Sender: TObject; AColumn: Integer; AValues: TStrings);
begin
if AValues[0] = sAdvTreeViewFilterAll then
begin
AValues.Delete(0);
AValues.Add('(Alle)');
end;
end;

That works, but because you check the sAdvTreeViewFilterAll-text also when removing the filter in HandleFilterTimer the function got lost.

Could you replace

//resourcestring
// sAdvTreeViewFilterAll = '(All)';

with

const
sAdvTreeViewFilterAll : String = '(All)';

Then I can set the text in my code.

Thank you.

Björn

4

Hello,

is there another solution for translating?
I'm currently fine with changing the sources.

Björn

5

The TAdvTreeView is converted from FNC, where all components use resourcestrings. We'll investigate if we can change this behavior here without introducing breaking changes.