paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 00:39:44 +02:00
Code Issues Packages Projects Releases Wiki Activity

examples: remove Crl3D, ParentCtl3D properties

Browse Source 
git-svn-id: trunk@18516 -
This commit is contained in:
paul 2009-01-31 12:02:35 +00:00
parent e999f6d313
commit 04c9b5cd74
2 changed files with 23 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
examples/testallform.pp
View File

@ -1248,7 +1248,7 @@ ComboBox1 := TComboBox.Create(Self);
Color := clRed;
//Columns := 0;
//Constraints :=
Ctl3D := True;
//Ctl3D := True;
Cursor := crDefault;
//DirLabel :=
DragCursor := crDrag;
@ -1274,7 +1274,7 @@ ComboBox1 := TComboBox.Create(Self);
Name := 'DirectoryListBox1';
//ParentBiDiMode := True;
ParentColor := False;
ParnetCtl3D := True;
//ParnetCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -1301,7 +1301,7 @@ ComboBox1 := TComboBox.Create(Self);
BorderStyle := bsSingle;
ColCount := 5;
Color := clWindow;
Ctl3D := True;
//Ctl3D := True;
Cursor := crDefault;
DefaultColWidth := 64;
DefaultDrawing := True;
@ -1327,7 +1327,7 @@ ComboBox1 := TComboBox.Create(Self);
Name := 'DrawGrid1';
//Options
ParentColor := False;
ParentCtl3D := True;
//ParentCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -1354,7 +1354,7 @@ ComboBox1 := TComboBox.Create(Self);
//BiDiMode := bdLeftToRight;
Color := clWindow;
Ctl3D := True;
//Ctl3D := True;
//Constraints :=
Cursor := crDefault;
//DirList :=
@ -1377,7 +1377,7 @@ ComboBox1 := TComboBox.Create(Self);
Name := 'DriveComboBox1';
//ParentBiDiMode := True;
ParentColor := False;
ParenCtl3D := True;
//ParenCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -1406,7 +1406,7 @@ Edit1 := TEdit.Create(Self);
BorderStyle := bsSingle;
//CharCase := ecNormal;
Color := clRed;
Ctl3D := True;
//Ctl3D := True;
Cursor := crDefault;
DragCursor := crDrag;
DragMode := dmManual;
@ -1455,7 +1455,7 @@ Edit1 := TEdit.Create(Self);
Anchors := FileListBox1.Anchors + [akTop,akLeft];
BorderStyle := bsSingle;
Color := clWindow;
Ctl3D := True;
//Ctl3D := True;
Cursor := crDefault;
DragCursor := crDrag;
DragMode := dmManual;
@ -1482,7 +1482,7 @@ Edit1 := TEdit.Create(Self);
MultiSelect := True;
Name := 'FileListBox1';
ParentColor := False;
ParentCtl3D := True;
//ParentCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -1507,7 +1507,7 @@ Edit1 := TEdit.Create(Self);
OnChange := @EventOnChange;
Color := clWindow;
Ctl3D := True;
//Ctl3D := True;
Cursor := crDefault;
DragCursor := crDrag;
DragMode := dmManual;
@ -1529,7 +1529,7 @@ Edit1 := TEdit.Create(Self);
Left := 10;
Name := 'FilterComboBox1';
ParentColor := False;
ParenCtl3D := True;
//ParenCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -1560,7 +1560,7 @@ GroupBox1 := TGroupBox.Create(Self);
Top := 10;
Width := 300;
Height := 150;
Ctl3D := False;
//Ctl3D := False;
Caption := 'GroupBox1';
Visible := True;
end;
@ -1662,7 +1662,7 @@ ListBox1 := TListBox.Create(Self);
BorderStyle := bsSingle;
Color := clRed;
//Columns := 0; //Identifier no found
Ctl3D := False;
//Ctl3D := False;
//Constraints := //Identifier no found
Cursor := crDefault; //Only crDefault
DragCursor := crDrag;
@ -1709,7 +1709,7 @@ ListBox1 := TListBox.Create(Self);
Name := 'ListBox1';
//ParentBiDiMode := True; //Identifier not found
ParentColor := False;
ParentCtl3D := True;
//ParentCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -1784,7 +1784,7 @@ ListBox2 := TListBox.Create(Self);
BorderStyle := bsSingle;
CharCase := ecNormal;
Color := clWindow;
Ctl3D := True;
//Ctl3D := True;
Cursor := crDefault;
DragCursor := crDrag;
DragMode := dmManual;
@ -1806,7 +1806,7 @@ ListBox2 := TListBox.Create(Self);
MaxLength := 0;
Name := 'MasEdit1';
ParentColor := False;
ParentCtl3D := True;
//ParentCtl3D := True;
ParentFont := True;
ParentShowHint := True;
PasswordChar := #0;
@ -1869,7 +1869,7 @@ Memo1 := TMemo.Create(Self);
//Alignment := taLeftJustify;
BorderStyle := bsSingle;
Color := clYellow;
Ctl3D := False;
//Ctl3D := False;
Cursor := crDefault;
DragCursor := crDrag;
DragMode := dmManual;
@ -1895,7 +1895,7 @@ Memo1 := TMemo.Create(Self);
Name := 'Memo1';
//OEMConvert := False;
ParentColor := False;
ParentCtl3D := False;
//ParentCtl3D := False;
ParentFont := False;
ParentShowHint := True;
PopupMenu := PopupMenu1;
@ -2051,7 +2051,7 @@ Panel2 := TPanel.Create (Form1);
Parent := BenchForm[33];
Align := alBottom;
Height := 150;
Ctl3D := False;
//Ctl3D := False;
Caption := 'Panel1';
Visible := True;
end;
@ -2195,7 +2195,7 @@ ScrollBar1 := TScrollBar.Create(Self);
//OnMouseMove := @MMove;
OnMouseMove := @EventOnMouseMove;
Ctl3D := False;
//Ctl3D := False;
Cursor := crDefault;
DragCursor := crDrag;
DragMode := dmManual;
@ -2209,7 +2209,7 @@ ScrollBar1 := TScrollBar.Create(Self);
//Max := 100;
//Min := 0;
Name := 'ScrollBar1';
ParentCtl3D := True;
//ParentCtl3D := True;
ParentShowHint := True;
PopupMenu := PopupMenu1;
//Position := 0;

4
examples/testtools.inc
View File

@ -1604,7 +1604,7 @@ gbAbout := TGroupBox.Create(Self);
Top := 5;
Width := 407;
Height := 160;
Ctl3D := False;
//Ctl3D := False;
Caption := ' About this application ';
Visible := True;
end;
@ -2222,7 +2222,7 @@ begin
Top := 10;
Width := 300;
Height := 100;
Ctl3D := False;
//Ctl3D := False;
Caption := 'Panel1';
Visible := True;
Align := alNone;