Source position: zrdsgn.pas line 97
procedure TZRDesignForm.tvBandsGetImageIndex(
Sender: TObject;
Node: TTreeNode
);