ExtractFilePath(ParamStr(0));
ExtractFilePath(Application->ExeName);