应该怎样操作这样的文本文件?(在线等待)。。。。(100分)

L

lhqnhy

Unregistered / Unconfirmed
GUEST, unregistred user!
我有一个这样的文本文件,格式如下:
aa ???????????????????
bb cccccccccccccccccccccccccccccc
dd idfjlkadsfjlsdkfjlasdkfjlask
ff kjdfkljdfkladjsfksdjf;klsd
  怎样能在这样的文本文件中读,写,检索。如将 aa 放在一个文本框中,将??????????放在memo中,也可以检索。
 
不大懂你的意思
 
读出一行文本,空格前的放到文本框,后的放到memo,应该不难吧。
 
Readln(f,s);
while not eof(f) do
begin
edit1.text := copy(s,1,pos(' ',s)-1);
memo1.Text := copy(s,pos(' ',s)+1,length(s));
readln(f,s);
end;
 
如何查找? 如我要找ff 该如何编写
 
一行一行扫描下来。
 
顶部