Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/GikoDataModule.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.32 by h677, Wed Jan 18 15:25:45 2006 UTC revision 1.33 by h677, Sat Feb 18 13:23:33 2006 UTC
# Line 2768  var Line 2768  var
2768          shiftDown: Boolean;          shiftDown: Boolean;
2769  begin  begin
2770          shiftDown := GetAsyncKeyState(VK_SHIFT) = Smallint($8001);          shiftDown := GetAsyncKeyState(VK_SHIFT) = Smallint($8001);
2771        GikoForm.ActiveListColumnSave;
2772          if GikoForm.GetActiveList is TCategory then begin          if GikoForm.GetActiveList is TCategory then begin
2773                  List := TList.Create;                  List := TList.Create;
2774                  try                  try

Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26