delphi ใช้คำสั่ง Split อักขระ แบบไหนครับอาจารย์

[huwko]

รบกวนอาจารย์แนะนำหน่อยครับ คือผมต้องการตัดคำใน text นะคับ ประมาณนี้

10xxx|012084|314230|20120702|10xxx|2|1|9|1|20120709105413|2320200023164


ต้องการแบ่งคำนะครับผมจากอักขระ |   นะคับ

[Programmer_O]

 var    lst : TStringList;   

begin
 lst := TStringList.Create;
              lst.Clear;
              lst.StrictDelimiter := true;
              lst.Delimiter := '|';
              lst.DelimitedText := ตรงนี้ก็ใส่ตัวแปร string หรือข้อความที่ต้องการได้เลยครับ;

เวลาเรียกใช้ก็ lst[0]

[huwko]

ขอบคุณมากครับผม..