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

@phaser · Регистрация: 23.06.2015

Author24 — интернет-сервис помощи студентам

Ругается компилятор. Имеется некоторое (значение, данные) в формате *.txt, ну допустим число 44,
так это число необходимо присвоить переменной x.

C++

void __fastcall TForm1::FormCreate(TObject Sender)
{
TStringList* sl= new TStringList();
sl->LoadFromFile("result.txt");
int x = StrToInt(sl->Text);
Label1->Caption = x; 
}

@D1973 · 03.11.2015, 16:01

Ну, как бы, надо текст ошибки выложить...
Предположу, что вот так ругаться не будет...

C++

1	Label1->Caption = IntToStr(x);

@volvo · 03.11.2015, 16:09

Сообщение от phaser

Ругается компилятор

Не ругается. Все компилируется без единого вяка. Только полагаться на неявную конвертацию действительно не стоит. IntToStr(x), хотя можно вообще:

C++

1 2	int x = StrToInt(TFile::ReadAllText("result.txt")); // #include <System.IOUtils.hpp> Label1->Caption = IntToStr(x);

(для XE+)

@phaser · 03.11.2015, 19:39 **[ТС]**

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

C++

TStringList* sl= new TStringList();
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
sl->LoadFromFile("result.txt");
Edit1->Text= sl->Text;
Memo1->Lines->LoadFromFile("result.txt");
}
 
void __fastcall TForm1::Edit1Change(TObject *Sender)
{
if(Edit1->Focused())
      {
      sl->Add(Edit1->Text);
      sl->SaveToFile("result.txt");
    sl->Clear();
    Memo1->Lines->LoadFromFile("result.txt");
   }
}
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int x = StrToInt(Edit1->Text);
int p;
p = x  + 2;
Label1->Caption = IntToStr( p);
}

@D1973 · 04.11.2015, 14:58

phaser, посмотри в сторону INI-файлов
И кстати, на кой ляд 4 строки, когда хватает одной?

C++

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   Label1->Caption = IntToStr(StrToInt(Edit1->Text) + 2);
}

	04.11.2015, 14:58