Copy delphi
Автор Qq qq задал вопрос в разделе Другие языки и технологии
Pos , Copy delphi и получил лучший ответ
Ответ от Xoodoo[гуру]
грузи строку в стринглист
каждый элемент стринглиста преобразовывай в вещ. число, вери целую часть и записывай результат на место
Ответ от Jurii[гуру]
Запрет на ввод в Edit других символов, кроме цифр: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not(Key in ['0'..'9', #13, #8]) then Key := #0; end;
Запрет на ввод в Edit других символов, кроме цифр: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not(Key in ['0'..'9', #13, #8]) then Key := #0; end;
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Pos , Copy delphi