- Upgraded Code-Inspector
- Now checks language strings - New design - Better parsing - Displays actions - Added function: can't load files twice - Updated Code-Explorer - now faster - fixed a few small bugs - now keeps selection - Updated Settings-Dialog - Fixed output bug (showed sometimes huge numbers as line numbers) - Fixed design bug (displayed wrong plugin data on start) - Fixed small bug in the color dialog - Fixed small start bug (didn't show real plugin data on startup) - Added restore function - Fixed code-explorer bug (didn't recognize @-functions) - Fixed highlight bug (had problems with ^" and ^ in strings) - Fixed potential crash bug - Fixed another highlight bug - Fixed aother code-explorer bug... - Added 2 settings (for auto-complete and calltips) - Added SCM_SETTINGS_REMOVEPAGE-message - Fixed SCM_SETTINGS_CREATEPAGE bug
This commit is contained in:
@ -159,12 +159,6 @@ type
|
||||
lblProxyHost: TLabel;
|
||||
cboProxy: TFlatComboBox;
|
||||
lblProxy: TLabel;
|
||||
pnlPCSpeed: TPanel;
|
||||
lblCPUSpeed: TLabel;
|
||||
sldSpeed: TJvxSlider;
|
||||
lblSlow: TLabel;
|
||||
lblAverage: TLabel;
|
||||
lblFast: TLabel;
|
||||
jspHalfLife: TJvStandardPage;
|
||||
pnlHLExecutable: TPanel;
|
||||
lblHLExec: TLabel;
|
||||
@ -182,6 +176,23 @@ type
|
||||
cmdBrowseAMXXDir: TFlatButton;
|
||||
cmdResetShortcuts: TFlatButton;
|
||||
txtShortcut: TFlatEdit;
|
||||
jspCTSettings: TJvStandardPage;
|
||||
pnlPCSpeed: TPanel;
|
||||
lblCPUSpeed: TLabel;
|
||||
lblSlow: TLabel;
|
||||
lblAverage: TLabel;
|
||||
lblFast: TLabel;
|
||||
sldSpeed: TJvxSlider;
|
||||
lblCodeExplorer: TLabel;
|
||||
lblCodeInspector: TLabel;
|
||||
pnlCodeInspector: TPanel;
|
||||
cmdBrowseLangDir: TFlatButton;
|
||||
txtLangDir: TFlatEdit;
|
||||
lblLangDir: TLabel;
|
||||
chkDontLoadFilesTwice: TFlatCheckBox;
|
||||
chkMakeBaks: TFlatCheckBox;
|
||||
chkDisableAC: TFlatCheckBox;
|
||||
chkDisableCT: TFlatCheckBox;
|
||||
procedure jplSettingsChange(Sender: TObject);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure FormDestroy(Sender: TObject);
|
||||
@ -243,6 +254,7 @@ type
|
||||
procedure txtShortcutKeyUp(Sender: TObject; var Key: Word;
|
||||
Shift: TShiftState);
|
||||
procedure cboFontChange(Sender: TObject);
|
||||
procedure cmdBrowseLangDirClick(Sender: TObject);
|
||||
public
|
||||
Foreground, Background: TColor;
|
||||
CaretFore, CaretBack: TColor;
|
||||
@ -979,4 +991,11 @@ begin
|
||||
TSciStyle(TSciLangItem(frmMain.sciEditor.LanguageManager.LanguageList.Items[cboLanguage.ItemIndex]).Styles.Items[lstStyles.ItemIndex]).FontName := cboFont.Text;
|
||||
end;
|
||||
|
||||
procedure TfrmSettings.cmdBrowseLangDirClick(Sender: TObject);
|
||||
var eStr: String;
|
||||
begin
|
||||
if SelectDirectory(lSelectLanguageDir, ExtractFilePath(txtLangDir.Text), eStr) then
|
||||
txtLangDir.Text := eStr;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
Reference in New Issue
Block a user