Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 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))




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.023 c
1-57347           vopros                2002-03-04 11:59  2002.03.18  
Как отправить в Word текст в колонтитулы?Через OLE автоматизацию?


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


14-57505          Жаждущий!             2002-01-31 04:36  2002.03.18  
КАК ПРОГАММУ НЕ ИМЕЮЩУУ ФОРМЫ, ОСТАВИТЬ РЕЗИДЕТНОЙ????


14-57504          Феликс                2002-02-03 00:50  2002.03.18  
Пара простых вопросов по Перлу.


3-57297           draculenok            2002-02-19 07:49  2002.03.18  
Кто-нибудь.....