If you don't want to use the "delimitedText" try this way:
Delphi-Quellcode:
{pseudocode}
for i:=0 to lines.count-1 do begin
if (pos('R:',line)>0) and
(pos('G:',line)>0) and
(pos('B:',line)>0) and
(pos('PANTONE',line)>0) then
GetDatafromLine(line)
else
donothing;
end;
Greetings
K-H