Strona 1 z 1

Typ zożony w If. Nie da się, czy nie umiem?

: 26 kwie 2026, 21:40
autor: Press
jeżeli
  1. Type SR04M_Type
  2. Dystans as word
  3. T_rising as word
  4. T_faling as word
  5. end type
  6.  
  7. SR04M as SR04M_Type
  8.  
  9. SR04M.Dystans = 10
  10.  
  11. if SR04M.Dystans > 0 then
  12.  'Kod do wykonania
  13. end if
I dostaję błąd: Variable not dimensioned.
Czy da się to jakoś rozwiązać bez przepisywania zawartości pola do prostej zmiennej dodatkowej?

Re: Typ zożony w If. Nie da się, czy nie umiem?

: 26 kwie 2026, 22:26
autor: niveasoft
Mi się to kompiluje bez błedów tylko dopisałem DIM w linijce u Ciebie siódmej a u mnie trzynastej.
Tylko że mam juz jakaś wersję Beta SLA poprawioną a faktycznie w wersji 2087OFI nie działa.
Napisz do supportu to pewnie Ci dadzą fixa :D
  1. $regfile = "m328pdef.dat"
  2. $Crystal=16000000
  3. $hwstack=64
  4. $swstack=32
  5. $framesize=128
  6.  
  7. Type SR04M_Type
  8. Dystans as word
  9. T_rising as word
  10. T_faling as word
  11. end type
  12.  
  13. Dim Sr04m As Sr04m_type
  14.  
  15. SR04M.Dystans = 10
  16.  
  17. if SR04M.Dystans > 0 then
  18.  'Kod do wykonania
  19. End If

Re: Typ zożony w If. Nie da się, czy nie umiem?

: 26 kwie 2026, 22:49
autor: Press
Heh.
Zapomniałem o Dim. Ale to nie tu problem. I mam wersję 2.0.8.7. Pocieszające, że nie działa, a nie, że ja jestem goopi :D
Do testów dla zabawy napiszę na pojedynczych zmiennych. A jak będzie do czegoś konkretnego zastosowanie to zrobię w HAL na STM32 i będzie działać :D

Dzięki za szybką odpowiedź.