Как перенести текст на следующую строку в RadioGroup

← →
AndreySoft (2003-08-27 23:41) [0]

Мне нужно сделать перенос одной из строк в RadioGroup...
Я пытался осуществить это программно, вот таким способом:
...
RadioGroup1.Items.Add("НУЖНО ПЕРЕНЕСТИ ТЕКСТ"+#13+"НА СЛЕДУЮЩУЮ СТРОКУ");
...
В результате он мне выдал такую вещь:
НУЖНО ПЕРЕНЕСТИ ТЕКСТ|НА СЛЕДУЮЩУЮ СТРОКУ
А саму строчку так и не перенёс...
Может у этого компонента есть свои свойства, но я не нашёл...
Как это можно сделать другим способом?
Помогите пожалуйста!
Заранее искренне благодарен...

← →
Guerrillero © (2003-08-27 23:49) [1]

А так ???
var
I: Integer;
RBtn: TRadioButton;
begin
I := RadioGroup1.Items.Add("НУЖНО ПЕРЕНЕСТИ ТЕКСТ" + #13#10 + "НА СЛЕДУЮЩУЮ СТРОКУ");
RBtn := TRadioButton(RadioGroup1.Controls[I]);
SetWindowLong(RBtn.Handle,GWL_STYLE,GetWindowLong(RBtn.Handle,GWL_STYL E) or BS_MULTILINE);

← →
AndreySoft © (2003-08-28 01:09) [2]

Всё равно не работает!

← →
Rouse_ © (2003-08-28 01:29) [3]

> AndreySoft © (28.08.03 01:09) [2]
Да нет, проверил совет > Guerrillero © (27.08.03 23:49) [1] , все работает.

Если смущает ошибка, то убери пробел (не подчеркивание) в константе GWL_STYL E он там лишний.

Желаю успехов

← →
Yanis © (2003-08-28 02:45) [4]

TO [2]
А ты попробуй, может и работает :))

← →
Alibaba © (2003-08-28 03:06) [5]

У меня была такая проблема.
Я искал решение этого вопроса.
И, о чудо! :), случайно нашел!
Спасибо, Guerrillero © (27.08.03 23:49) [1]

У меня тоже заработало.

← →
AndreySoft © (2003-08-28 08:47) [6]

> Rouse_ ©
Да удалил я пробел там где надо, все работает. Только без изменений - текст не переносится!

← →
Dimka Maslov © (2003-08-28 08:53) [7]

http://endimus.ru/oldcontent/files/index_en.php?page=dimcontrols.htm

Там лежит модуль, в котором такая фишка реализована. Более того, разбивка на строки произвоится автоматически и есть и RadioGroup из таких RadioButton c прокруткой

← →
AndreySoft © (2003-08-28 09:49) [8]

Проблема всё ещё не решена!

← →
Yanis © (2003-08-28 11:15) [9]

To [8]
Нехочу показаться грубым, но ты видимо очень туп. Я незаню что у тебя за проблемы но первый[1] вариант работает отлично, не знаю что тебе ненравится.

← →
AndreySoft © (2003-08-28 11:27) [10]

Yanis © (28.08.03 11:15) [9]
Давай пожалуйста без оскорблений!
Этот вариант работает (да он действительно работает, т.е. приложение запускается, но нет результата который нужен) также как и мой он пишет вот такую строчку
НУЖНО ПЕРЕНЕСТИ ТЕКСТ||НА СЛЕДУЮЩУЮ СТРОКУ
и ничего не переносит визуально.
Ты сам то пробовал этот вариант?

← →
Yanis © (2003-08-28 11:41) [11]

Я уже давно попробовал вот этот код:
var I:Integer; RBtn:TRadioButton; begin I:=RadioGroup1.Items.Add("НУЖНО ПЕРЕНЕСТИ ТЕКСТ" + #13#10 + "НА СЛЕДУЮЩУЮ СТРОКУ"); RBtn :=TRadioButton(RadioGroup1.Controls[i]); SetWindowLong(Rbtn.Handle,GWL_STYLE,GetWIndowLong(Rbtn.Handle,GWL_STYL E) or BS_MULTILINE);
и у меня всё работает.
Странно но в обработчике RadioGroup1Click у меня этот код неработает, почему?
А ток всё нормально пашет.

← →
AndreySoft © (2003-08-28 11:52) [12]

В каком обработчике он у тебя заработал?
Я его пытаюсь вставить в Image1Click.

← →
Yanis © (2003-08-28 11:57) [13]

ButtonClick & ImageClick
А у тебя Rx стоит?

← →
Yanis © (2003-08-28 11:58) [14]

http://pascal.sources.ru/cgi-bin/forum/YaBB.cgi?board=delphi;action=di splay;num=1029931552
Там похожая ситуация.

Удалено модератором
Примечание: OffTopic

Ну я думаю что стоит.
Где её можно посмотреть?
И вообще какое отношение имеет библиотека к реализации переноса текста.

Небольшой оффтопик

> Yanis © (28.08.03 12:11) [16]
Не у всех, у меня нет, и не нужна. Мозги то для чего человеку нужны? А как набор готовых решений, ИМХО нужно своими пользоваться.

Желаю успехов

ЗЫ: А код рабочий и все нормально переносится

Да рабочий, я не спорю, только ничего не переносится.
Ну раз рабочий, тогда пришли мне весь проект исходника мне на почту.

Как перенести текст на следующую строку в RadioGroup Найти похожие ветки