![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Считать определенный текст из файла [D7, WinXP]
kas86 © (2008-02-03 14:10:00)Здравствуйте, ув. знатоки Делфи! Вопрос следующего характера: Есть файл 1.txt с таким содержанием
=======================================
egiqwhehwqb723671239812738bcjbsbchd98734891273
=======================================
Каким образом прочитать из этого файла текст с 32 символа по
64-й и передать его переменной s: string;?
Раньше не сталкивался с такой проблемой! Немогу разобраться, помогите!
{RASkov} (2008-02-03 14:34:00) [21]> [2] kas86 © (03.02.08 14:22)
> Copy - это я знаю. А вот как именно достать этот кусок из
> строки???? (с 32 по 64 символ)
Пипец :(
{RASkov} (2008-02-03 14:28:00) [22]> [0] kas86 (03.02.08 14:10)
Открыть его как F: File; читать кусками по 32 байта, второй кусок и будет нужным местом...
var F: File;
Chs: array [0..31] of Char;
begin
AssignFile(F, '21.txt');
Reset(F, 1);
BlockRead(F, Chs, 32);
BlockRead(F, Chs, 32);
ShowMessage(Chs);
CloseFile(F);
end;
> [2] kas86 © (03.02.08 14:22)
> А вот как именно достать этот кусок из строки???? (с 32
> по 64 символ)
Copy + F1
kas86 (2008-02-03 14:26:00) [23]Вот Ketmar возми и ткни носом, как из переменно стринг прочесть символ с 32 по 64-й, если её получили процд. ReadLn, что дальше??
А помошь типа "читай всю строку, доставай нужный кусок. слова для F1: TextFile, AssignFile, Reset, ReadLn, CloseFile, Copy." не пойдёт , так и я могу ответить. Если ты не начинающий программист то объясни.
kas86 (2008-02-03 14:22:00) [24]TextFile, AssignFile, Reset, ReadLn, CloseFile, Copy - это я знаю. А вот как именно достать этот кусок из строки???? (с 32 по 64 символ)
ketmar (2008-02-03 14:17:00) [25]читай всю строку, доставай нужный кусок. слова для F1: TextFile, AssignFile, Reset, ReadLn, CloseFile, Copy.