Terminology and similar updates (followup).

This commit is contained in:
rosenfield.albert
2008-08-08 08:22:42 +00:00
parent ae87769f9c
commit df37fb8be0
4 changed files with 5 additions and 5 deletions

View File

@@ -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

View File

@@ -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;

View File

@@ -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 := '';

View File

@@ -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;