TCustomConnection

pl 

Connected

pl 

waitcursor