![]() |
|
|
Регистрация | << Правила форума >> | 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 ... Понять, что хочет заказчик - бесценно, ведь он платит MasterCard ![]() |
#3
|
||||
|
||||
![]() Цитата:
Код:
With frmGrafik1MDIChild.Series1 do Google в помощь Последний раз редактировалось Ildar-tsr, 20.05.2012 в 17:42. |
#4
|
|||
|
|||
![]() я сам понял ужо просто не успел вписать
вот тут я и ошибочку допустил Код:
With frmGrafik1MDIChild.Series1 do Код:
With Graf1.Series1 do Последний раз редактировалось alex_rR, 20.05.2012 в 16:59. |