Не установлен бейсик, могу написать алгоритм:
a=Text1.Text
for i:=length(s) downto 1 do
b=b+s[i]
msgbox(b)
Вот и все, на сколько я помню
Не установлен бейсик, могу написать алгоритм:
a=Text1.Text
for i:=length(s) downto 1 do
b=b+s[i]
msgbox(b)
Вот и все, на сколько я помню