SHPORA.net :: PDA | |
Main FAQ гуманитарные науки естественные науки математические науки технические науки Удаление последнего символа begin s:=Edit1.Text; присваиваем строковой переменной .Эдит1 y:=Length(s); присваиваем переменной длинну строки S delete(s,y,1); удаляем из (строки S, колво символов,1 символ) Edit1.Text:=s; Эдит 1 присваиваем значение переменной S end; |