Constructing the Interface for an Internet Access Control Application
In this third part to a six-part article that shows how to build an application for Internet access control, such as you might find in an Internet cafe, we will mainly be dealing with the functionality of the main server application. This is the application that will provide us with both the interface and capability to manage client sessions.
messagedlg('This workstation is not available.',mtinformation,[mbOk], 0);
end
else
begin
form2.label1.caption:=lv.Selected.Caption;
form2.show;
end;
end;
procedure TForm1.shut_downClick(Sender: TObject);
begin
broadcastAll;
end;
end.
As you can see from the screen shot, the user interface is very simple, yet user friendly. In the next coupe of articles we will look in depth at the code that makes up both the user interface and the server application itself.
DISCLAIMER: The content provided in this article is not warranted or guaranteed by Developer Shed, Inc. The content provided is intended for entertainment and/or educational purposes in order to introduce to the reader key ideas, concepts, and/or product reviews. As such it is incumbent upon the reader to employ real-world tactics for security and implementation of best practices. We are not liable for any negative consequences that may result from implementing any information covered in our articles or tutorials. If this is a hardware review, it is not recommended to open and/or modify your hardware.
Delphi-Kylix 
Server Code for an Internet Access Control Application/IntAccess(3)_html_75939471.png)
