VA
Size: a a a
2021 January 24
DB
ок, отлично
DB
initialization и concatenation уже видел и знаю, что допилили, но del/ins пока нет
b
надо получить сроку по номеру из больших файлов, tstringlist не потянет такие размеры. тоесть по сути хочу сделать функцию function getstr(filename:string; stroka:integer):string
b
как сделать оптимально?
VA
как сделать оптимально?
возможно не самый оптимальный вариант по скорости, но по факту почти готовое решение.
(пропускаешь нужное кол-во строк и в конце получаешь искомую строку)
http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TStreamReader.ReadLine
можно на его основе сделать, чтобы просто пропускать ненужные строки, не формируя на каждой итерации прочитанную строку
(пропускаешь нужное кол-во строк и в конце получаешь искомую строку)
http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TStreamReader.ReadLine
можно на его основе сделать, чтобы просто пропускать ненужные строки, не формируя на каждой итерации прочитанную строку
b
возможно не самый оптимальный вариант по скорости, но по факту почти готовое решение.
(пропускаешь нужное кол-во строк и в конце получаешь искомую строку)
http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TStreamReader.ReadLine
можно на его основе сделать, чтобы просто пропускать ненужные строки, не формируя на каждой итерации прочитанную строку
(пропускаешь нужное кол-во строк и в конце получаешь искомую строку)
http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TStreamReader.ReadLine
можно на его основе сделать, чтобы просто пропускать ненужные строки, не формируя на каждой итерации прочитанную строку
function ReadLine: string; override;
b
Как его юзать правильно?
b
Я так понимаю номер строки в скобки? edtTitle.Text := Reader.ReadLine();
VA
Как его юзать правильно?
пропускаешь нужное кол-во строк и в конце получаешь искомую строку
b
Тоесть 6 лямов?
VA
Тоесть 6 лямов?
понятия не имею, какие у тебя условия
напиши свое решение на основе ReadLine
сделай индекс (начало-длина строки) который строится один раз и будет быстро
напиши свое решение на основе ReadLine
сделай индекс (начало-длина строки) который строится один раз и будет быстро
b
function getstr(filename:string; stroka:integer):string
Var
Reader: TStreamReader;
begin
Reader :=TStreamReader.Create( filename, TEncoding.UTF8);
Var
Reader: TStreamReader;
begin
Reader :=TStreamReader.Create( filename, TEncoding.UTF8);
b
Циклом что-ли? Дальше?
I
ну да, подгрузил 64 кб, посчитал переводы строки, подгрузил следующие 64 кб и так до конца файла
I
вернее, до нахождения искомого номера
b
Igor
ну да, подгрузил 64 кб, посчитал переводы строки, подгрузил следующие 64 кб и так до конца файла
А можно код функции накидать ? я не могу понять разделение где
DB
как вариант в базу загрузить