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

← →
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:="*";

> ZEE

> StrToInt()

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

Спасибо.

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

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