From becd4bdd0e3845f9ad7845fe7637460914878afa Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Wed, 2 Jan 2013 19:12:13 +0000
Subject: [PATCH] Work around broken ToolButton with Style=tbsDropDown after
 translation:
 https://sourceforge.net/tracker/index.php?func=detail&aid=902470&group_id=74086&atid=539908
 Fixes issue #3066.

---
 source/texteditor.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/source/texteditor.pas b/source/texteditor.pas
index 371ecd2f..9b177fdb 100644
--- a/source/texteditor.pas
+++ b/source/texteditor.pas
@@ -164,6 +164,10 @@ procedure TfrmTextEditor.FormCreate(Sender: TObject);
 begin
   InheritFont(Font);
   TranslateComponent(Self);
+  // Work around broken dropdown toolbutton after translation:
+  // https://sourceforge.net/tracker/index.php?func=detail&aid=902470&group_id=74086&atid=539908
+  btnLinebreaks.Style := tbsButton;
+  btnLinebreaks.Style := tbsDropDown;
 end;