summaryrefslogtreecommitdiff
path: root/examples/apps
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2011-08-31 12:26:53 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2011-08-31 12:26:53 +0200
commit87e9099e2ec148b83da98592ecb3a342c223702c (patch)
treebb63798227f3a54d9cff768b715d6639c530e884 /examples/apps
parent6af41b7b7bf5a1c8a112523c49a1cb962da8e732 (diff)
downloadfpGUI-87e9099e2ec148b83da98592ecb3a342c223702c.tar.xz
ide: named two checkboxes in the Find dialog.
Diffstat (limited to 'examples/apps')
-rw-r--r--examples/apps/ide/src/frm_find.pas24
1 files changed, 12 insertions, 12 deletions
diff --git a/examples/apps/ide/src/frm_find.pas b/examples/apps/ide/src/frm_find.pas
index 54a03237..20919e53 100644
--- a/examples/apps/ide/src/frm_find.pas
+++ b/examples/apps/ide/src/frm_find.pas
@@ -26,8 +26,8 @@ type
Label2: TfpgLabel;
chkCaseSensitive: TfpgCheckBox;
chkWholeWord: TfpgCheckBox;
- CheckBox3: TfpgCheckBox;
- CheckBox4: TfpgCheckBox;
+ chkGlobalScope: TfpgCheckBox;
+ chkSearchBackwards: TfpgCheckBox;
btnCancel: TfpgButton;
btnFind: TfpgButton;
btnHelp: TfpgButton;
@@ -147,26 +147,26 @@ begin
Text := 'Whole Words Only';
end;
- CheckBox3 := TfpgCheckBox.Create(self);
- with CheckBox3 do
+ chkGlobalScope := TfpgCheckBox.Create(self);
+ with chkGlobalScope do
begin
- Name := 'CheckBox3';
+ Name := 'chkGlobalScope';
SetPosition(16, 160, 160, 20);
FontDesc := '#Label1';
Hint := '';
TabOrder := 8;
- Text := 'CheckBox';
+ Text := 'Global Scope';
end;
- CheckBox4 := TfpgCheckBox.Create(self);
- with CheckBox4 do
+ chkSearchBackwards := TfpgCheckBox.Create(self);
+ with chkSearchBackwards do
begin
- Name := 'CheckBox4';
+ Name := 'chkSearchBackwards';
SetPosition(16, 180, 160, 20);
FontDesc := '#Label1';
Hint := '';
TabOrder := 9;
- Text := 'CheckBox';
+ Text := 'Search backwards';
end;
btnCancel := TfpgButton.Create(self);
@@ -179,8 +179,8 @@ begin
FontDesc := '#Label1';
Hint := '';
ImageName := '';
- TabOrder := 10;
ModalResult := mrCancel;
+ TabOrder := 10;
end;
btnFind := TfpgButton.Create(self);
@@ -193,8 +193,8 @@ begin
FontDesc := '#Label1';
Hint := '';
ImageName := '';
- TabOrder := 11;
ModalResult := mrOK;
+ TabOrder := 11;
end;
btnHelp := TfpgButton.Create(self);