Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Чтение из текстового файла [D6, WinXP]


#Master# ©   (2004-11-22 13:48:00) 

Помогите мастера!!!У меня есть текстовой файл, в который я записал все действия мышки в течение определённого времени(Я не знаю сколько строк в этом файле). Информация в файле имеет определённую структуру.
Например:
WM_MOUSEMOVE 868 638
WM_MOUSEMOVE 866 638
WM_MOUSEMOVE 865 638

Т.е. сначала записывается действие, затем координата X, затем координата Y
Вопрос:
Каким образом мне получить всю информацию в файле, чтобы действие мыши записывалось в одну переменную, её X координата в другую переменную и координата Y соответственно в третью переменную.
Спасибо!!!


#Master#   (2004-11-22 18:56:00) [1]

Спасибо всем!!! Парсинг я усвоил(тоже спасибо), а за код от cae ОГРОМНОЕ СПАСИБО!!!Ведь на примерах понимать новичку в этой области легче.:)))


cae   (2004-11-22 15:45:00) [2]

Вот самый простой вариант :

var
i : Integer ;
LSource,LParse : TStringList ;
Command,XPos,YPos : String ;
begin
LSource := TStringList.Create ;
LParse := TStringList.Create ;
LParse.Delimiter := ' ' ;
try
LSource.LoadFromFile('MyFile.txt');
  for i := 0 to LSource.Count - 1 do
  begin
   try
    LParse.DelimitedText := LSource[i] ;

    Command := LParse[0] ;
    XPos    := LParse[1] ;
    YPos    := LParse[2] ;
   except
    raise Exception.Create('Ошибка разбора');
   end ;
  end ; //for i
finally
 LSource.Free ;
 LParse.Free;
end ;
end;


clickmaker   (2004-11-22 15:41:00) [3]


> [4] #Master#   (22.11.04 15:02)
> clickmaker, а можно поподробнее...

парсинг строки - разбор на отдельные лексемы, разделенные каким-либо символом, в данном случае пробелом
Чешешь по строке в цикле, дошел до первого разделителя - записал часть строки до него в первую лексему и т.д.


Anatoly Podgoretsky   (2004-11-22 15:35:00) [4]

Ты мастер в какой области?


Anatoly Podgoretsky   (2004-11-22 15:34:00) [5]

Parse = разбор(ка)


TUser   (2004-11-22 15:30:00) [6]


> ЧТО ЭТО ЕСТЬ ПАРСИНГ????

Преобразование в удобную для работы форму. Например, в твоем случае - в массив записей, каждая из которых содержит 3 поля - сообщение, и 2 числа


#Master#   (2004-11-22 15:25:00) [7]

ЧТО ЭТО ЕСТЬ ПАРСИНГ????


Ega23   (2004-11-22 15:04:00) [8]

А куда подробнее?


#Master#   (2004-11-22 15:02:00) [9]

clickmaker, а можно поподробнее...


clickmaker   (2004-11-22 14:48:00) [10]

StringList.LoadFromFile
потом парсинг каждой строчки


#Master#   (2004-11-22 14:13:00) [11]

Перефразирую вопрос(специально для Warlock'а): мне нужно распределить данные, находящиеся на одной строчке в текстовом файле и разделённые только пробелом, по разным переменным. И вообще можно поподробнее. Пожалуйста!!!


Warlock   (2004-11-22 14:02:00) [12]

Массив записей


Наверх

Титульная страница Поиск, карта сайта Написать письмо