Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.04;
Скачать: CL | DM;

Вниз

Загрузка информации из файла   Найти похожие ветки 

 
Priz_Datiy   (2002-02-13 17:06) [0]

задача такая есть файл, нужно из него загрузить текст в едит... причем не весь =))) а с begin по end (текста всмысле)


 
Fedorenko Igor   (2002-02-13 17:15) [1]

1) загрузи весь
2) грохни все что до begin и после end
3) радуйся :)


 
Fedorenko Igor   (2002-02-13 17:16) [2]

.... либо :) гоняй по файлу до begin
все что после и до end читай в твой контрол


 
skywalker ©   (2002-02-13 17:17) [3]

открой файл как байтовый
найди begin
и читай файл в буфер пока не встретится end
потом преобразуй буфер в строки и добавь их в edit
:)


 
Priz_Datiy   (2002-02-13 18:33) [4]

и ни одной строки кода???
я совсем начинающий...


 
StringList   (2002-02-13 20:19) [5]

procedure ExtractText(const FileName:string);
var
n,k:integer;
s:string;
SList:TStringList;
begin
SList:=TStringList.Create;
try
SList.LoadFromFile(FileName);
s:=SList.Text;
n:=Pos("begin",s);
if n > 0 then Inc(n,Length("begin"));
k:=Pos("end",s);
if (n > 0)and(k > 0)and(k > n) then
Memo1.Lines.Text:=Copy(s,n,k-n);
finally
SList.Free;
end;
end;


 
Anatoly Podgoretsky ©   (2002-02-13 22:10) [6]

Priz_Datiy (13.02.02 17:06)

Смысла нет, TEdit однострочный орган, а у тебя многострочный текст, или грузи в многострочный орган, типа memo, richedit или откажишь от этой мысли.



Страницы: 1 вся ветка

Текущий архив: 2002.03.04;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.007 c
1-9111
Dgiller
2002-02-16 09:06
2002.03.04
Проблемы с установкой.


14-9292
Nest
2002-01-15 14:43
2002.03.04
Встала задача сделать презентацию софта. Кто делал что-нить подобное- посоветуйте. Не могу найти доку по PowerPoint. Ещё нужна прога чтоб записать AVI-скриншот-мультик.


3-9075
Vks
2002-02-05 12:19
2002.03.04
Есть несколько относительно больших баз......


1-9102
С_тоша
2002-02-13 16:20
2002.03.04
Нужна Помощь HELP!!!!


6-9257
4ainick
2001-12-18 10:07
2002.03.04
Понял что совсем ничего непонял......