Сообщение от im_zorg
кинь пример
|
Program ParseTest;
Uses parse, resloader;
Var s: string;
i: integer;
Begin
s:=LoadText('test.txt');
debug(s);
parse.line(s, ',');
for i:=0 to parse.len-1 do DrawText(parse.get(i), 5, i* 15 + 5);
Repaint;
Delay(5000);
End.
В файле test.txt было такое содержимое: