begin
TFileOpen('/etc/pascalplusplus.conf',"br");
}
// waruikuse(w