diff --git a/source/childwin.pas b/source/childwin.pas index bfc483f2..6074ba7c 100644 --- a/source/childwin.pas +++ b/source/childwin.pas @@ -2410,7 +2410,7 @@ begin LabelResultinfo.Caption := FormatNumber( rowsaffected ) +' row(s) affected, '+ - FormatNumber( fieldcount ) +' column(s) / '+ + FormatNumber( fieldcount ) +' column(s) x '+ FormatNumber( recordcount ) +' row(s) in last result set.'; if ( SQL.Count = 1 ) then begin diff --git a/source/createtable.pas b/source/createtable.pas index 376bbc0a..2f341d6a 100644 --- a/source/createtable.pas +++ b/source/createtable.pas @@ -543,8 +543,8 @@ begin index := -1; setLength(cols, 0); ListboxColumns.Items.Clear; - EditTableName.Text := 'TableName'; - EditFieldName.Text := 'FieldName'; + EditTableName.Text := 'Enter table name'; + EditFieldName.Text := 'Enter column name'; Editdescription.Text := ''; ButtonCreate.Enabled := false; ButtonAdd.Enabled := true; diff --git a/source/fieldeditor.pas b/source/fieldeditor.pas index d652826b..b46449de 100644 --- a/source/fieldeditor.pas +++ b/source/fieldeditor.pas @@ -196,7 +196,7 @@ begin femFieldAdd, femIndexEditor: begin CheckBoxAutoIncrement.Enabled := false; - EditFieldName.Text := 'FieldName'; + EditFieldName.Text := 'Enter column name'; ComboBoxType.ItemIndex := 1; EditLength.Text := ''; EditDefault.Text := ''; diff --git a/source/main.pas b/source/main.pas index 4bfc1251..2bbf8b8a 100644 --- a/source/main.pas +++ b/source/main.pas @@ -2016,7 +2016,7 @@ begin ok := False; while not ok do begin newVal := delimiter; - if InputQuery('Set delimiter', 'Delimiter used within SQL execution:', newVal) then try + if InputQuery('Set delimiter', 'SQL statement delimiter (default is ";"):', newVal) then try // Set new value Delimiter := newVal; ok := True;