Subversion Repositories fastphp

Compare Revisions

Regard whitespace Rev 48 → Rev 49

/trunk/FindReplace.pas
140,9 → 140,9
if not found then
begin
if direction = sdForwards then
ShowMessage('End of document reached.')
MessageDlg('End of document reached.', mtInformation, [mbOk], 0)
else
ShowMessage('Begin of document reached.');
MessageDlg('Begin of document reached.', mtInformation, [mbOk], 0);
end;
 
if fAutofocus and fEditor.CanFocus then fEditor.SetFocus;