如果有有一個變數 str := 'abyz 5/16'; 如果分割成二個值 abyz 5/16

您好: 以下這篇請參考 http://delphi.ktop.com.tw/topic.php?topic_id=28525

var str,s1,s2 :string i:integer; begin str := 'abyz 5/16'; i:=pos(' ',str); s1:= copy(str,1,i-1); s2:= copy(str,i 1,length(str));