1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25
26. 26
27. 27
28. 28
29. 29
30. 30
31. 31
32. 32
33. 33
34. 34
35. 35
36. 36
37. 37
38. 38
39. 39
40. 40
41. 41
42. 42
43. 43
44. 44
45. 45
46. 46
47. 47
48. 48
49. 49
50. 50
51. 51
52. 52
53. 53
54. 54
55. 55
56. 56
57. 57
58. 58
59. 59
60. 60
61. 61
62. 62
63. 63
64. 64
65. 65
66. 66
67. 67
68. 68
69. 69
70. 70
71. 71
72. 72
73. 73
74. 74
75. 75
76. 76
77. 77
78. 78
79. 79
80. 80
81. 81
82. 82
83. 83
84. 84
85. 85
86. 86
87. 87
88. 88
89. 89
90. 90
91. 91
92. 92
93. 93
94. 94
95. 95
96. 96
97. 97
98. 98
99. 99
100. 100

if o is TSpellChecker then
      begin
        TSpellChecker(o).FinishMessage := ml(TSpellChecker(o).FinishMessage, form.Name);
        TSpellChecker(o).caption := ml(TSpellChecker(o).caption, form.Name);
      end else
        if o is Tform then
        begin
          TMenuItem(o).Caption := ml(TMenuItem(o).Caption, form.Name);
          TMenuItem(o).Hint := ml(TMenuItem(o).Hint, form.Name);
        end else
          if o is TComboBox then
          begin
    //TComboBox(o).Caption:=ml(TMenuItem(o).Caption,form.Name);
            TComboBox(o).Hint := ml(TComboBox(o).Hint, form.Name);
          end else
            if o is TMenuItem then
            begin
              TMenuItem(o).Caption := ml(TMenuItem(o).Caption, form.Name);
              TMenuItem(o).Hint := ml(TMenuItem(o).Hint, form.Name);
            end else
              if (o is TTBXButton) then
              begin
                TTBXButton(o).Caption := ml(TTBXButton(o).Caption, form.Name);
                TTBXButton(o).Hint := ml(TTBXButton(o).Hint, form.Name);
              end else
                if (o is TTBXLink) then
                begin
                  TTBXLink(o).Caption := ml(TTBXLink(o).Caption, form.Name);
                  TTBXLink(o).Hint := ml(TTBXLink(o).Hint, form.Name);
                end else
                  if (o is TRzGroup) then
                  begin
                    TRzGroupBox(o).Caption := ml(TRzGroup(o).Caption, form.Name);
                    TRzGroupBox(o).Hint := ml(TRzGroup(o).Hint, form.Name);
                  end else
                    if (o is TRzPanel) then
                    begin
                      TRzGroupBox(o).Caption := ml(TRzPanel(o).Caption, form.Name);
                      TRzGroupBox(o).Hint := ml(TRzPanel(o).Hint, form.Name);
                    end else
                      if (o is TRzButton) then
                      begin
                        TRzButton(o).Caption := ml(TRzButton(o).Caption, form.Name);
                        TRzButton(o).Hint := ml(TRzButton(o).Hint, form.Name);
                      end else
                        if (o is TRzTabControl) then
                        begin
                          TRzTabControl(o).Hint := ml(TRzTabControl(o).Hint, form.Name);
                          for k := 0 to TRzTabControl(o).Tabs.Count - 1 do
                          begin
                            TRzTabControl(o).Tabs.Items[k].Caption := ml(TRzTabControl(o).Tabs.Items[k].Caption, form.Name);
                            TRzTabControl(o).Tabs.Items[k].Hint := ml(TRzTabControl(o).Tabs.Items[k].Hint, form.Name);
                          end;
                        end else
                          if (o is TRzTabSheet) then
                          begin
                            TRzTabSheet(o).Caption := ml(TRzTabSheet(o).Caption, form.Name);
                          end else
                            if (o is TRzGroupBox) then
                            begin
                              TRzGroupBox(o).Caption := ml(TRzGroupBox(o).Caption, form.Name);
                              TRzGroupBox(o).Hint := ml(TRzGroupBox(o).Hint, form.Name);
                            end else
                              if (o is TRzGroupItems) then
                              begin
                                TRzGroupBox(o).Caption := ml(TRzGroupBox(o).Caption, form.Name);
                                TRzGroupBox(o).Hint := ml(TRzGroupBox(o).Hint, form.Name);
                              end else
                                if (o is TToolButton) then
                                begin
                                  TToolButton(o).Caption := ml(TToolButton(o).Caption, form.Name);
                                  TToolButton(o).Hint := ml(TToolButton(o).Hint, form.Name);
                                end else
                                  if o is TButton then
                                  begin
                                    TButton(o).Caption := ml(TButton(o).Caption, form.Name);
                                    TButton(o).Hint := ml(TButton(o).Hint, form.Name);
                                  end else
                                    if o is TBitBtn then
                                    begin
                                      TBitBtn(o).Caption := ml(TBitBtn(o).Caption, form.Name);
                                      TBitBtn(o).Hint := ml(TBitBtn(o).Hint, form.Name);
                                    end else
                                      if o is TSpeedButton then
                                      begin
                                        TSpeedButton(o).Caption := ml(TSpeedButton(o).Caption, form.Name);
                                        TSpeedButton(o).Hint := ml(TSpeedButton(o).Hint, form.Name);
                                      end else

                                        if o is TRzToolButton then
                                        begin
                                          TRzToolButton(o).Caption := ml(TRzToolButton(o).Caption, form.Name);
                                          TRzToolButton(o).Hint := ml(TRzToolButton(o).Hint, form.Name);
                                        end else

                                          if o is TRadioButton then
                                          begin
                                            TRadioButton(o).Caption := ml(TRadioButton(o).Caption, form.Name);
                                            TRadioButton(o).Hint := ml(TRadioButton(o).Hint, form.Name);
                                          end else