Commit 46a2f9c4c1d8b59759cba1be67f7aad750481d73

Authored by Arthur Bikmullin
1 parent 2ab27ae8

Fixed devolonter sample

... ... @@ -8,9 +8,6 @@ Class ProgressBar
8 8
9 9 Field width:Float, height:Float
10 10
11   -Private
12   - Field value:Float
13   -
14 11 Method New(x:Float, y:Float, width:Float, height:Float)
15 12 Self.x = x; Self.y = y
16 13 Self.width = width; Self.height = height
... ... @@ -30,5 +27,8 @@ Private
30 27 If (value > 1) value = 1
31 28 Self.value = value
32 29 End Method
  30 +
  31 +Private
  32 + Field value:Float
33 33
34 34 End Class
\ No newline at end of file
... ...