mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-15 21:19:07 +02:00
examples: remove Crl3D, ParentCtl3D properties
git-svn-id: trunk@18516 -
This commit is contained in:
parent
e999f6d313
commit
04c9b5cd74
@ -1248,7 +1248,7 @@ ComboBox1 := TComboBox.Create(Self);
|
|||||||
Color := clRed;
|
Color := clRed;
|
||||||
//Columns := 0;
|
//Columns := 0;
|
||||||
//Constraints :=
|
//Constraints :=
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
//DirLabel :=
|
//DirLabel :=
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
@ -1274,7 +1274,7 @@ ComboBox1 := TComboBox.Create(Self);
|
|||||||
Name := 'DirectoryListBox1';
|
Name := 'DirectoryListBox1';
|
||||||
//ParentBiDiMode := True;
|
//ParentBiDiMode := True;
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParnetCtl3D := True;
|
//ParnetCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -1301,7 +1301,7 @@ ComboBox1 := TComboBox.Create(Self);
|
|||||||
BorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
ColCount := 5;
|
ColCount := 5;
|
||||||
Color := clWindow;
|
Color := clWindow;
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DefaultColWidth := 64;
|
DefaultColWidth := 64;
|
||||||
DefaultDrawing := True;
|
DefaultDrawing := True;
|
||||||
@ -1327,7 +1327,7 @@ ComboBox1 := TComboBox.Create(Self);
|
|||||||
Name := 'DrawGrid1';
|
Name := 'DrawGrid1';
|
||||||
//Options
|
//Options
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParentCtl3D := True;
|
//ParentCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -1354,7 +1354,7 @@ ComboBox1 := TComboBox.Create(Self);
|
|||||||
|
|
||||||
//BiDiMode := bdLeftToRight;
|
//BiDiMode := bdLeftToRight;
|
||||||
Color := clWindow;
|
Color := clWindow;
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
//Constraints :=
|
//Constraints :=
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
//DirList :=
|
//DirList :=
|
||||||
@ -1377,7 +1377,7 @@ ComboBox1 := TComboBox.Create(Self);
|
|||||||
Name := 'DriveComboBox1';
|
Name := 'DriveComboBox1';
|
||||||
//ParentBiDiMode := True;
|
//ParentBiDiMode := True;
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParenCtl3D := True;
|
//ParenCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -1406,7 +1406,7 @@ Edit1 := TEdit.Create(Self);
|
|||||||
BorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
//CharCase := ecNormal;
|
//CharCase := ecNormal;
|
||||||
Color := clRed;
|
Color := clRed;
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
DragMode := dmManual;
|
DragMode := dmManual;
|
||||||
@ -1455,7 +1455,7 @@ Edit1 := TEdit.Create(Self);
|
|||||||
Anchors := FileListBox1.Anchors + [akTop,akLeft];
|
Anchors := FileListBox1.Anchors + [akTop,akLeft];
|
||||||
BorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
Color := clWindow;
|
Color := clWindow;
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
DragMode := dmManual;
|
DragMode := dmManual;
|
||||||
@ -1482,7 +1482,7 @@ Edit1 := TEdit.Create(Self);
|
|||||||
MultiSelect := True;
|
MultiSelect := True;
|
||||||
Name := 'FileListBox1';
|
Name := 'FileListBox1';
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParentCtl3D := True;
|
//ParentCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -1507,7 +1507,7 @@ Edit1 := TEdit.Create(Self);
|
|||||||
OnChange := @EventOnChange;
|
OnChange := @EventOnChange;
|
||||||
|
|
||||||
Color := clWindow;
|
Color := clWindow;
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
DragMode := dmManual;
|
DragMode := dmManual;
|
||||||
@ -1529,7 +1529,7 @@ Edit1 := TEdit.Create(Self);
|
|||||||
Left := 10;
|
Left := 10;
|
||||||
Name := 'FilterComboBox1';
|
Name := 'FilterComboBox1';
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParenCtl3D := True;
|
//ParenCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -1560,7 +1560,7 @@ GroupBox1 := TGroupBox.Create(Self);
|
|||||||
Top := 10;
|
Top := 10;
|
||||||
Width := 300;
|
Width := 300;
|
||||||
Height := 150;
|
Height := 150;
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
Caption := 'GroupBox1';
|
Caption := 'GroupBox1';
|
||||||
Visible := True;
|
Visible := True;
|
||||||
end;
|
end;
|
||||||
@ -1662,7 +1662,7 @@ ListBox1 := TListBox.Create(Self);
|
|||||||
BorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
Color := clRed;
|
Color := clRed;
|
||||||
//Columns := 0; //Identifier no found
|
//Columns := 0; //Identifier no found
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
//Constraints := //Identifier no found
|
//Constraints := //Identifier no found
|
||||||
Cursor := crDefault; //Only crDefault
|
Cursor := crDefault; //Only crDefault
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
@ -1709,7 +1709,7 @@ ListBox1 := TListBox.Create(Self);
|
|||||||
Name := 'ListBox1';
|
Name := 'ListBox1';
|
||||||
//ParentBiDiMode := True; //Identifier not found
|
//ParentBiDiMode := True; //Identifier not found
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParentCtl3D := True;
|
//ParentCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -1784,7 +1784,7 @@ ListBox2 := TListBox.Create(Self);
|
|||||||
BorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
CharCase := ecNormal;
|
CharCase := ecNormal;
|
||||||
Color := clWindow;
|
Color := clWindow;
|
||||||
Ctl3D := True;
|
//Ctl3D := True;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
DragMode := dmManual;
|
DragMode := dmManual;
|
||||||
@ -1806,7 +1806,7 @@ ListBox2 := TListBox.Create(Self);
|
|||||||
MaxLength := 0;
|
MaxLength := 0;
|
||||||
Name := 'MasEdit1';
|
Name := 'MasEdit1';
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParentCtl3D := True;
|
//ParentCtl3D := True;
|
||||||
ParentFont := True;
|
ParentFont := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PasswordChar := #0;
|
PasswordChar := #0;
|
||||||
@ -1869,7 +1869,7 @@ Memo1 := TMemo.Create(Self);
|
|||||||
//Alignment := taLeftJustify;
|
//Alignment := taLeftJustify;
|
||||||
BorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
Color := clYellow;
|
Color := clYellow;
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
DragMode := dmManual;
|
DragMode := dmManual;
|
||||||
@ -1895,7 +1895,7 @@ Memo1 := TMemo.Create(Self);
|
|||||||
Name := 'Memo1';
|
Name := 'Memo1';
|
||||||
//OEMConvert := False;
|
//OEMConvert := False;
|
||||||
ParentColor := False;
|
ParentColor := False;
|
||||||
ParentCtl3D := False;
|
//ParentCtl3D := False;
|
||||||
ParentFont := False;
|
ParentFont := False;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
@ -2051,7 +2051,7 @@ Panel2 := TPanel.Create (Form1);
|
|||||||
Parent := BenchForm[33];
|
Parent := BenchForm[33];
|
||||||
Align := alBottom;
|
Align := alBottom;
|
||||||
Height := 150;
|
Height := 150;
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
Caption := 'Panel1';
|
Caption := 'Panel1';
|
||||||
Visible := True;
|
Visible := True;
|
||||||
end;
|
end;
|
||||||
@ -2195,7 +2195,7 @@ ScrollBar1 := TScrollBar.Create(Self);
|
|||||||
//OnMouseMove := @MMove;
|
//OnMouseMove := @MMove;
|
||||||
OnMouseMove := @EventOnMouseMove;
|
OnMouseMove := @EventOnMouseMove;
|
||||||
|
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
Cursor := crDefault;
|
Cursor := crDefault;
|
||||||
DragCursor := crDrag;
|
DragCursor := crDrag;
|
||||||
DragMode := dmManual;
|
DragMode := dmManual;
|
||||||
@ -2209,7 +2209,7 @@ ScrollBar1 := TScrollBar.Create(Self);
|
|||||||
//Max := 100;
|
//Max := 100;
|
||||||
//Min := 0;
|
//Min := 0;
|
||||||
Name := 'ScrollBar1';
|
Name := 'ScrollBar1';
|
||||||
ParentCtl3D := True;
|
//ParentCtl3D := True;
|
||||||
ParentShowHint := True;
|
ParentShowHint := True;
|
||||||
PopupMenu := PopupMenu1;
|
PopupMenu := PopupMenu1;
|
||||||
//Position := 0;
|
//Position := 0;
|
||||||
|
@ -1604,7 +1604,7 @@ gbAbout := TGroupBox.Create(Self);
|
|||||||
Top := 5;
|
Top := 5;
|
||||||
Width := 407;
|
Width := 407;
|
||||||
Height := 160;
|
Height := 160;
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
Caption := ' About this application ';
|
Caption := ' About this application ';
|
||||||
Visible := True;
|
Visible := True;
|
||||||
end;
|
end;
|
||||||
@ -2222,7 +2222,7 @@ begin
|
|||||||
Top := 10;
|
Top := 10;
|
||||||
Width := 300;
|
Width := 300;
|
||||||
Height := 100;
|
Height := 100;
|
||||||
Ctl3D := False;
|
//Ctl3D := False;
|
||||||
Caption := 'Panel1';
|
Caption := 'Panel1';
|
||||||
Visible := True;
|
Visible := True;
|
||||||
Align := alNone;
|
Align := alNone;
|
||||||
|
Loading…
Reference in New Issue
Block a user