SelectIntervalEdit.Text := IntToStr(GikoSys.Setting.SelectInterval);
//dat\97\8e\82¿\83X\83\8c\83\\81[\83g\8f\87
- case GikoSys.Setting.DatOchiSortIndex of
- 0:
+ case TGikoBoardColumnID( GikoSys.Setting.DatOchiSortIndex ) of
+ gbcTitle:
if GikoSys.Setting.DatOchiSortOrder then
DatOchiSortCombo.ItemIndex := 1
else
DatOchiSortCombo.ItemIndex := 2;
- 6:
+ gbcLastModified:
if GikoSys.Setting.DatOchiSortOrder then
DatOchiSortCombo.ItemIndex := 3
else
DatOchiSortCombo.ItemIndex := 4;
- 7:
+ gbcCreated:
if GikoSys.Setting.DatOchiSortOrder then
DatOchiSortCombo.ItemIndex := 5
else
0: GikoSys.Setting.DatOchiSortIndex := -1; //\95À\82Ñ\91Ö\82¦\82µ\82È\82¢
1: begin //\83X\83\8c\94Ô\8d\86(\8f¸\8f\87)
GikoSys.Setting.DatOchiSortOrder := true;
- GikoSys.Setting.DatOchiSortIndex := 0;
+ GikoSys.Setting.DatOchiSortIndex := Ord( gbcTitle );
end;
2: begin //\83X\83\8c\94Ô\8d\86(\8d~\8f\87)
GikoSys.Setting.DatOchiSortOrder := false;
- GikoSys.Setting.DatOchiSortIndex := 0;
+ GikoSys.Setting.DatOchiSortIndex := Ord( gbcTitle );
end;
3: begin //\8eæ\93¾\93ú\8e\9e(\8f¸\8f\87)
GikoSys.Setting.DatOchiSortOrder := true;
- GikoSys.Setting.DatOchiSortIndex := 6;
+ GikoSys.Setting.DatOchiSortIndex := Ord( gbcLastModified );
end;
4: begin //\8eæ\93¾\93ú\8e\9e(\8d~\8f\87)
GikoSys.Setting.DatOchiSortOrder := false;
- GikoSys.Setting.DatOchiSortIndex := 6;
+ GikoSys.Setting.DatOchiSortIndex := Ord( gbcLastModified );
end;
5: begin //\83X\83\8c\8dì\90¬\93ú\8e\9e(\8f¸\8f\87)
GikoSys.Setting.DatOchiSortOrder := true;
- GikoSys.Setting.DatOchiSortIndex := 7;
+ GikoSys.Setting.DatOchiSortIndex := Ord( gbcCreated );
end;
6: begin //\83X\83\8c\8dì\90¬\93ú\8e\9e(\8d~\8f\87)
GikoSys.Setting.DatOchiSortOrder := false;
- GikoSys.Setting.DatOchiSortIndex := 7;
+ GikoSys.Setting.DatOchiSortIndex := Ord( gbcCreated );
end;
end;