Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.18;
Скачать: CL | DM;

Вниз

Проблеммы с 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
3-57313
Fareader
2002-02-19 14:31
2002.03.18
DBGrid и переоткрытие Query


3-57287
Dimedrol
2002-02-18 15:33
2002.03.18
UDF и Interbase


3-57295
Андре
2002-02-18 17:33
2002.03.18
Хранилище документов


1-57374
Vvedensk
2002-03-04 05:46
2002.03.18
Как вставить в edit каких-то 3 переменных ....


14-57519
copyr25
2002-01-31 20:14
2002.03.18
Анекдот