Code : Tout sélectionner
Procedure a()
#fixed_length = 1
s.s = "PureBasic"
p.l = 5
m.s{#fixed_length} = Mid(s, p, #fixed_length)
Debug m
Debug p
EndProcedure
a()
Code : Tout sélectionner
Procedure a()
#fixed_length = 1
s.s = "PureBasic"
p.l = 5
m.s{#fixed_length} = Mid(s, p, #fixed_length)
Debug m
Debug p
EndProcedure
a()