[JVCL-Checkins] dev/JVCL3/run JvUninstallControls.pas,1.22,1.23 - cleaned ifdefs

[André S. <asn...@us...>]

Update of /cvsroot/jvcl/dev/JVCL3/run
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30327/JVCL3/run

Modified Files:
	JvUninstallControls.pas 
Log Message:
cleaned ifdefs


Index: JvUninstallControls.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvUninstallControls.pas,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** JvUninstallControls.pas	15 Aug 2004 15:03:08 -0000	1.22
--- JvUninstallControls.pas	1 Sep 2004 11:56:17 -0000	1.23
***************
*** 57,66 ****
      procedure SetSorted(const Value: Boolean);
    protected
-     {$IFDEF VCL}
      procedure CreateHandle; override;
-     {$ENDIF VCL}
-     {$IFDEF VisualCLX}
-     procedure CreateWidget; override;
-     {$ENDIF VisualCLX}
    public
      constructor Create(AComponent: TComponent); override;
--- 57,61 ----
***************
*** 142,151 ****
      procedure SetSorted(const Value: Boolean);
    protected
-     {$IFDEF VCL}
      procedure CreateHandle; override;
-     {$ENDIF VCL}
-     {$IFDEF VisualCLX}
-     procedure CreateWidget; override;
-     {$ENDIF VisualCLX}
    public
      constructor Create(AComponent: TComponent); override;
--- 137,141 ----
***************
*** 534,538 ****
  end;
  
- {$IFDEF VCL}
  procedure TJvUninstallComboBox.CreateHandle;
  begin
--- 524,527 ----
***************
*** 541,554 ****
      Rebuild;
  end;
- {$ENDIF VCL}
- 
- {$IFDEF VisualCLX}
- procedure TJvUninstallComboBox.CreateWidget;
- begin
-   inherited CreateWidget;
-   if ItemIndex < 0 then
-     Rebuild;
- end;
- {$ENDIF VisualCLX}
  
  function TJvUninstallComboBox.GetProperties: TStrings;
--- 530,533 ----
***************
*** 687,691 ****
  end;
  
- {$IFDEF VCL}
  procedure TJvUninstallListBox.CreateHandle;
  begin
--- 666,669 ----
***************
*** 694,707 ****
      Rebuild;
  end;
- {$ENDIF VCL}
- 
- {$IFDEF VisualCLX}
- procedure TJvUninstallListBox.CreateWidget;
- begin
-   inherited CreateWidget;
-   if ItemIndex < 0 then
-     Rebuild;
- end;
- {$ENDIF VisualCLX}
  
  function TJvUninstallListBox.GetProperties: TStrings;
--- 672,675 ----