[Kristofer]

предисловие

var
Fl:TFileStream;
F:TStrings;
I:integer;
begin
Fl:=TFileStream.Create('log.log', fmCreate); //создаем
Fl.Free; //уничтожаем
F:=TStringList.Create(); //открываем
F.LoadFromFile('log.log'); //файл...
F.Add('строка'); //добавляем строки

вопрос:
как удалить последний символ в открытом мною файле
номер которого (символа) неизвестен, но он стоит слева от курсора
и продолжить добавление строк дальше

[Kristofer]

подробно:

var
Fl:TFileStream;
F:TStrings;
I:integer;
begin
Fl:=TFileStream.Create('log.log', fmCreate); //создаем
Fl.Free; //уничтожаем
F:=TStringList.Create(); //открываем
F.LoadFromFile('log.log'); //файл...
F.Add('строка'); //добавляем строки
F.Add('строка'); //добавляем строки
F.Add('строка'); //добавляем строки
F.Add('строка'); //добавляем строки
...
удаляем символ
...
F.Free;
end;

в итоге должны получить:

строка
строка
строка
строка
строка
строк

[Admin]

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

предисловие

var
Fl:TFileStream;
F:TStrings;
I:integer;
begin
Fl:=TFileStream.Create('log.log', fmCreate); //создаем
Fl.Free; //уничтожаем
F:=TStringList.Create(); //открываем
F.LoadFromFile('log.log'); //файл...
F.Add('строка'); //добавляем строки

вопрос:
как удалить последний символ в открытом мною файле
номер которого (символа) неизвестен, но он стоит слева от курсора
и продолжить добавление строк дальше

Не забывай использовать тег CODE иначе последуют санции.