pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Update Unicode Demo: replace TNotebook by TPageControl + minor improvements

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1487 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2011-02-06 21:46:07 +00:00
parent 9d6cd2caad
commit 2ca71dd2e8
4 changed files with 47 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
components/virtualtreeview-new/branches/4.8/demos/unicode/fmain.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
ExtCtrls, VirtualTrees, StdCtrls, LCLProc;
ExtCtrls, VirtualTrees, StdCtrls, LCLProc, ComCtrls;
type
@ -24,12 +24,12 @@ type
TextComboBox: TComboBox;
TextEdit: TEdit;
FontDialog1: TFontDialog;
MainNotebook: TNotebook;
LCLTextPage: TPage;
MainNotebook: TPageControl;
LCLTextPage: TTabsheet;
LCLTextTree: TVirtualStringTree;
WelcomeTopPanel: TPanel;
WelcomeTree: TVirtualStringTree;
WelcomePage: TPage;
WelcomePage: TTabsheet;
procedure AddComboTextButtonClick(Sender: TObject);
procedure AddEditTextButtonClick(Sender: TObject);
procedure AddListTextButtonClick(Sender: TObject);