Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];

Вниз

Доступ к RichEdit   Найти похожие ветки 

 
Alessio2003   (2003-02-22 00:13) [0]

У меня есть PageControl, на нём автоматически при нажатии на кнопку создаются новые закладки с RichEdit на ней. Как мне при PageControlOnChange узнать имя этого RichEdit на активной закладке?

Я делаю чат. Мне нужно, чтобы из edit"a текст выводился в RichEdit на активной в данной момент страничке.

Спасибо за содействие :о)


 
SeNtiMeL   (2003-02-22 00:36) [1]

Я тоже пишу чат сейчас :)... И этот вопрос решил просто...
Я создаю RichEdit.Parent:=TabSheet; //новый TabSheet, новый RE.
Когда щелкаешь по закладкам, я не узнаю имя а просто делаю так.
TRichEdit(TabSheet.Components.Component[0]).Lines.Add("eeee")
И все ! И никакого имени этого контрола не надо...
Сам делал приваты в чате, и нашел, что это более оптимальное решение.
а чтобы узнать какой Tabsheet активен, PageControl1.ActivePage.Name

Вот сейчас бьюсь над передачей файлов в чате.... Просто передать Файл уже могу, но с докачкой пока проблемы...
И нужно реализовать многопотокувую отправку разным юзерам


 
Alessio2003   (2003-02-22 01:36) [2]

Я пишу
TextP - это TTabSheet;
TRichEdit(TextP.Components[0]).Lines.Add("eeee");

Выбрасывается ошибка при выполнении команды.


 
SeNtiMeL   (2003-02-22 02:33) [3]

У тебя должен быть создан RichEdit уже...
И ты должен быть точно уверен, что RichEdit стоит под номером 0, в списке дочерних компонент TabSheet.


 
Alessio2003   (2003-02-22 13:39) [4]


var TextP: TPageControl;
...
procedure TChat.UserText1KeyPress(Sender: TObject; var Key: Char);
begin
//Если нажали кнопку <Enter> - отправим текст в RichEdit
if Ord(Key)=13 then
begin
if TextP.ActivePage.Name="StatusPage" then //У меня возникает ошибка в этой части кода
StatusWind.Lines.Add(UserText1.Text)
else
TRichEdit(TextP.ActivePage.Components[0]).Lines.Add(UserText1.Text);
end;
end;


Ситуация такая: у меня на форме находится PageControl, на нём создана в DesignTime одна страничка с именем StatusPage, на ней есть RichEdit.

В RunTime я создаю новую закладку с новым RichEdit. Когда я ввожу текст в Edit UserText1, у меня возникает ошибка класса EAccsessViolation в указанном выше месте.
Что тут может быть не так?



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.56 MB
Время: 0.039 c
6-17241
dphmen1
2003-01-14 13:27
2003.03.06
Протокол TCP IP


3-16871
VIB
2003-02-18 10:04
2003.03.06
DBGrid


14-17269
BALU1111
2003-02-19 14:36
2003.03.06
Взломать программу.


1-17142
Сергей
2003-02-23 10:10
2003.03.06
INI ФАЙЛЫ И ПРИВЕДЕНИЕ ТИПОВ


14-17383
rusdeejay
2003-02-17 21:57
2003.03.06
Необходим Специалист





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский