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