Hallo,
du könntest es mit einer
Unit ählich dieser versuchen:
Delphi-Quellcode:
unit unit_MyForm;
interface
uses
Controls, Forms;
type
TForm =
class (Forms.TForm)
protected
procedure CreateParams (
var Params: TCreateParams);
override;
end;
implementation
uses
Windows;
procedure TForm.CreateParams(
var Params: TCreateParams);
begin
inherited;
// hier die gewünschten Änderungen einbauen:
Params.ExStyle := Params.ExStyle
or WS_EX_TOOLWINDOW;
end;
end.
Wichtig ist, daß
unit_MyForm in die USES-Anweisung aller betroffenen Formular-Units aufgenommen wird und dort
hinter der
Unit Forms steht. Eine Erklärung dieses "Tricks" findest du in
diesem Artikel von Hallvard Vassbotn.
Gruß Hawkeye