Подскажите почему выскакивает ошибка?

Тема в разделе "Свободное общение", создана пользователем Mashroom, 12 сен 2006.

Статус темы:
Закрыта.
  1. Mashroom

    Mashroom Гость

    Вот сам код

    Код (Text):
    var
    L : TStringList;
    i,j : integer;
    begin
    L := TStringList.Create;
    for j:=StrToInt(Edit3.Text) to StrToInt(Edit4.Text) do
    begin
    i:=StrToInt(Edit1.Text);
    while i<=StrToInt(Edit2.Text) do
    l.Add(j+'.'+i);

    end;
    l.SaveToFile('1.dat');
    l.Free;
    end;
    end;
    И вот тут выскакивает ошибка l.Add(j+'.'+i); почему??? Помогите пожалуйста!
     
  2. Maniacosaur

    Maniacosaur Гость

    Напиши
    Код (Text):
    l.Add( IntToStr( j ) + '.' + IntToStr( i ) );
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей