Реферат Розробка програми створення віртуальної фотогалереї

Процедура реакції програми на переміщення миші}

procedure TfrmGL.FormMouseMove (Sender: TObject; Shift: TShiftState; X,: Integer); Lock (mpos); not demonstrbegin: = f-(mpos.x-(wrkX))/8; : = t + (mpos.y-(wrkY))/8;; (Handle, nil, False);

end