Subversion Repositories Kolibri OS

Rev

Rev 7373 | Rev 7569 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7373 Rev 7422
Line 285... Line 285...
285
	$int 0x40
285
	$int 0x40
286
}
286
}
Line 287... Line 287...
287
 
287
 
Line 288... Line -...
288
//------------------------------------------------------------------------------
-
 
289
 
-
 
290
inline fastcall void SetCurDir( ECX)
-
 
291
{
-
 
292
  EAX=30;
-
 
293
  EBX=1;
-
 
294
  $int 0x40
-
 
295
}
-
 
296
 
288
//------------------------------------------------------------------------------
297
 
289
 
298
//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus)
290
//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus)
299
#define SYS_LANG_ENG 1
291
#define SYS_LANG_ENG 1
300
#define SYS_LANG_FIN 2
292
#define SYS_LANG_FIN 2
Line 590... Line 582...
590
	DefineAndDrawWindow(_x, _y, _w, _h, 0x01, 0, 0, 0x01fffFFF);
582
	DefineAndDrawWindow(_x, _y, _w, _h, 0x01, 0, 0, 0x01fffFFF);
591
}
583
}
Line 592... Line 584...
592
 
584
 
593
:void EventDragWindow()
585
:void EventDragWindow()
-
 
586
{
594
{
587
	proc_info Form1;
595
	dword tmp_x,tmp_y;
588
	dword tmp_x,tmp_y;
596
	dword z1,z2;
589
	dword z1,z2;
597
	tmp_x = mouse.x;
590
	tmp_x = mouse.x;
598
	tmp_y = mouse.y;
591
	tmp_y = mouse.y;
-
 
592
	do {
599
	do {
593
		GetProcessInfo(#Form1, SelfInfo);
600
		mouse.get();
594
		mouse.get();
601
		if (tmp_x!=mouse.x) || (tmp_y!=mouse.y) 
595
		if (tmp_x!=mouse.x) || (tmp_y!=mouse.y) 
602
		{
596
		{
603
			z1 = Form.left + mouse.x - tmp_x;
597
			z1 = Form1.left + mouse.x - tmp_x;
604
			z2 = Form.top + mouse.y - tmp_y;
598
			z2 = Form1.top + mouse.y - tmp_y;
605
			if(z1<=10) || (z1>20000) z1=0; else if(z1>screen.width-Form.width-10)z1=screen.width-Form.width;
599
			if(z1<=10) || (z1>20000) z1=0; else if(z1>screen.width-Form1.width-10)z1=screen.width-Form1.width;
606
			if(z2<=10) || (z2>20000) z2=0; else if(z2>screen.height-Form.height-10)z2=screen.height-Form.height;
600
			if(z2<=10) || (z2>20000) z2=0; else if(z2>screen.height-Form1.height-10)z2=screen.height-Form1.height;
607
			MoveSize(z1 , z2, OLD, OLD);
601
			MoveSize(z1 , z2, OLD, OLD);
608
			draw_window();
602
			draw_window();
609
		}
603
		}
610
		pause(1);
604
		pause(1);