| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите, почему ;с первого раза не срабатывает? [D7, Win2k]
NewGuest © (2003-01-25 14:34:00)
Button1.Click
Form2.RichEdit1.SelAttributes.Color := clSilver;
Form2.RichEdit1.Lines.Add("Text");
Form2.RichEdit1.SelAttributes.Color := clBlack;
Form2.Show;
NewGuest (2003-02-03 23:11:00) [1]ау
NewGuest (2003-01-30 15:38:00) [2]вооот, сейчас я расскажу как сделать чтобы точно не сработало...
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-01-26 10:52:00) [3]да ребята, я сказочник... Андерсен...
Вот делать мне не чего писать вам сказки....
gsu (2003-01-26 00:13:00) [4]>> NewGuest
Вам бы сказки писать или руководства для хакеров (-:|~
Kair (2003-01-25 23:21:00) [5]У меня работает. ?
NewGuest (2003-01-25 23:04:00) [6]текст "Text" не меняет цвет, а остается черным, как по умолчанию... закрываю форму, поторяю действия раза со 2 ого или с 3-ого цвет становится серым...
WHY???
Kair (2003-01-25 15:06:00) [7]Что не срабатывает?
| |
