T
taozhiyu
Unregistered / Unconfirmed
GUEST, unregistred user!
var
FileName: array [0..260] of char;
P: PChar;
while (P^ <> '.') and (P <> @FileName) do
Dec(P);
P^是什么意思？我怎么在帮助里面找不到？
FileName: array [0..260] of char;
P: PChar;
while (P^ <> '.') and (P <> @FileName) do
Dec(P);
P^是什么意思？我怎么在帮助里面找不到？
