[SaMaLerO]

Всем привет! Я тут новенький, и если это повтор, то сильно не бейте). Речь пойдет об GLScene. В первой форме Form1 есть куб GLCube1 и он имеет 3 интересующих меня параметра: CubeDepth, CubeWidth и CubeHeight. Есть форма Form3 и там три строчки Edit1, Edit2 и Edit3 и кнопка. Нужно сделать так, чтобы Edit1, Edit2 и Edit3, в которых пользователь напишет по 1 цифре, после нажатия кнопки изменят значения параметров CubeDepth, CubeWidth и CubeHeight соответственно. Помогите новичку)

[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);

[SaMaLerO]

Сообщение от 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);
Прога компилится но после попытки поменять кубик, он вообще пропадает(

[poli-smen]

Сообщение от SaMaLerO

StrToInt - этот параметр не принимает так как там тип Single. Но я по сути понял, у меня получилось так:
Unit1.Form1.GLCube1.CubeDepth:=Single(Edit1.Text);

Здесь нужно не Single, а StrToFloat.

Сообщение от SaMaLerO

Прога компилится но после попытки поменять кубик, он вообще пропадает(

Я так понимаю Depth это глубина - тогда скорее всего он не пропадает, а перемещается за пределы видимости - или слишком далеко или слишком близко.

[SaMaLerO]

Сообщение от poli-smen

Здесь нужно не Single, а StrToFloat.Я так понимаю Depth это глубина - тогда скорее всего он не пропадает, а перемещается за пределы видимости - или слишком далеко или слишком близко.

Вопрос решен, спасибо!)