Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

stringlist

Дарья © (2006-04-14 15:13:00)
тут вот не получается с tstringlist;
задача какая,есть файл gg.txt,загружаю его
var
t:tstringlist;
t.Create.LoadFromFile(extractFileDir(application.exename)+'gg.txt');
пытаюсь закинуть текст в мемо,но ниче не получается
memo1.lines.text:=t.text;
t.free;
пишет ошибку

причем мне нужно чтобы загружалось сначало в stringlist
memo1.lines.loadfromfile(); -- не рассматриваю

GrayFace (2006-04-14 17:13:00) [1]
А stringlist вообще не пригоден для нетестовых файлов. Да, тут нужен учитель или, хотябы, букварь. Еще можно поспрашивать на менее серьзных форумах.
По меньшей мере,
1) e тут, мягко говоря, лишнее - s надо изменять
2) По поводу t.create, ознакомься с тем, что есть указатели
В общем тебе еще надо как Ленин завещал.

Сергей М. (2006-04-14 16:03:00) [2]
Даша, а не почитать ли тебе хоть какие-либо буквари, имеющие отношение к Делфи ?

Ведь твой код вида

> t:tstringlist;
> t.Create.

это же нонсенс ..

Desdechado (2006-04-14 15:51:00) [3]
t.Free;
finally
меняй местами

а вообще солидарен с ИШ

Ega23 (2006-04-14 15:46:00) [4]
Это ужасно... Мда..

Подозреваю, что это какой-нибудь символ табуляции.

Дарья (2006-04-14 15:44:00) [5]
хм...открываю файл,он зашифрован,хоть и приметивно,но все же
дешефрую и загружаю в мемо,но почему то в конце добавляються две палки || почему?
var
s : string;
e : string;
i : Integer;
t:tstringlist;
begin
t:=tstringlist.Create;
try
t.LoadFromFile('c:\pass.txt');
s :=t.Text;
SetLength(e, length(s));
for i := 1 to length(s) do begin
e[i] := chr(ord(s[i])-500);
end;
Memo1.Lines.Text:=e;
t.Free;
finally
end;

Игорь Шевченко (2006-04-14 15:28:00) [6]

> t.Create.LoadFromFile(extractFileDir(application.exename)+'gg.
> txt');

Книжки читать. По кулинарии.

Ega23 (2006-04-14 15:21:00) [7]
var List:TStringList; begin List:=TStringList.Create try List.LoadFromFile(....); Memo1.Lines.Assign(List); finally List.Free; end;

Но на самом деле всё проще.
Memo1.Lines.LoadFromFile(....)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »