Unit MTopMost

Classes

TTopMost - Renamed from TopMost.

Functions

Register - I've got a problem with the default value

other ideas which doesn't work.

Types

Constants

Variables


Functions


procedure Register;

I've got a problem with the default value

other ideas which doesn't work...} { SetWindowLong((Owner as TForm).Handle,GWL_EXSTYLE, GetWindowLong((Owner as TForm).Handle, GWL_EXSTYLE) or WS_EX_TOPMOST);} { (Owner as TForm).ExStyle := (Owner as TForm).ExStyle or WS_EX_TOPMOST;


Types


Constants


Variables