mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: FormMode parameter to options dialog

Browse source
This commit is contained in:
Alexander Koblov 2011-06-22 16:46:39 +00:00
commit c185b0994f
3 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/foptions.lfm
View file

@ -3641,7 +3641,7 @@ object frmOptions: TfrmOptions
ColCount = 2
DefaultColWidth = 128
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goSmoothScroll]
RowCount = 9
RowCount = 10
TabOrder = 0
OnPrepareCanvas = stgArchiverCommandsPrepareCanvas
ColWidths = (

5
src/foptions.pas
View file

@ -456,6 +456,7 @@ const
stgArchiveIDPos = 6;
stgArchiveIDSeekRange = 7;
stgArchivePasswordQuery = 8;
stgArchiveFormMode = 9;
const
// Tools page: what tool is displayed in each row.
@ -559,6 +560,7 @@ begin
stgArchiverCommands.Cells[0, stgArchiveIDPos] := rsOptArchiveIDPos;
stgArchiverCommands.Cells[0, stgArchiveIDSeekRange] := rsOptArchiveIDSeekRange;
stgArchiverCommands.Cells[0, stgArchivePasswordQuery] := rsOptArchivePasswordQuery;
stgArchiverCommands.Cells[0, stgArchiveFormMode] := rsOptArchiveFormMode;
// Create and fill options editor list
CreateOptionsEditorList;
@ -1075,6 +1077,7 @@ begin
FIDPos:= Cells[1, stgArchiveIDPos];
FIDSeekRange:= Cells[1, stgArchiveIDSeekRange];
FPasswordQuery:= Cells[1, stgArchivePasswordQuery];
FFormMode:= StrToIntDef(Cells[1, stgArchiveFormMode], 0);
FOutput:= chkMultiArcOutput.Checked;
FDebug:= chkMultiArcDebug.Checked;
end;
@ -1469,6 +1472,7 @@ begin
Cells[1, stgArchiveIDPos]:= EmptyStr;
Cells[1, stgArchiveIDSeekRange]:= EmptyStr;
Cells[1, stgArchivePasswordQuery]:= EmptyStr;
Cells[1, stgArchiveFormMode]:= EmptyStr;
chkMultiArcOutput.Checked:= False;
chkMultiArcDebug.Checked:= False;
chkMultiArcEnabled.Checked:= False;
@ -1495,6 +1499,7 @@ begin
Cells[1, stgArchiveIDPos]:= FIDPos;
Cells[1, stgArchiveIDSeekRange]:= FIDSeekRange;
Cells[1, stgArchivePasswordQuery]:= FPasswordQuery;
Cells[1, stgArchiveFormMode]:= IntToStr(FFormMode);
chkMultiArcOutput.Checked:= FOutput;
chkMultiArcDebug.Checked:= FDebug;
chkMultiArcEnabled.Checked:= FEnabled;

1
src/ulng.pas
View file

@ -346,6 +346,7 @@ resourcestring
rsOptArchiveIDPos = 'ID Position:';
rsOptArchiveIDSeekRange = 'ID Seek Range:';
rsOptArchivePasswordQuery = 'Password query string:';
rsOptArchiveFormMode = 'Format parsing mode:';
//-------------------------------
rsOptEnterExt = 'Enter extension';
rsOptAssocPluginWith = 'Associate plugin "%s" with:';