| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Преобразование String в Integer.

Src_Crab ©   (2002-07-12 20:52:00) 

Добрый вечер.

Нужно перевести String в Integer. Спасибо.

---

Новенький в Делфи   (2002-07-13 01:10:00) [1]

тьфу... сорри в моём сообщении наоборот
Edit1.text:=IntToStr(2);
путаю постоянно :)

---

Secam   (2002-07-12 23:06:00) [2]

procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
i:=10;
edit1.text:=InttoStr(i);
end;
Тогда В edit1 будет написано 10.

Результат StrToInt имеет тип integer, а в скобочках указывается строка, содержащая число, например "6542"

Результат InttoStr имеет тип String, а в скобочках указывается integer, например 6542.

edit1.text имеет тип String;

---

Новенький в Делфи   (2002-07-12 23:03:00) [3]

я тоже не догоняю в чём вопрос?...
Edit1.text:=StrToInt("2");
..или я совсем не догнал? :)

---

-=Sergeante=-   (2002-07-12 22:59:00) [4]


procedure TForm1.FormCreate(Sender: TObject);
var s:string;
begin
edit1.text:=Strtoint ("two");
end;


Я не догоняю?.. >>


uses SysUtils;
function StrToInt(const S: string): Integer;
var
E: Integer;
begin
Val(S, Result, E);
if E <> 0 then ConvertErrorFmt(@SInvalidInteger, [S]);
end;


Ошибка компиляции: Incompatible types: "String" and "Integer"

---

Viewer   (2002-07-12 21:49:00) [5]

Петров день - не забудем.

---

Anatoly Podgoretsky   (2002-07-12 21:33:00) [6]

День сюрпризов :-)

---

TTCustomDelphiMaster   (2002-07-12 21:21:00) [7]

> Src_Crab (12.07.02 21:02)
> Спасибо.
>
> А как преобразовать обратно - Integer в String;

Ты наверное удивишся
IntToStr(что-нибудь)

---

Anatoly Podgoretsky   (2002-07-12 21:05:00) [8]

В общем случае не возможно, разве что для правильных чисел, для это хватит начального знания языка, с этой задачей справился даже начинающий програмер

---

Src_Crab   (2002-07-12 21:02:00) [9]

Спасибо.

А как преобразовать обратно - Integer в String;

---

начинающий програмер   (2002-07-12 20:54:00) [10]

StrToInt(что-нибудь)

---

Наверх