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