Цитата:
|
Сообщение от M.A.D.M.A.N.
Я тут старенький, так что тоже не бейте.
Form3 Code
Код:
uses Form1;
...
procedure tform3.button1click...
...
begin
Form1.glcube.ololo1 := strtoint(edit1.text);
...
Form1.glcube.ololo3 := strtoint(edit3.text); |
StrToInt - этот параметр не принимает так как там тип Single. Но я по сути понял, у меня получилось так:
Unit1.Form1.GLCube1.CubeDepth:=Single(Edit1.Text);
Прога компилится но после попытки поменять кубик, он вообще пропадает(