Source position: commodities.pas line 258
procedure SetTranslate(
translator: pCxObj;
events: pInputEvent
);