MainWindow()
	{

		Title("Test Focus").Zoomable().Sizeable();
		Add(inputtext.TopPosZ(0, 16).HSizePos());
		Add(panel.VSizePos(18, 0).HSizePos(0, 0));

		inputtext <<= "test";
		
		ActiveFocus(panel);
		
		panel.Paint << [&](Draw &w) { w.DrawText(p.x, p.y, "#", Arial(30), Red);};
	
		panel.Key << [&](dword key, int count) { switch (key) { /
									case K_W: /
										p.y-=1; /
										break; /
									case K_S: /
										p.y+=1; /
										break; /
									case K_A: /
										p.x-=1; /
										break; /
									case K_D: /
										p.x+=1; /
										break; /
									default: /
										; /
								} /
							Refresh();	return true; }; /

		SetRect(0, 0, 300, 300);
		p.x = 150;
		p.y = 150;
	}
	};