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

Pytania, kody i porady dotyczące nie tylko Bascom.
ODPOWIEDZ
Press
Posty: 79
Rejestracja: 21 sty 2018, 23:08

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

Post autor: Press » 26 kwie 2026, 21:40

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?
Awatar użytkownika
niveasoft
Posty: 1313
Rejestracja: 17 sie 2015, 12:13
Kontakt:

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

Post autor: niveasoft » 26 kwie 2026, 22:26

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
Press
Posty: 79
Rejestracja: 21 sty 2018, 23:08

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

Post autor: Press » 26 kwie 2026, 22:49

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ź.
ODPOWIEDZ