Source position: commodities.pas line 159
procedure SetTranslate(
Translator: PCxObj;
Events: PInputEvent
);