VPF::Корпоративное переименование

lukas

Дата 21.9.2007, 21:39 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 771
Регистрация: 23.2.2007

Репутация: 3
Всего: 15

TwisT_X,

короче... используй лучше мои... они аналогичные... работают с такой же скоростью... ParamStr(n) возвращает N-ый параметр командной строки, а ParamCount - количество этих параметров, параметры отделяются пробелами....

А текст естественно легче обрабатывать в Memo, или лучше поизучай TStrings и TStringList... т.к. свойство Lines (в мемо) имеет тип TStrings...

Поэтому не обязательно загружать в мемо, если не нужно отображать графически...

Код


...
 Var
 LS:TStringList;
begin
 LS:=TStringList.Create;
 LS.LoadFromFile('C:\TXT.TXT');
 // и обрабатывай как хочешь LS
 // если в MEMO отобразить... 
 MEMO1.Lines.Assign(LS);
 LS.Free; // освобождаем память от LS и полностью удаляем ее...

Это сообщение отредактировал(а) lukas - 21.9.2007, 21:45

--------------------

http://code.google.com/p/orionphp/ - opensource скриптовой язык Orion (аналог PHP) для freepascal/delphi.

Alix

Дата 22.9.2007, 10:06 (ссылка)

(нет голосов)

Загрузка ...

L45

Профиль
Группа: Участник
Сообщений: 581
Регистрация: 4.5.2005
Где: Pskov/Spb

Репутация: 8
Всего: 23

Цитата

А текст естественно легче обрабатывать в Memo, или лучше поизучай TStrings и TStringList... т.к. свойство Lines (в мемо) имеет тип TStrings...

Не думаю что это так, особенно, если файл большой. Я бы читал построчно с помощью readln, его еще никто не отменял.

--------------------

Знание только тогда знание, когда оно приобретено усилиями своей мысли, а не памятью (с) Л. Толстой
High tech. Low live. (с) Gardner Dozois

lukas

Дата 22.9.2007, 20:26 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 771
Регистрация: 23.2.2007

Репутация: 3
Всего: 15

В Нашем случае... текстовый файл обычно редко бывает больше 1 мб... поэтому легче загрузить в TStrings и работать с ним... игра свечей не стоит... памяти много не сожрет... зато работать будет удобно, да и к тому же даю гарантию там файл не более 100 кб... зачем мудохотся с readln-ами...

--------------------

http://code.google.com/p/orionphp/ - opensource скриптовой язык Orion (аналог PHP) для freepascal/delphi.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »