Source position: orca_editor_material.pas line 101
procedure TMaterialDesignForm.ColorQuad1Change(
Sender: TObject
);