Текущий архив: 2003.02.13;
Скачать: CL | DM;
Вниз
Подскажите, почему с первого раза не срабатывает? Найти похожие ветки
← →
NewGuest (2003-01-25 14:34) [0]
Button1.Click
Form2.RichEdit1.SelAttributes.Color := clSilver;
Form2.RichEdit1.Lines.Add("Text");
Form2.RichEdit1.SelAttributes.Color := clBlack;
Form2.Show;
← →
Kair © (2003-01-25 15:06) [1]Что не срабатывает?
← →
NewGuest (2003-01-25 23:04) [2]текст "Text" не меняет цвет, а остается черным, как по умолчанию... закрываю форму, поторяю действия раза со 2 ого или с 3-ого цвет становится серым...
WHY???
← →
Kair © (2003-01-25 23:21) [3]У меня работает. ?
← →
gsu © (2003-01-26 00:13) [4]>> NewGuest
Вам бы сказки писать или руководства для хакеров (-:|~
← →
NewGuest (2003-01-26 10:52) [5]да ребята, я сказочник... Андерсен...
Вот делать мне не чего писать вам сказки....
← →
NewGuest (2003-01-30 15:38) [6]вооот, сейчас я расскажу как сделать чтобы точно не сработало...
Form1
----
RichEdit1
Button1
Form2
----
RichEdit1
При чём в каждом риче text=""; !! САмое главное...!! если текст остается (RichEdi1), то добавляет он серым цветом, т.е с первого раза все ок, иначе (если пусто) черным
Button1Click
Form2.RichEdit1.SelAttributes.Color := clSilver;
Form2.RichEdit1.Lines.Add(Form1.RichEdit1.Text);
Form2.RichEdit1.SelAttributes.Color := clBlack; //Если пользователь начнет писать, то пишет черным.
Form2.Show;
Чтобы он добавил серым, закройте 2 форму, и нажмите на батон1 на первой форме, если опять не выйдет повторите действия...
Вот она проблема! Мож че в коде не так? А то Если записать
Form2.RichEdit1.Text:=Form1.RichEdit1.Text;
То цвет вообще не меняется...
У меня Д7...
← →
NewGuest (2003-02-03 23:11) [7]ау
Страницы: 1 вся ветка
Текущий архив: 2003.02.13;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.012 c
