AlexGreG
AlexGreG
Подробная информация
- Имя пользователя
- AlexGreG
- Присоединился
- Посещений
- 0
- Был на сайте
- Группы
- Members
Комментарии
-
А помоему Danila не прчитал вопрос
-
Опа! Нашёл баг! Нужно так: procedure TForm1.Button1Click(Sender: TObject); var view:TfrMemoView; i,j: integer; begin for i:=0 to r.Pages.Count-1 {<<} do begin for j:=0 to r.Pages[i].Objects.Count-1 do try view:=TfrM…
-
Пробую так: procedure TForm1.Button1Click(Sender: TObject); var view:TfrMemoView; i,j: integer; begin for i:=0 to r.Pages.Count do begin for j:=0 to r.Pages[i].Objects.Count-1 do try view:=TfrMemoView(r.Pages[i].Objects[j]); …