From: Marcel B. <jed...@us...> - 2004-04-16 09:19:52
|
Update of /cvsroot/jvcl/dev/JVCL3/examples/JvInspector In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15353/dev/JVCL3/examples/JvInspector Modified Files: InspectorExampleMain.pas Log Message: Allow controls to be selected for the test form's properties and component properties that expect a TComponent/TControl. Index: InspectorExampleMain.pas =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/examples/JvInspector/InspectorExampleMain.pas,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** InspectorExampleMain.pas 12 Feb 2004 08:15:23 -0000 1.6 --- InspectorExampleMain.pas 16 Apr 2004 09:19:43 -0000 1.7 *************** *** 250,253 **** --- 250,258 ---- begin AddOwner(Self); + end + else if Item is TJvInspectorComponentItem then + with Item as TJvInspectorComponentItem do + begin + AddOwner(frmTest); end; end; |