Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
 
Delphi 11 Alexandria
 
#15

Re: Verhindern, das Form.Caption verändert wird...

  Alt 29. Sep 2003, 01:32
Moin FriFra,

wozu brauchst Du denn FindWindow?
Wenn Du Daniels Vorschlag benutzt könntest Du es so machen

Delphi-Quellcode:
type
  TfrmMAIN = class(TForm)
    // ...
    procedure WndProc(var msg : TMessage); override;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

implementation

procedure TfrmMAIN.WndProc(var msg : TMessage);
begin
  if (msg.Msg = WM_SETTEXT) and (PChar(msg.LParam) <> 'Die Caption, die erhalten werden soll.') then exit;
  inherited WndProc(msg);
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat