Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
| Zevs5 |
20.10.2006 0:24
Сообщение
#1
|
|
Гость |
Необходимо проверить трёх значный символ, число ли это
Не совсем Паскалевский вопрос потому что использую Делфи но принцып то один. Нужно проверить введённый символ (однозначный, двузначный либо трех значный) на то, является ли он числом и потом если это число занести его в числовой массив. Потомучто если я конечно не ошибаюсь если объявлен числовой массив то строковое значение туда не запихнёшь. |
![]() ![]() |
| Zevs5 |
20.10.2006 11:58
Сообщение
#2
|
|
user пока ![]() Группа: Пользователи Сообщений: 16 Пол: Мужской Репутация: 0 |
Может я не в ту степь полез, но у меня массив Integer, а все примеры попадаются с string.
Вот часть кода, необходимо получить минимальное значение массива. Код Form1.Memo1.Lines.Add(IntToStr(si)); Form1.Memo1.Lines.Add(IntToStr(di)); Form1.Memo1.Lines.Add(IntToStr(fi)); Form1.Memo1.Lines.Add(IntToStr(gi)); Form1.Memo1.Lines.Add(IntToStr(hi)); Form1.Memo1.Lines.Add(IntToStr(li)); for i := 1 to 6 do ar[i] := StrToInt(Form1.Memo1.Lines[i-1]); show := TryStrToInt(IntToStr(ar[i])); Form1.Label12.Caption := IntToStr(show); --------------------------------------------------------------------------------------------------------------------------------------- только третью неделю как delphi в глаза увидел. Сообщение отредактировано: Zevs5 - 20.10.2006 12:00 -------------------- Сделать можно всё, только надо знать как !!!
|
Zevs5 Проверка на число 20.10.2006 0:24
volvo :blink: Символ, насколько я понимаю, может быть т... 20.10.2006 0:39
Zevs5
:blink: Символ, насколько я понимаю, может быть т... 20.10.2006 1:20
volvo function TryStrToInt(const S: string; out Value: I... 20.10.2006 1:38
volvo Ну и зачем тебе понадобилось определять, число это... 20.10.2006 12:07
Zevs5 Всё решил эта строка глюк в мозгах
show := TryStrT... 20.10.2006 12:38
мисс_граффити Конечно!
Обычно массивы заполняют через String... 21.10.2006 12:14
Zevs5 Я через Edit вводил, сделал ограничение не более 3... 21.10.2006 16:44![]() ![]() |
|
Текстовая версия | 8.12.2025 23:51 |