Form nicht-modal mit eigenem Taskleitsten Eintrag erstellen

[Chris.R]

Ich glaub du hast den Delphi Virus auf deinem System:

Delphi Virus


Auf jedenfall sind jetzt alle Exen die ich mit Delphi erstell mit Virusmeldung von AntiVir

FEHLALARM: War wohl ein anderes Programm, was ich kurz vorher installiert hab :oops:

Ciao Chris

[Chris.R]

Hallo,

hab grad dein Projekt getestet. Bei deiner Exe hab ich das gleiche Problem wie du, wenn ich das Projekt mit Delphi 7 neu übersetze, dann funktioniert alles wie gewünscht.

Du hast Delphi 2010? Wenn du noch eine ältere Version von Delphi hast, kannst du ja mal TCustomForm in der Unit Forms.pas mit alten Version vergleichen,
interessant wär hier die Stelle CreateParams. Kannst ja in der SubForm das CreateParams auch mal überschreiben:

Delphi-Quellcode:

TForm4 = class(TForm)
    Button1: TButton;
  private
    { Private-Deklarationen }
  protected
    procedure CreateParams(var AParams: TCreateParams); override;
  public
    { Public-Deklarationen }
  end;

var
  Form4: TForm4;

implementation

{$R *.dfm}

{ TForm4 }

procedure TForm4.CreateParams(var AParams: TCreateParams);
begin
  inherited;

  AParams.ExStyle := AParams.ExStyle and not WS_EX_TOPMOST;
end;

Und nochmal sorry für den Fehlalarm.


Ciao Chris

[Zacherl]

Danke für deine Antwort, werde das zu Hause mal testen. Den Sourcecode kann ich leider nicht vergleichen, da bei der Demo glaube ich keine Sourcen dabei sind.
Ich versuche mal das CreateParams zu überschreiben.

Vermutlich handelt es sich hier um einen Bug in D2010 :)

Edit: Kann leider vermutlich erst am Sonntag oder Montag Rückmeldung geben, da mein Anbieter zur Zeit Wartungsarbeiten an der Leitung durchführt =/

[Chris.R]

Hallo,

so lange offline :pale: Das macht nix, ich bin eh übers Wochenende nicht da.

Du solltest den Fehler dann auch mal ans Quality Central Embarcadero melden, wenn sich keine Lösung findet.

Ciao Chris

[Zacherl]

Irgendwie wird der Parent nicht korrekt übernommen. Es hat nun endlich funktioniert, indem ich CreateParams überschrieben habe und AParams.ParentWindow auf Application.Handle gesetzt habe :) Danke für deine Hilfe!