implemented tabstop

git-svn-id: trunk@4254 -

lcl/include/customgroupbox.inc

@@ -25,12 +25,21 @@ begin
   Width:= 185;
   Height:= 105;
 end;
+
+function TCustomGroupBox.CanTab: boolean;
+begin
+  Result:=false;
+end;
  
 // included by stdctrls.pp
 
 {
   $Log$
+  Revision 1.9  2003/06/10 17:23:34  mattias
+  implemented tabstop
+
   Revision 1.8  2002/08/30 06:46:03  lazarus
+
   Use comboboxes. Use history. Prettify the dialog. Preselect text on show.
   Make the findreplace a dialog. Thus removing resiying code (handled by Anchors now anyway).
   Make Anchors work again and publish them for various controls.

lcl/include/customnotebook.inc

@@ -399,6 +399,11 @@ begin
     Result:=-1;
 end;
 
+function TCustomNotebook.CanTab: boolean;
+begin
+  Result:=false;
+end;
+
 {------------------------------------------------------------------------------
   method TCustomNotebook DoCloseTabClicked
   Params: APage: TPage
@@ -751,6 +756,9 @@ end;}
 { =============================================================================
 
   $Log$
+  Revision 1.31  2003/06/10 17:23:35  mattias
+  implemented tabstop
+
   Revision 1.30  2003/04/22 13:27:10  mattias
   implemented installing components in component palette
 

lcl/stdctrls.pp

@@ -132,6 +132,7 @@ type
   protected
   public
     constructor Create(AOwner : TComponent); Override;
+    function CanTab: boolean; override;
   end;
   
   
@@ -1452,6 +1453,9 @@ end.
 { =============================================================================
 
   $Log$
+  Revision 1.95  2003/06/10 17:23:34  mattias
+  implemented tabstop
+
   Revision 1.94  2003/06/10 15:58:39  mattias
   started TLabeledEdit