Creating a window similar to force quite

Does anyone have a clue as to how one would make a window similar to the force quit one- with a list of applications running.

Thanks in advance!


with this code you can retrieve the names and paths of all running applications, which have a GUI

tell application "System Events"
	tell (processes whose background only is false) to set {pathList, nameList} to {application file, name}
end tell

having the paths you can gather the icon files inside the application bundles,
then create a window with a table and display the information