SaveText.Ru

Без имени
  1. procedure TForm1.FormCreate(Sender: TObject);
  2. begin
  3.   CountN:=4; CountC:=0;
  4.   ListBox1.Items.LoadFromFile('Fiz_1.txt');
  5.   ListBox2.Items.LoadFromFile('Fiz_2.txt');
  6. end;  

Share with your friends:

Print