Eolite 1.32: scroll bug fixed

git-svn-id: svn://kolibrios.org@2896 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency) 2012-07-31 15:05:39 +00:00
parent 77e5190523
commit 8ecfc9d15a
2 changed files with 7 additions and 5 deletions

View File

@ -20,7 +20,7 @@ int BUTTON_HEIGHT=18;
#define ONLY_OPEN 2 #define ONLY_OPEN 2
//ïåðåìåííûå //ïåðåìåííûå
#define title "Eolite File Manager v1.31" #define title "Eolite File Manager v1.32"
dword selection_col=0x94AECE; dword selection_col=0x94AECE;
@ -83,7 +83,7 @@ dword buf, off; //
void main() void main()
word key, id; word key, id;
mouse m; mouse m;
int pressed_y; int pressed_y, scroll_used=0;
{ {
load_editbox_lib(); load_editbox_lib();
GetSystemDiscs(); GetSystemDiscs();
@ -159,7 +159,10 @@ int pressed_y;
List_ReDraw(); List_ReDraw();
} }
//ñêðîëë //ñêðîëë
if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && && (m.y<65000) while (m.lkm) if (!m.lkm) scroll_used=0;
if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.y<Form.height) && (m.lkm) scroll_used=1;
if (scroll_used)
{ {
IF (scroll_size/2+57>m.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+57; //åñëè êóðñîð íàä îêíîì IF (scroll_size/2+57>m.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+57; //åñëè êóðñîð íàä îêíîì
id=za_kadrom; //ñîõðàíÿåì ñòàðîå êîëè÷åñòâî id=za_kadrom; //ñîõðàíÿåì ñòàðîå êîëè÷åñòâî
@ -168,7 +171,6 @@ int pressed_y;
za_kadrom /= onTop(22,57); za_kadrom /= onTop(22,57);
IF (but_num+za_kadrom>count) za_kadrom=count-but_num; IF (but_num+za_kadrom>count) za_kadrom=count-but_num;
IF (id<>za_kadrom) List_ReDraw(); //÷òîá ëèøíèé ðàç íå ïåðåðèñîâûâàòü IF (id<>za_kadrom) List_ReDraw(); //÷òîá ëèøíèé ðàç íå ïåðåðèñîâûâàòü
m.get();
} }
break; break;
//Button pressed----------------------------------------------------------------------------- //Button pressed-----------------------------------------------------------------------------

View File

@ -39,7 +39,7 @@ void about_dialog()
DefineAndDrawWindow(600,150,181,256,0x34,0x10EFEBEF,"About Eolite"); DefineAndDrawWindow(600,150,181,256,0x34,0x10EFEBEF,"About Eolite");
DrawBar(0,0,172,50,0x8494C4); //ãîëóáîå ñçàäè DrawBar(0,0,172,50,0x8494C4); //ãîëóáîå ñçàäè
PutPaletteImage(#logo,85,85,43,7,#logo_pal); PutPaletteImage(#logo,85,85,43,7,#logo_pal);
WriteText(46,100,0x90,0xBF40BF,"Eolite v1.31",0); WriteText(46,100,0x90,0xBF40BF,"Eolite v1.32",0);
$add ebx, 1<<16 $add ebx, 1<<16
$int 0x40 $int 0x40
WriteText(55,120,0x80,0,"Developers:",0); WriteText(55,120,0x80,0,"Developers:",0);