Witam w jaki sposób odbierać i wysyłać dane wysłane przez Rs232 w Bascom-ie ?
Chciałbym z komputera wysyłać taki string np (R255G20B120) jak to odebrać i trzem zmiennym typu bajt przypisać wartości
dokładnie chodzi mi o odpowiednik takiego czegoś w bascom -ie
Chciałbym z komputera wysyłać taki string np (R255G20B120) jak to odebrać i trzem zmiennym typu bajt przypisać wartości
r=255
g=20
b=120
dokładnie chodzi mi o odpowiednik takiego czegoś w bascom -ie
var
s:string;
r,g,b :byte;
begin
s:='R120G30B255';
r:=StrToInt(Copy(s,2,Pos('G',s)-2));
g:=StrToInt(Copy(s,Pos('G',s)+1,length(s)-Pos('B',s)-1));
b:=StrToInt(Copy(s,Pos('B',s)+1,length(s)-Pos('G',s)+1));
end;