Source position: line 0
procedure GetFiles(
Dir: String;
const wildcard: String;
var result: TFileNames
); overload;procedure GetFiles(
); overload;