var A,B,C: TOpenCLMatrix; begin clMtxVec.CreateIt(A,B,C); try A.SetIt(2,2,False,[1,2, 2,4)); B.SetIt(2,2,False,[1,2, 2,4)); C.MulElem(A,B); // C becomes: // [1, 4, // 4,16] finally clMtxVec.FreeIt(A,B,C); end; end;