287,14 → 287,6 |
|
//------------------------------------------------------------------------------ |
|
inline fastcall void SetCurDir( ECX) |
{ |
EAX=30; |
EBX=1; |
$int 0x40 |
} |
|
|
//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus) |
#define SYS_LANG_ENG 1 |
#define SYS_LANG_FIN 2 |
592,18 → 584,20 |
|
:void EventDragWindow() |
{ |
proc_info Form1; |
dword tmp_x,tmp_y; |
dword z1,z2; |
tmp_x = mouse.x; |
tmp_y = mouse.y; |
do { |
GetProcessInfo(#Form1, SelfInfo); |
mouse.get(); |
if (tmp_x!=mouse.x) || (tmp_y!=mouse.y) |
{ |
z1 = Form.left + mouse.x - tmp_x; |
z2 = Form.top + mouse.y - tmp_y; |
if(z1<=10) || (z1>20000) z1=0; else if(z1>screen.width-Form.width-10)z1=screen.width-Form.width; |
if(z2<=10) || (z2>20000) z2=0; else if(z2>screen.height-Form.height-10)z2=screen.height-Form.height; |
z1 = Form1.left + mouse.x - tmp_x; |
z2 = Form1.top + mouse.y - tmp_y; |
if(z1<=10) || (z1>20000) z1=0; else if(z1>screen.width-Form1.width-10)z1=screen.width-Form1.width; |
if(z2<=10) || (z2>20000) z2=0; else if(z2>screen.height-Form1.height-10)z2=screen.height-Form1.height; |
MoveSize(z1 , z2, OLD, OLD); |
draw_window(); |
} |