To detect changes in the display, create a message handler to trap the WM_DISPLAYCHANGE message. If you have a simple application, you may need to do little in response to this message. If your application makes use of graphics, you may want to restart the application, as there may be many changes to the system that may be difficult to overcome as the screen resolution, color depth and default fonts may change.

Here is an example of of a message handler:

type TForm = class(TForm) Button : TButton; private { Private declarations } procedure WMDisplayChange(var Message: TMessage); message WM_DISPLAYCHANGE; public { Public declarations } end;

var Form : TForm ;

implementation

{$R *.DFM}

procedure TForm .WMDisplayChange(var Message: TMessage); begin {Do Something here} inherited; end; 7/ 6/98 4:3 :28 PM