![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Вот мой код
Код:
procedure TfrmMDIParent.SformirClick(Sender: TObject);
var Graf1: TfrmGrafik1MDIChild;
begin
if ngrafik = true then
begin
Graf1:=TfrmGrafik1MDIChild.Create(Application);
Graf1.Caption:='вапвапапп';
Graf1:=TfrmGrafik1MDIChild(ActiveMdiChild); - это я добавил по аналогии с другим окном там обращение к таблице
With frmGrafik1MDIChild.Series1 do - ругается тут
begin
Clear;
Add(25, 'вап 1', clYellow);
Add(25, 'вап 2', clBlue);
Add(25, 'ваапа 3', clRed);
Add(25, 'укеукеук 4', clPurple);
end;
end;
end; |
|
#2
|
||||
|
||||
|
не очень понятно зачем сначала создаете объект
Код:
Graf1:=TfrmGrafik1MDIChild.Create(Application); Graf1.Caption:='вапвапапп'; Код:
Graf1:=TfrmGrafik1MDIChild(ActiveMdiChild); - это я добавил по аналогии с другим окном там обращение к таблице Код:
With frmGrafik1MDIChild.Series1 do - ругается тут Код:
Graf1:=TfrmGrafik1MDIChild.Create(Application); Graf1.Caption:='вапвапапп'; With Graf1.Series1 do ... |
|
#3
|
||||
|
||||
|
Цитата:
Код:
With frmGrafik1MDIChild.Series1 do Последний раз редактировалось Ildar-tsr, 20.05.2012 в 17:42. |
|
#4
|
|||
|
|||
|
я сам понял ужо просто не успел вписать
вот тут я и ошибочку допустил Код:
With frmGrafik1MDIChild.Series1 do Код:
With Graf1.Series1 do Последний раз редактировалось alex_rR, 20.05.2012 в 16:59. |