Форум: "Основная";
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];
ВнизПроблеммы с StrToInt Найти похожие ветки
← →
Priz_Datiy (2002-03-04 11:43) [0]procedure TForm1.Button1Click(Sender: TObject);
var
a,b: integer;
begin
a:=StrToInt(Edit1.Text);
b:=StrToInt(Edit2.Text);
Label1.Caption:=IntToStr(a - b);
end;
почему пример перестает работать если заполнение одного из едитов больше 199999999 ??? тоесть если ставим 2999999999 то выдает диалог "2999999999 is not a valid integer value."
мне нужно произвести вычитание с более большим числом а оно не работает... помогите
← →
Shaman_Naydak (2002-03-04 11:48) [1]procedure TForm1.Button1Click(Sender: TObject);
var
a,b: Int64;
begin
a:=StrToInt64(Edit1.Text);
b:=StrToInt64(Edit2.Text);
Label1.Caption:=IntToStr(a - b);
end;
← →
Alx2 (2002-03-04 11:48) [2]Видимо, такие числа не влазят в диапозон целых чисел. Попробуй StrToInt64. Соответственно, a,b:Int64
← →
Alx2 (2002-03-04 11:58) [3]Не успел.. :)
← →
Arhelon (2002-03-04 12:55) [4]Integer вещь ограниченная :)) посмотри описание в ф1
← →
Anatoly Podgoretsky (2002-03-04 22:42) [5]ShowMessage(IntToStr(MaxInt))
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c