fastphpalarmingautosfxaysaliacalllibchecksum-toolscolormanagercryptochatcurrency_converterdecoderdelphiutilsdistributeddpcstudiodpg2fileformatsfilter_foundryforestgridgameht46f47_simulatorindexer_suiteipe_artfile_utilsjavautilsjumperlightgamelogviewermusikboxmystic_houseoidconverteroidinfo_apioidinfo_new_designoidpluspersonal-webbasephp_antispamphp_clientchallengephp_guestbookphp_utilsplumbersprependrecyclebinunitsimple_log_eventsokobanspacemissionstackmanuserdetect2uuid_mac_utilsvgwhoisvnagwebcounterwinbugtrackeryt_downloader

BlueGreycalmElegant

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → /trunk/FindReplace.pas @ 24

  → /trunk/FindReplace.pas @ 25

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

Regard whitespace Rev 24 → Rev 25

/trunk/FindReplace.pas
43,6 → 43,7
fEditor: TSynEdit;
fReplaceDialog: TReplaceDialog;
fFindDialog: TFindDialog;
fAutofocus: boolean;
protected
type
TFindDirection = (sdDefault, sdForwards, sdBackwards);
74,6 → 75,7
published
property Editor: TSynEdit read fEditor write fEditor;
property Autofocus: boolean read fAutofocus write fAutofocus;
end;
implementation
142,6 → 144,8
else
ShowMessage('Begin of document reached.');
end;
if fAutofocus and fEditor.CanFocus then fEditor.SetFocus;
end;
procedure TSynEditFindReplace.DoReplace(dialog: TReplaceDialog; direction: TFindDirection);
170,7 → 174,9
fEditor.EndUpdate;
end;
// TODO: numReplacements anzeigen
ShowMessageFmt('%d replaced.', [numReplacements]);
if fAutofocus and fEditor.CanFocus then fEditor.SetFocus;
end;
procedure TSynEditFindReplace.OnFind(Sender: TObject);