Source position: fpgtkext.pp line 158
procedure ShowMessage(
const aTitle: string;
const aMessage: string
);