"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "app/form_menu_commands.pas" between
CudaText-1.92.0.tar.gz and CudaText-1.93.0.tar.gz

About: CudaText is a cross-platform text editor (written in Lazarus).

form_menu_commands.pas  (CudaText-1.92.0):form_menu_commands.pas  (CudaText-1.93.0)
skipping to change at line 52 skipping to change at line 52
procedure editChange(Sender: TObject); procedure editChange(Sender: TObject);
procedure FormCreate(Sender: TObject); procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject); procedure FormDestroy(Sender: TObject);
procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
procedure FormShow(Sender: TObject); procedure FormShow(Sender: TObject);
procedure listClick(Sender: TObject); procedure listClick(Sender: TObject);
procedure listDrawItem(Sender: TObject; C: TCanvas; AIndex: integer; procedure listDrawItem(Sender: TObject; C: TCanvas; AIndex: integer;
const ARect: TRect); const ARect: TRect);
private private
{ private declarations } { private declarations }
keymapList: TList; keymapList: TFPList;
FOnMsg: TStrEvent; FOnMsg: TStrEvent;
FColorBg: TColor; FColorBg: TColor;
FColorBgSel: TColor; FColorBgSel: TColor;
FColorFont: TColor; FColorFont: TColor;
FColorFontSel: TColor; FColorFontSel: TColor;
FColorFontHilite: TColor; FColorFontHilite: TColor;
FColorFontHotkey: TColor; FColorFontHotkey: TColor;
PanelInfo: TLabel; PanelInfo: TLabel;
procedure DoConfigKey(Cmd: integer); procedure DoConfigKey(Cmd: integer);
procedure DoFilter; procedure DoFilter;
skipping to change at line 184 skipping to change at line 184
OptShowRecents:= true; OptShowRecents:= true;
OptAllowConfig:= true; OptAllowConfig:= true;
OptFocusedCommand:= 0; OptFocusedCommand:= 0;
edit.DoubleBuffered:= UiOps.DoubleBuffered; edit.DoubleBuffered:= UiOps.DoubleBuffered;
list.DoubleBuffered:= UiOps.DoubleBuffered; list.DoubleBuffered:= UiOps.DoubleBuffered;
ResultCommand:= 0; ResultCommand:= 0;
ResultHotkeysChanged:= false; ResultHotkeysChanged:= false;
keymapList:= TList.Create; keymapList:= TFPList.Create;
PanelInfo:= TLabel.Create(Self); PanelInfo:= TLabel.Create(Self);
PanelInfo.Hide; PanelInfo.Hide;
PanelInfo.Parent:= Self; PanelInfo.Parent:= Self;
PanelInfo.Align:= alClient; PanelInfo.Align:= alClient;
PanelInfo.Font.Name:= UiOps.VarFontName; PanelInfo.Font.Name:= UiOps.VarFontName;
PanelInfo.Font.Size:= AppScaleFont(UiOps.VarFontSize); PanelInfo.Font.Size:= AppScaleFont(UiOps.VarFontSize);
PanelInfo.BorderSpacing.Around:= 20; PanelInfo.BorderSpacing.Around:= 20;
PanelInfo.Caption:= msgCmdPalettePrefixHelp; PanelInfo.Caption:= msgCmdPalettePrefixHelp;
end; end;
 End of changes. 2 change blocks. 
2 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)