ПредишенСледващото

Var S. String;
аз. Цяло число;
започвам
I: = 45;
S: = "Стойността на променливата и да е - '+ InttoStr (I) +' и не
друг :-) ";
приключи;

От този въпрос стигам до извода, че съвсем зелен чай :)))
Когато за първи път чух такава глупав въпрос, в смисъл на светлина.
Ами това е, отстъпление.

С една дума, има някои видове функции за преобразуване (Надявам се, че знаете какъв тип :):
Ето, аз ги изброява в реда, който има :) В действителност, по реда на важност и необходимост:

IntToStr - конвертирате число в низ. Стойности IntToStr (12987) е равен на "12987"
StrToInt - линия превръщане в цяло число. Значение StrToInt ( "12345"), равна 12345
FloatToStr - частична конверсия на низ. Значение FloatToStr (3,74) е равна на ( "3.74)
StrToFloat - линия превръщане в фракционна номер. Значение StrToFloat ( "3.14") е равен на 3.14

Ами аз ви дам един пример, ще се създаде програма, която ще ви изчака да въведете две цифри (в Edit1 и Edit2), както и чрез натискане на един бутон (button1, ще ги поставя и да доведе в Label1 (какво глупости пиша сериозен програмист като :) Накратко проникващо, не забравяйте да се постави цялата композиране:
създадем манипулатор събитие за бутона:
процедура Tform1.Button1Click (Sender: TObject);
започвам
Label.Caption: =
IntToStr (StrToInt (Edit1.Text) + StrToInt (Edit2.Text))
приключи;
Ако вие не разбирате, тя може да бъде направено всичко, от друга страна, това е малко повече, но това е по-лесно (когато бях същата като теб, аз го направих така, защото тя е по-лесно :)

процедура Tform1.Button1Click (Sender: TObject);
Var х, у, сума: цяло число; // декларират променливи, два номера и сумата им
започвам
х: = StrToInt (Edit1.Text); // конвертира Edit1 сред
Y: = StrToInt (Edit2.Text); // конвертира Edit2 сред
сума: = х + у; // изчисли сума
Label1.Caption: = StrToInt (сума); // Посочете размера на Label конвертиране на броя на низ
приключи;
Мисля, че това е така, набързо написал, че е погрешно, не по моя вина, и клавиатурата;)

функция inttostr (в: число): низ;

Подкрепете проекта - споделете линка, благодаря!