Как преобразовать переменную типа textfile в string ? - Помощь студентам

239 · 04.11.2011, 19:57

процедура какая-нибудь есть?

Хамяг · 04.11.2011, 20:26

Код:

S:='';
AssignFile(F,'<адрес файла>');
Reset(F);
while not Eof(F) do
begin
  ReadLn(F,S1);
  S:=S+S1+#13#10;
end;
CloseFile(F);
if Length(S) > 0 then S:=Copy(S,1,Length(S)-2);

04.11.2011, 20:26	#2
Хамяг Форумчанин Регистрация: 22.08.2008 Сообщений: 105	Код: `S:=''; AssignFile(F,'<адрес файла>'); Reset(F); while not Eof(F) do begin ReadLn(F,S1); S:=S+S1+#13#10; end; CloseFile(F); if Length(S) > 0 then S:=Copy(S,1,Length(S)-2);`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как преобразовать String в Integer?	vitaliymaz	Паскаль, Turbo Pascal, PascalABC.NET	6	13.10.2011 19:35
Как переменную преобразовать в строку?	clever77	Microsoft Office Excel	10	16.05.2011 10:23
к переменной типа integer присвоить переменную string	Kigmatig	Помощь студентам	7	29.01.2010 21:55
Как получить адрес String строки или преобразовать String	madboy4ik	Общие вопросы по Java, Java SE, Kotlin	6	15.01.2010 11:57
Как преобразовать TextFile в String?	DragonionS	Паскаль, Turbo Pascal, PascalABC.NET	1	06.06.2007 18:38

04.11.2011, 19:57	#1
239 Регистрация: 26.10.2011 Сообщений: 5	Как преобразовать переменную типа textfile в string ? процедура какая-нибудь есть?