just another bug fix (or two)

This commit is contained in:
Christian Hammacher 2005-11-09 16:48:21 +00:00
parent 38178ea9fa
commit c4d120082b
7 changed files with 7 additions and 5 deletions

View File

@ -115,7 +115,7 @@ AutoIncBuild=1
MajorVer=1 MajorVer=1
MinorVer=3 MinorVer=3
Release=0 Release=0
Build=26 Build=28
Debug=0 Debug=0
PreRelease=0 PreRelease=0
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.3.0.26 FileVersion=1.3.0.28
InternalName= InternalName=
LegalCopyright= LegalCopyright=
LegalTrademarks= LegalTrademarks=

Binary file not shown.

Binary file not shown.

View File

@ -1093,8 +1093,8 @@ begin
if Count = 0 then if Count = 0 then
Add('', ''); Add('', '');
if (AIndex < Count) then if (AIndex -1 < Count) and (AIndex <> 0) then
Activate(AIndex, True, False) Activate(AIndex -1, True, False)
else else
Activate(0, True, False); Activate(0, True, False);
end; end;

Binary file not shown.

View File

@ -11,6 +11,7 @@ type
txtMOTD: TmxFlatMemo; txtMOTD: TmxFlatMemo;
cmdClose: TSpTBXButton; cmdClose: TSpTBXButton;
cmdCopy: TSpTBXButton; cmdCopy: TSpTBXButton;
lblLength: TLabel;
procedure cmdCopyClick(Sender: TObject); procedure cmdCopyClick(Sender: TObject);
end; end;

View File

@ -1489,7 +1489,7 @@ begin
else else
eRoot.Expand(False); eRoot.Expand(False);
{ Other Projects } { Other Projects }
eRoot := frmClose.trvFiles.Items.Add(nil, tsMain.Items[1].Caption); eRoot := frmClose.trvFiles.Items.Add(nil, tsMain.Items[2].Caption);
for i := 0 to OtherProjects.Count - 1 do begin for i := 0 to OtherProjects.Count - 1 do begin
if TDocument(OtherProjects.Items[i]).Modified then if TDocument(OtherProjects.Items[i]).Modified then
frmClose.trvFiles.Items.AddChild(eRoot, IntToStr(i + 1) + '. ' + ExtractFileName(TDocument(OtherProjects.Items[i]).FileName)); frmClose.trvFiles.Items.AddChild(eRoot, IntToStr(i + 1) + '. ' + ExtractFileName(TDocument(OtherProjects.Items[i]).FileName));
@ -1992,6 +1992,7 @@ begin
eStr[i] := '"' + eStr[i] + '^n" +'; eStr[i] := '"' + eStr[i] + '^n" +';
end; end;
frmMOTDGen.txtMOTD.Lines.Assign(eStr); frmMOTDGen.txtMOTD.Lines.Assign(eStr);
frmMOTDGen.lblLength.Caption := 'Length: ' + IntToStr(Length(eStr.Text));
eStr.Destroy; eStr.Destroy;
frmMOTDGen.ShowModal; frmMOTDGen.ShowModal;