East make Tray Icon in delphi

								  Include("intro.inc");
				%>
				
				Bo顃es non retourn閑s:
				
				
				
				
				
				  Bo顃e
				  Date d'emprunt
				  Emprunteur
				
				
								  Request("SELECT * FROM boxes.xml, loans.xml, loans_box.xml, clients.xml
				    WHERE (LoanId = LBLoan) AND (LBBox = BoxId) AND (LoanReturn IS NULL) AND (ClientId = LoanClient)
				    ORDER BY Date(LoanDeparture) ");
				  Display("templates/boxlist.tpl");
				  DisplayEmpty("templates/boxlistempty.tpl");
				%>
				
				
				
				
				
				
				
				
								  Include("outro.inc");
				%>