#80 ToolbarButtons tbsDropDown translation 1.2 RC 1

[Vlad Skarzhevskyy]

In version 1.2 RC 1

If UseLanguage is called before Form creation.
ToolBar buttions with Style tbsDropDown will get
corrupted.
But only corrupted if there is trnslation for caption.

See the example project in zip file.
Alo picture LookOnWin2K.jpg in attachment.

[Vlad Skarzhevskyy]

This is how it will look

[Vlad Skarzhevskyy]

Logged In: YES
user_id=342182

This is example project to reproduce the problem.

[Vlad Skarzhevskyy]

This is example project to reproduce the problem.

[Vlad Skarzhevskyy]

Logged In: YES
user_id=342182

My Solution to this problem is to call FixToolBar in FormCreate
():

procedure FixToolBar(tb: TToolBar);
var
i : integer;
b : TToolButton;
begin
for i := 0 to tb.ButtonCount - 1 do
begin
b := tb.Buttons[i];
if (b.Style = tbsDropDown) then
begin
b.Style := tbsButton;
b.Style := tbsDropDown;
end;
end;
end;

[Lars B. Dybdahl]

Logged In: YES
user_id=116253

This seems to be a problem with the toolbar, not with
gnugettext.pas.

[Anse]

This is still an issue, probably in the TToolbar itself but even in Delphi XE2, not only on Delphi 7. Any hints for me, apart from applying Style := tbsDropDown per code?