Fixed search bug

Fixed print bug
Bumped version number to 1.4.2
This commit is contained in:
Christian Hammacher 2006-04-23 20:46:52 +00:00
parent fce58de726
commit 58ed3067ed
7 changed files with 15 additions and 9 deletions

View File

@ -114,8 +114,8 @@ IncludeVerInfo=1
AutoIncBuild=1 AutoIncBuild=1
MajorVer=1 MajorVer=1
MinorVer=4 MinorVer=4
Release=1 Release=2
Build=2 Build=1
Debug=0 Debug=0
PreRelease=0 PreRelease=0
Special=0 Special=0
@ -126,13 +126,13 @@ CodePage=1252
[Version Info Keys] [Version Info Keys]
CompanyName=AMX Mod X Dev Team CompanyName=AMX Mod X Dev Team
FileDescription= FileDescription=
FileVersion=1.4.1.2 FileVersion=1.4.2.1
InternalName=gaben InternalName=gaben
LegalCopyright=AMX Mod X Dev Team LegalCopyright=AMX Mod X Dev Team
LegalTrademarks= LegalTrademarks=
OriginalFilename= OriginalFilename=
ProductName=AMXX-Studio ProductName=AMXX-Studio
ProductVersion=1.4.1.0 ProductVersion=1.4.3.0
Comments= Comments=
[HistoryLists\hlConditionals] [HistoryLists\hlConditionals]
Count=1 Count=1

Binary file not shown.

Binary file not shown.

View File

@ -562,6 +562,7 @@ begin
if not Plugin_ProjectsChange(CurrProjects, Index, True) then begin if not Plugin_ProjectsChange(CurrProjects, Index, True) then begin
Started := False; Started := False;
frmMain.stlIDEs.ItemIndex := CurrProjects; frmMain.stlIDEs.ItemIndex := CurrProjects;
frmMain.cboCurrentIDE.Text := frmMain.stlIDEs.Strings[CurrProjects];
Started := True; Started := True;
exit; exit;
end; end;
@ -580,6 +581,7 @@ begin
Started := False; // dont run this command twice Started := False; // dont run this command twice
frmMain.stlIDEs.ItemIndex := Index; frmMain.stlIDEs.ItemIndex := Index;
cboCurrentIDE.Text := stlIDEs.Strings[Index];
CurrProjects := Index; CurrProjects := Index;
tbDocs.Tabs.Clear; tbDocs.Tabs.Clear;

Binary file not shown.

View File

@ -4547,7 +4547,7 @@ object frmMain: TfrmMain
object TBXSwitcher: TTBXSwitcher object TBXSwitcher: TTBXSwitcher
Theme = 'OfficeXP' Theme = 'OfficeXP'
Left = 813 Left = 813
Top = 5 Top = 7
end end
object ilImages: TImageList object ilImages: TImageList
Left = 722 Left = 722
@ -6470,6 +6470,7 @@ object frmMain: TfrmMain
Top = 36 Top = 36
end end
object sciPrinter: TSciPrinter object sciPrinter: TSciPrinter
Editor = sciEditor
Title = 'DelphiSci' Title = 'DelphiSci'
HeaderFont.Charset = DEFAULT_CHARSET HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clBlack HeaderFont.Color = clBlack
@ -6552,6 +6553,7 @@ object frmMain: TfrmMain
end end
object sciSearchReplace: TSciSearchReplace object sciSearchReplace: TSciSearchReplace
SearchForSelWord = False SearchForSelWord = False
Editor = sciEditor
Left = 692 Left = 692
Top = 36 Top = 36
end end
@ -7777,7 +7779,7 @@ object frmMain: TfrmMain
'XS_AMX' 'XS_AMX'
'XS_AMXX' 'XS_AMXX'
'xvar_exists - BLA blubb XD') 'xvar_exists - BLA blubb XD')
IgnoreCase = False IgnoreCase = True
ChooseSingle = False ChooseSingle = False
AutoHide = True AutoHide = True
DropRestOfWord = False DropRestOfWord = False
@ -7788,8 +7790,8 @@ object frmMain: TfrmMain
OnBeforeShow = sciAutoCompleteBeforeShow OnBeforeShow = sciAutoCompleteBeforeShow
MaxWidth = 0 MaxWidth = 0
MaxHeight = 5 MaxHeight = 5
Left = 844 Left = 842
Top = 6 Top = 8
end end
object ppmDocuments: TSpTBXPopupMenu object ppmDocuments: TSpTBXPopupMenu
Images = ilImages Images = ilImages

View File

@ -2967,7 +2967,8 @@ end;
procedure TfrmMain.FormCreate(Sender: TObject); procedure TfrmMain.FormCreate(Sender: TObject);
begin begin
stlIDEs.ItemIndex := 0; stlIDEs.ItemIndex := 0;
cboCurrentIDE.Text := stlIDEs.Strings[0];
sciEditor.StreamClass := TSciMyStream; sciEditor.StreamClass := TSciMyStream;
sciEditor.OnCallTipClick := sciEditorCallTipClick; // god why doesn't delphi save this sciEditor.OnCallTipClick := sciEditorCallTipClick; // god why doesn't delphi save this
eACList := TmxJsCollection.Create(TACFunction); eACList := TmxJsCollection.Create(TACFunction);
@ -2979,6 +2980,7 @@ procedure TfrmMain.stlIDEsClick(Sender: TObject);
begin begin
if (stlIDEs.Strings[stlIDEs.ItemIndex] = 'C++') and (not eCPP) then begin if (stlIDEs.Strings[stlIDEs.ItemIndex] = 'C++') and (not eCPP) then begin
stlIDEs.ItemIndex := CurrProjects; stlIDEs.ItemIndex := CurrProjects;
cboCurrentIDE.Text := stlIDEs.Strings[CurrProjects];
MessageBox(Handle, 'C++ IDE is currenty not implemented!', 'Error', MB_ICONERROR); MessageBox(Handle, 'C++ IDE is currenty not implemented!', 'Error', MB_ICONERROR);
exit; exit;
end; end;