Subversion Repositories fastphp

Compare Revisions

Regard whitespace Rev 101 → Rev 102

/trunk/EditorMain.pas
127,6 → 127,7
ActionGoToPHPDir: TAction;
ActionPHPInteractiveShell: TAction;
FontSizeTimer: TTimer;
RefreshModifySignTimer: TTimer;
procedure Run(Sender: TObject);
procedure RunConsole(Sender: TObject);
procedure FormShow(Sender: TObject);
192,6 → 193,7
procedure SynEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure FontSizeTimerTimer(Sender: TObject);
procedure RefreshModifySignTimerTimer(Sender: TObject);
private
hMutex: THandle;
CurSearchTerm: string;
244,6 → 246,8
var
tmp: string;
begin
if SynEdit1 = nil then exit;
 
tmp := Caption;
 
tmp := StringReplace(tmp, '*', '', [rfReplaceAll]);
906,6 → 910,13
{$ENDIF}
end;
 
procedure TForm1.RefreshModifySignTimerTimer(Sender: TObject);
begin
// This timer is a workaround for this bug:
// https://github.com/TurboPack/SynEdit/issues/246
RefreshModifySign;
end;
 
procedure TForm1.TreeView1DblClick(Sender: TObject);
var
tn: TTreeNode;