康 康夫 Unregistered / Unconfirmed GUEST, unregistred user! 2000-05-23 #2 TmpStr := ''; while not EOF(InputBuffer) do begin c := TopCharOfInputBuffer; if c <> #10 then begin TmpStr := TmpStr + c; end else begin AddTmpStrToDatabase; TmpStr := ''; end; end;
TmpStr := ''; while not EOF(InputBuffer) do begin c := TopCharOfInputBuffer; if c <> #10 then begin TmpStr := TmpStr + c; end else begin AddTmpStrToDatabase; TmpStr := ''; end; end;
S SuperMMX Unregistered / Unconfirmed GUEST, unregistred user! 2000-05-23 #4 我觉得如果有换行符的话，memo 会自动换行， 可能你要的是单行的。
