AITap
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте!
Моя задача: нарисовать график скоростей двух тел от времени, заранее рассчитанных.
Время от 1 до $n, скорости для каждого значения времени хранятся в массивах $d1 и $d2.
Вот мой код:
Код: Func Graphic()
#Region ### START Koda GUI section ### Form=c:\program files\autoit3\projects\dvornik\form3.kxf
$Form1_1 = GUICreate("График скоростей", 919, 526, 193, 125)
$Graphic1 = GUICtrlCreateGraphic(8, 8, 905, 481)
$Button1 = GUICtrlCreateButton("Выход", 840, 496, 75, 25, 0)
$Label1 = GUICtrlCreateLabel("Первое тело", 8, 496, 89, 17)
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Второе тело", 104, 496, 85, 17)
GUICtrlSetColor(-1, 0x00FF00)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$ret = GUICtrlSetGraphic($Graphic1,$GUI_GR_COLOR,0xff0000)
; MsgBox(0,"",$ret) ; возвращает 1
GUICtrlSetGraphic($Graphic1,$GUI_GR_DOT,0,0)
For $z = 1 To $n
GUICtrlSetGraphic($Graphic1,$GUI_GR_LINE,$z,$d1[$z])
Next
GUICtrlSetGraphic($Graphic1,$GUI_GR_COLOR,0x00ff00)
GUICtrlSetGraphic($Graphic1,$GUI_GR_DOT,0,0)
For $z = 1 To $n
GUICtrlSetGraphic($Graphic1,$GUI_GR_DOT,$z,$d2[$z])
Next
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Exit
EndSwitch
WEnd
EndFunc |
В окне я вижу только надписи "первое тело" и "второе тело", графика нет. Что не так? |
Всего записей: 19 | Зарегистр. 02-03-2009 | Отправлено: 18:08 22-04-2009 | Исправлено: AITap, 18:09 22-04-2009 |
|
. 
