Скачать: CL | DM;

ARichEdit   Найти похожие ветки 

← →
CyberSpy   (2004-05-27 05:25) [0]

Допустим, я вот так создаю ARichEdit в каждой новой вкладке с именем editor_N, где N - число (имена вкладок также, только editor_f_N, где N - число).

var
CountArich:integer=0;

...

procedure TForm1.ToolButton2Click(Sender: TObject);
var
Page: TTabSheet;
ARichEdit: TSynEdit;
begin
Page := TTabSheet.Create(Form1);
Page.PageControl := PageControl1;
ARichEdit := TSynEdit.Create(Form1);
ARichEdit.Parent := Page;
Page.Name:="editor_f_" + IntToStr(CountArich);
ARichEdit.Name := "editor_" + IntToStr(CountArich);
CountArich:=CountArich+1;
end;

Вопрос: как получить имя ARichEdit в активной вкладке PageControl?
И вообще, как мне работать с ARichEdit с новым именем, т.е. editor_N, где N - число?
Например, если я пишу editor_2.lines.clear, то мне Delphi пишет "Неизвестный идентификатор: editor_2"
Помогите!

---

← →
TUser ©   (2004-05-27 07:40) [1]

Наверное, лучше будет создать массив из этих SynEdit"ов. Тогда можно будет обратиться так
ARichEdit[PageControl1.ActiveIndex]

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.02 c