Fixed shortcut bug
This commit is contained in:
parent
2a2d5697b8
commit
270d898f82
@ -34,7 +34,6 @@
|
|||||||
-K$00400000
|
-K$00400000
|
||||||
-LE"c:\programme\borland\delphi7\Projects\Bpl"
|
-LE"c:\programme\borland\delphi7\Projects\Bpl"
|
||||||
-LN"c:\programme\borland\delphi7\Projects\Bpl"
|
-LN"c:\programme\borland\delphi7\Projects\Bpl"
|
||||||
-DmadExcept
|
|
||||||
-w-UNSAFE_TYPE
|
-w-UNSAFE_TYPE
|
||||||
-w-UNSAFE_CODE
|
-w-UNSAFE_CODE
|
||||||
-w-UNSAFE_CAST
|
-w-UNSAFE_CAST
|
||||||
|
@ -96,7 +96,7 @@ PackageDLLOutputDir=
|
|||||||
PackageDCPOutputDir=
|
PackageDCPOutputDir=
|
||||||
SearchPath=
|
SearchPath=
|
||||||
Packages=vcl;rtl;vclx;vclie;xmlrtl;inetdbbde;inet;inetdbxpress;VclSmp;dbrtl;dbexpress;vcldb;dsnap;dbxcds;inetdb;bdertl;vcldbx;adortl;teeui;teedb;tee;ibxpress;visualclx;visualdbclx;vclactnband;vclshlctrls;Rave50CLX;Rave50VCL;dclOffice2k;Indy70;DJcl;FlatStyle_D5;DelphiX_for7;mxFlatPack_D7;tbx_d7;tb2k_d7;mbTBXLibPack;TntUnicodeVcl_R70;SynEdit_R7
|
Packages=vcl;rtl;vclx;vclie;xmlrtl;inetdbbde;inet;inetdbxpress;VclSmp;dbrtl;dbexpress;vcldb;dsnap;dbxcds;inetdb;bdertl;vcldbx;adortl;teeui;teedb;tee;ibxpress;visualclx;visualdbclx;vclactnband;vclshlctrls;Rave50CLX;Rave50VCL;dclOffice2k;Indy70;DJcl;FlatStyle_D5;DelphiX_for7;mxFlatPack_D7;tbx_d7;tb2k_d7;mbTBXLibPack;TntUnicodeVcl_R70;SynEdit_R7
|
||||||
Conditionals=madExcept
|
Conditionals=
|
||||||
DebugSourceDirs=
|
DebugSourceDirs=
|
||||||
UsePackages=0
|
UsePackages=0
|
||||||
[Parameters]
|
[Parameters]
|
||||||
@ -115,7 +115,7 @@ AutoIncBuild=1
|
|||||||
MajorVer=1
|
MajorVer=1
|
||||||
MinorVer=0
|
MinorVer=0
|
||||||
Release=0
|
Release=0
|
||||||
Build=7
|
Build=9
|
||||||
Debug=0
|
Debug=0
|
||||||
PreRelease=1
|
PreRelease=1
|
||||||
Special=0
|
Special=0
|
||||||
@ -126,7 +126,7 @@ CodePage=1252
|
|||||||
[Version Info Keys]
|
[Version Info Keys]
|
||||||
CompanyName=AMX Mod X Dev Team
|
CompanyName=AMX Mod X Dev Team
|
||||||
FileDescription=
|
FileDescription=
|
||||||
FileVersion=1.0.0.7
|
FileVersion=1.0.0.9
|
||||||
InternalName=
|
InternalName=
|
||||||
LegalCopyright=
|
LegalCopyright=
|
||||||
LegalTrademarks=
|
LegalTrademarks=
|
||||||
@ -134,3 +134,9 @@ OriginalFilename=
|
|||||||
ProductName=AMXX-Studio
|
ProductName=AMXX-Studio
|
||||||
ProductVersion=1.0.0.0
|
ProductVersion=1.0.0.0
|
||||||
Comments=
|
Comments=
|
||||||
|
[HistoryLists\hlConditionals]
|
||||||
|
Count=1
|
||||||
|
Item0=madExcept
|
||||||
|
[HistoryLists\hlUnitAliases]
|
||||||
|
Count=1
|
||||||
|
Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
|
||||||
|
@ -1,9 +1,6 @@
|
|||||||
program AMXX_Studio;
|
program AMXX_Studio;
|
||||||
|
|
||||||
uses
|
uses
|
||||||
madExcept,
|
|
||||||
madLinkDisAsm,
|
|
||||||
madScreenShot,
|
|
||||||
Forms,
|
Forms,
|
||||||
Windows,
|
Windows,
|
||||||
Messages,
|
Messages,
|
||||||
@ -38,12 +35,13 @@ uses
|
|||||||
UnitPlugins in 'UnitPlugins.pas';
|
UnitPlugins in 'UnitPlugins.pas';
|
||||||
|
|
||||||
{ Used components:
|
{ Used components:
|
||||||
JVCL 3.0
|
- JVCL 3.0
|
||||||
FlatPack
|
- FlatPack
|
||||||
FlatStyle
|
- FlatStyle
|
||||||
Toolbar2000, TBX, SpTBX, mbTBX Lib
|
- Toolbar2000, TBX, SpTBX, mbTBX Lib
|
||||||
Scintilla and DelphiSci
|
- Scintilla and DelphiSci
|
||||||
madExcept
|
- madExcept
|
||||||
|
}
|
||||||
|
|
||||||
{$R *.res}
|
{$R *.res}
|
||||||
|
|
||||||
|
Binary file not shown.
Binary file not shown.
@ -553,7 +553,7 @@ begin
|
|||||||
if frmSettings.ShowModal = mrOk then begin
|
if frmSettings.ShowModal = mrOk then begin
|
||||||
{ Shortcuts }
|
{ Shortcuts }
|
||||||
for i := 0 to frmSettings.lvShortcuts.Items.Count - 1 do
|
for i := 0 to frmSettings.lvShortcuts.Items.Count - 1 do
|
||||||
TSciKeyCommand(frmSettings.lvShortcuts.Items[i].Data).ShortCut := ShortcutToSciKey(TextToShortCut(frmSettings.lvShortcuts.Items[i].SubItems[0]));
|
TSciKeyCommand(frmSettings.lvShortcuts.Items[i].Data).ShortCut := (TextToShortCut(frmSettings.lvShortcuts.Items[i].SubItems[0]));
|
||||||
{ Tools }
|
{ Tools }
|
||||||
if frmSettings.chkIndentGuides.Checked then
|
if frmSettings.chkIndentGuides.Checked then
|
||||||
sciEditor.Indentation := sciEditor.Indentation + [IndentationGuides]
|
sciEditor.Indentation := sciEditor.Indentation + [IndentationGuides]
|
||||||
|
@ -59,7 +59,7 @@ object frmSettings: TfrmSettings
|
|||||||
Top = 0
|
Top = 0
|
||||||
Width = 353
|
Width = 353
|
||||||
Height = 260
|
Height = 260
|
||||||
ActivePage = jspTools
|
ActivePage = jspShortcuts
|
||||||
PropagateEnable = False
|
PropagateEnable = False
|
||||||
Align = alClient
|
Align = alClient
|
||||||
OnChange = jplSettingsChange
|
OnChange = jplSettingsChange
|
||||||
@ -105,7 +105,7 @@ object frmSettings: TfrmSettings
|
|||||||
Height = 21
|
Height = 21
|
||||||
Style = csDropDownList
|
Style = csDropDownList
|
||||||
Color = clWindow
|
Color = clWindow
|
||||||
ItemHeight = 13
|
ItemHeight = 0
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
ItemIndex = -1
|
ItemIndex = -1
|
||||||
OnChange = cboLanguageChange
|
OnChange = cboLanguageChange
|
||||||
|
Loading…
Reference in New Issue
Block a user