Скачать: CL | DM;

Преобразование типов либо запись в файл   Найти похожие ветки 

← →
Norfolk ©   (2003-10-29 15:10) [0]

Подскажите пожалуйста как преобразовать данные из string (буквенный) в integer(возможно и другой), либо как записать в файл string-данные.

---

← →
icWasya ©   (2003-10-29 15:21) [1]

а поподробнее -
где строки берутся ?
что нужно получить в integer
зачем пишется в файл и как будет считываться
...........

---

← →
Skier ©   (2003-10-29 15:25) [2]

> либо как записать в файл string-данные.


Примерно так :

var
StringLength : Integer;
begin
StringLength := Length(StringVar);
TStream.Write(StringLength, SizeOf(StringLength));
TStream.Write(StringVar [1], StringLength);

---

← →
Anatoly Podgoretsky ©   (2003-10-29 15:39) [3]

WriteLn(F,S)

---

← →
Norfolk ©   (2003-10-29 16:51) [4]

> а поподробнее -
> где строки берутся ?
> что нужно получить в integer
> зачем пишется в файл и как будет считываться

Строки беруться из текстового поля (LabeledEdit1.Text). Именно этот текст и надо получить в integer. В файл пишется, естественно, для того чтобы сохранить эти данные.

Да, ещё чуть не забыл, как сделать так, чтобы в поле ввода вместо символов отображались звёздочки.
Просто мне необходимо сделать прогу для проверки пароля и регистрации новых пользователей

---

← →
ZEE ©   (2003-10-29 17:00) [5]

> Norfolk © (29.10.03 16:51) [4]
>
> Строки беруться из текстового поля (LabeledEdit1.Text).
> Именно этот текст и надо получить в integer. В файл пишется,
> естественно, для того чтобы сохранить эти данные.
StrToInt()

> Да, ещё чуть не забыл, как сделать так, чтобы в поле ввода
> вместо символов отображались звёздочки.
> Просто мне необходимо сделать прогу для проверки пароля
> и регистрации новых пользователей
TEdit.PasswordChar:="*";

---

← →
Norfolk ©   (2003-10-29 17:16) [6]

> ZEE


> StrToInt()

Так можно преобразовать только символы чисел, насколько я знаю, а мне нужно именно буквенные, а за
> TEdit.PasswordChar:="*";

Спасибо.

---

← →
Anatoly Podgoretsky ©   (2003-10-29 17:18) [7]

Norfolk © (29.10.03 17:16) [6]
А вот это требует расшифровки

---

← →
icebeerg ©   (2003-10-29 18:29) [8]

-> Norfolk © (29.10.03 17:16) [6]
> Так можно преобразовать только символы чисел, насколько я знаю, а мне нужно именно буквенные
Буквенные в Integer не получиться.
Пиши в файл уж лучше, что либо типа:
For i:=1 to Length(LabeledEdit1.Text) do
Write(<File>,Ord(LabeledEdit1.Text[i]));
Пример не рабочий, но на мысль должно навести.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c