procedure TestPos; var SourceString,SubString:String; begin write('Source String: '); readln(SourceString); write('SubString: '); readln(SubString); Writeln('The index is: ',Pos(SubString,SourceString)); end; 在上面的procedure執行時, 出現這樣: Source String: SubString: 竟然沒讓我輸入SourceString而跳到輸入SubString. 我是菜鳥,剛學delphi,使用delphi7 這是甚麼原因. 發表人 - joeyta 於 2005/08/26 10:06:30

您好 基本上應是不會發生你的那個狀況. 1. 你可以試著在你的程式下中斷點(寫code畫面在readln那二行點各點一下.讓他出現紅點)，再直接由delphi中run你的程式看是否有經過你設的中斷點 2.你試著在你最一行加上Readln;讓你的程式能夠停在最後的結果畫面，且把你的畫面貼上來看看.

------
熊的學習 http://huwk.blogspot.com