Populates a stringlist with the names of persistent MySQL databases.
Syntax:
procedure GetDabases(Pattern: String; List : TStrings);
