Source position: gnomeclient.inc line 58
type TGnomeInteractFunction = procedure(
client: PGnomeClient;
key: gint;
dialog_type: TGnomeDialogType;
data: gpointer
);