Форум: "Основная";
Текущий архив: 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.45 MB
Время: 0.009 c