Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.06.06;
Скачать: 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 вся ветка

Текущий архив: 2004.06.06;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.039 c
4-1083071564
Maks Realov
2004-04-27 17:12
2004.06.06
"Самоубийство" в runtime наследников НЕ TCustomForm.


3-1084864833
exe
2004-05-18 11:20
2004.06.06
DBGridEh


1-1085519719
Vemer
2004-05-26 01:15
2004.06.06
Присваивание NumderFormat в ExelApplication..


4-1083587044
MadMax
2004-05-03 16:24
2004.06.06
Пульт ДУ


6-1082190154
AndersoNRules
2004-04-17 12:22
2004.06.06
Kak ispolizuya componenti TSocket (ili po drugomu),proveriti:Ne