Советы по Delphi
Форма постоянно сверху приложения?
Форма должна иметь нормальный стиль (normal style), необходимо лишь переписать процедуру CreateParams:
| procedure TFloatingToolbar.CreateParams( var Params: TCreateParams ); begin inherited CreateParams( Params ); with Params do begin Style := Style or ws_Overlapped; WndParent := MainForm.Handle; end; end; |
