When you open the find/ replace dialog box in Delphi, you very often may want to
search for the word where the cursor is positioned on.
Delphi offers this option - I don't know why it is not the default setting.
Delphi 1: Menu "Options | Environment", check "find text at cursor"
Delphi 2/ 3: Menu "Tools | Options", check "find text at cursor" on the Editor tab.