Спарсить нужно в переменную

[NIKOLAYY2]

Вот эти цифры чему равен X и Y мне по очереди по таймеру нужны из этого списка что в мемо.

X = 481, Y = 174, Pix = 0025252D
X = 612, Y = 414, Pix = 00000000
X = 970, Y = 535, Pix = 00FFFFFF
X = 193, Y = 505, Pix = 00CCD2D4
X = 7, Y = 65, Pix = 00FFFFFF

Ну подробней если то таймер сработал раз, я получил в эдит-1 число 481, в эдит-2 число 174. Так нужно.
Что регулярку ставить или как, или у кого код уже есть?

[Аватар]

В таймере счетчик наращивать каждый раз и по нему доступ к нужной строке. Регулярка тут 100 лет не нужна, pos или posex в самый раз. Простейший парсинг, код зачем? Тренируйся сам

[min@y™]

TStringList даёт всё, что нужно для решения.

[NIKOLAYY2]

Аватар спс, да лан париться неохота было через pos и posex, сделал через регулярку..
min@y - так тоже было бы долго

var
r: TRegExpr;
begin
inc(tk); //текущий клик
r := TRegExpr.Create;
r.InputString := Form2.sMemo1.Lines[tk];
r.Expression := 'X = ([0-9]+), Y = ([0-9]+),';
if r.Exec then
begin
Edit1.Text := r.Match[1];
Edit2.Text := r.Match[2];
end;
end;

[min@y™]

так тоже было бы долго

смотря кто пишет код.
мне всё равно.